                       cont
                       'interrupted)
     (let ((file-buffer (current-buffer)))
-      (intero-save-silently)
       (intero-async-call
        'backend
-       (concat ":l " (intero-buffer-file-name))
+       (concat ":l " (intero-temp-file-name))
        (list :cont cont
              :file-buffer file-buffer
              :checker checker)

   (intero-blocking-call
    'backend
    (format ":loc-at %S %d %d %d %d %S"
            (intero-buffer-file-name)
            (save-excursion (goto-char beg)
                            (line-number-at-pos))
            (save-excursion (goto-char beg)

If PROMPT-OPTIONS is non-nil, prompt with an options list."
  (interactive "P")
  (save-buffer)
  (let ((file (intero-temp-file-name))
        (repl-buffer (intero-repl-buffer prompt-options t)))
    (with-current-buffer repl-buffer
      (comint-simple-send
