   (let* ((new-name (floo-get-item req "new_name"))
       (old-name (floo-get-item req "full_path"))
       (buf (get-file-buffer old-name)))
-    (message "%s %s %s" new-name old-name buf)
     (if buf
       (if (get-buffer new-name)
           (message "A buffer named '%s' already exists!" new-name)

  (message "%s left the workspace" (floo-get-item req 'username)))

(defun floobits-event-create_view (req)
  (message "opening file %s" (floo-get-item req 'full_path))
  (find-file (floo-get-item req 'full_path))
  (floobits-buffer-list-change))


(defun floobits-event-create_buf (req)
  (let ((filename (floo-get-item req "path" ))
        (username (floo-get-item req "username")))
    (floobits-debug-message "User %s created buffer %s" username filename)))

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