 (defun boop-flash-result-ids ()
   "Flashes the results based on their ID for 5 seconds."
   (interactive)
-  (let ((previous-format-func boop--format-func))
-    (setq boop--format-func 'boop--format-result-as-id)
-    (run-at-time "2 sec" nil `(lambda () (setq boop--format-func (quote ,previous-format-func))))))
+  (let ((previous-format-func boop--format-result-func))
+    (setq boop--format-result-func 'boop--format-result-as-id)
+    (run-at-time "2 sec" nil `(lambda () (setq boop--format-result-func (quote ,previous-format-func))))))
 
 (defun boop (id status)
   "Manually boop something and set ID to have a status of STATUS."

:action - &optional A function to be called when this form status
          is changed to.
          e.g.  If a boop has a status of 1 then
          changes to a status of 2 which has an action")

(defcustom boop-execution-strategy 'config
  "The startegy to use for executing plugins.

  "The default directory to read plugins from.")

(defvar boop-config-alist nil
  "The main alist of scripts and the arguments to run them with.

Each entry Should be in the format (ID :script &optional ARGS)")

(defvar boop-result-alist nil
  "This is an alist to track the results of plugins and boops.
