 ;; Hoogle
 
 (defun intero-hoogle-blocking-query (query)
-  "Make a request of QUERY using the local hoogle server, if
-running. Otherwise returns nil.
+  "Make a request of QUERY using the local hoogle server.
+If running, otherwise returns nil.
 
 It is the responsibility of the caller to make sure the server is
 running; the user might not want to start the server

  "Prompt and apply the suggestions."
  (interactive)
  (when (null intero-suggestions)
    (error "No suggestions to apply."))
  (let ((to-apply
         (intero-multiswitch
          (format "There are %d suggestions to apply:" (length intero-suggestions))

;; Interactive commands

(defun intero-toggle-debug ()
  "Toggle debugging mode on/off."
  (interactive)
  (setq intero-debug (not intero-debug))
  (message "Intero debugging is: %s" (if intero-debug "ON" "OFF")))
