config/identica.el

   1 (message "Bringin up Identi.ca")
   2
   3 (if (locate-library "identica-mode")
   4         (progn
   5           (require 'identica-mode)
   6           (setq identica-soft-wrap-status t)
   7           (when (require 'netrc nil t)
   8                 (autoload 'identica-mode "identica-mode" nil t)
   9                 (let ((identica (netrc-machine (netrc-parse "~/.netrc") "identi.ca" t))) ; remove this `t' if you didn't specify a port
  10                   (setq identica-password (netrc-get identica "password") ; if it's last, avoid doing C-M-x in public spaces at least ;-)
  11                                 identica-username (netrc-get identica "login")))))
  12   (message "[W] no identica mode found!"))