   A process is considered alive if its status is `run', `open',
   `listen', `connect' or `stop'."
   (memq (process-status process)
-    '(run open listen connect stop)))
+        '(run open listen connect stop)))
 
 (defun floobits-listener (process response)
   (setq floobits-agent-buffer (concat floobits-agent-buffer response))

    (floobits-debug-message "User %s created buffer %s" username filename)))

(defun floobits-event-follow_user (req)
    (let ((username (floo-get-item req "username")))
      (setq floobits-follow-mode t)
      (add-to-list 'floobits-follow-users username)
    )
  )

(defun floobits-event-delete_buf (req)
  (let ((filename (floo-get-item req "path" ))


(defun floobits-event-get_buf (req)
  (floo-when-buf (get-file-buffer (floo-get-item req "full_path"))
                 (atomic-change-group
                   (delete-region 1 (+ 1 (buffer-size)))
                   (insert (floo-get-item req "buf")))))

(defun floobits-event-open_file (req)
  (find-file (floo-get-item req "filename")))
