 			  (run-hooks 'twit-new-tweet-hook))))
   
   ;; go back to top so we see the latest messages
+  (goto-address)
   (goto-char (point-min))
 
   ;; this needs more TLC

									   'pointer 'hand
									   'twit-url str
									   'keymap map)))
					   message)))
  message)


  (browse-url (or (twit-get-text-property 'twit-url)
	   		      (when (twit-get-text-property 'twit-user) (concat "http://twitter.com/" (twit-get-text-property 'twit-user))))))

(defun twit-install-elisp ()
  "Install the elisp library at point.

This function assumes that the elisp library is at Emacs Wiki, and that you
have auto-install installed."
  (interactive)
  (if (featurep 'auto-install)
	  (let ((file  (twit-get-text-property 'elisp)))
		(if file
			(auto-install-from-emacswiki file)
			(error "Not on an elisp library, cannot auto-install.")))
	  (error "Cannot auto-install elisp library, because auto-install is not installed.")))

;;* multi-account interactive
(defun twit-switch-account (account)
   "Switch twitter account to ACCOUNT.
