   (if (floobits-process-live-p floobits-conn)
     (progn
       (floo-set-item 'req 'name event)
-      ; TODO FIXME: sending highlights breaks bjorn's emacs
-      (unless (string-equal event "highlight")
-        (process-send-string floobits-conn (concat (json-encode req) "\n"))))
+        (process-send-string floobits-conn (concat (json-encode req) "\n")))
     (progn
       (message "Connection to floobits died :(")
       (floobits-destroy-connection))))


(defun floobits-send-highlight (&optional ping)
 (when (_floobits-is-buffer-public (current-buffer))
    (let* ((name (buffer-file-name (current-buffer)))
          (point (- (or (point) 0) 1))
          (req (list
            (cons 'ranges (if (use-region-p)

            (cons 'ping ping))))
      (when (or ping (not (equal req floobits-current-position)))
        (setq floobits-current-position req)
        (run-at-time .1 nil (lambda () (floobits-send-to-agent req 'highlight)))))))


(defun _floobits-is-buffer-public (buf)
  (let ((name (buffer-name buf)))
