   (find-file (floo-get-item req 'full_path))
   (goto-char (+ 1 (floo-get-item req 'offset))))
 
+;;;###autoload
 (defun floobits-clear-highlights ()
   "Clears all highlights"
   (interactive)

(defun floobits-event-error (req)
  (message-box (floo-get-item req 'msg)))

(defun floobits-join-workspace (floourl)
  "Join an existing floobits workspace.
See floobits-share-dir to create one or visit floobits.com."

            (cons 'ping ping))))
          (floobits-send-to-agent req 'highlight))))))

;;;###autoload
(defun floobits-summon ()
  "Summons all users to your cursor position."
  (interactive)
  (floobits-send-highlight t))

;;;###autoload
(defun floobits-follow-mode-toggle ()
  "Toggles following of recent changes in a workspace"
  (interactive)
