Import old config

[dotfiles/emacs.git] / config / identica.el

diff --git a/config/identica.el b/config/identica.el
new file mode 100644 (file)
index 0000000..1f1157b
--- /dev/null
+++ b/config/identica.el
@@ -0,0 +1,12 @@
+(message "Bringin up Identi.ca")
+
+(if (locate-library "identica-mode")
+       (progn
+         (require 'identica-mode)
+         (setq identica-soft-wrap-status t)
+         (when (require 'netrc nil t)
+               (autoload 'identica-mode "identica-mode" nil t)
+               (let ((identica (netrc-machine (netrc-parse "~/.netrc") "identi.ca" t))) ; remove this `t' if you didn't specify a port
+                 (setq identica-password (netrc-get identica "password") ; if it's last, avoid doing C-M-x in public spaces at least ;-)
+                               identica-username (netrc-get identica "login")))))
+  (message "[W] no identica mode found!"))
\ No newline at end of file