buffer(new-url-or-search-source): Fix bug.

Fixes #2134.
atlas-engineer · Feb 19, 2024 · 36589e3 · 36589e3
1 parent acbee11
commit 36589e3
Showing 1 changed file with 1 addition and 9 deletions.
diff --git a/source/buffer.lisp b/source/buffer.lisp
@@ -1519,16 +1519,8 @@ Otherwise, set `engine' to `default-search-engine'."))
    (prompter:filter-preprocessor
     (lambda (suggestions source input)
       (declare (ignore suggestions source))
-      (input->queries input
-                      :check-dns-p nil
-                      :engine-completion-p nil)))
+      (input->queries input :check-dns-p nil :engine-completion-p t)))
    (prompter:filter nil)
-   (prompter:filter-postprocessor
-    (lambda (suggestions source input)
-      (declare (ignore suggestions source))
-      (input->queries input
-                      :check-dns-p t
-                      :engine-completion-p t)))
    (prompter:actions-on-return #'buffer-load*))
   (:export-class-name-p t)
   (:documentation "This prompter source tries to \"do the right thing\" to