(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!"))