   (buffer-disable-undo)
   (setq major-mode 'fuel-debug-uses-mode)
   (setq mode-name "Fuel Uses:")
+  (set (make-local-variable 'font-lock-defaults)
+       '(fuel-debug--uses-font-lock-keywords t nil nil nil))
   (use-local-map fuel-debug-uses-mode-map))
 
 
    (define-key map "\C-c\C-c" 'fuel-debug--uses-update-usings)
    map))

(defun fuel-debug-uses-mode ()
  "A major mode for displaying Factor's USING: inference results."
  (interactive)

      (fuel-debug--uses-new-uses fuel-debug--uses-file fuel-debug--uses)
      (message "USING: updated!")
      (with-current-buffer (fuel-debug--uses-buffer)
        (insert "\nDone!")
        (fuel-debug--uses-clean)
        (bury-buffer)))))

(defun fuel-debug--uses-restart (n)
  (when (and (> n 0) (<= n (length fuel-debug--uses-restarts)))
