diff --git a/org-ql-find.el b/org-ql-find.el
index 03a2829..84dad91 100644
--- a/org-ql-find.el
+++ b/org-ql-find.el
@@ -76,9 +76,8 @@ single predicate)."
                   :query-filter query-filter
                   :prompt prompt)))
     (set-buffer (marker-buffer marker))
+    (pop-to-buffer (current-buffer) org-ql-find-display-buffer-action)
     (goto-char marker)
-    (display-buffer (current-buffer) org-ql-find-display-buffer-action)
-    (select-window (get-buffer-window (current-buffer)))
     (run-hook-with-args 'org-ql-find-goto-hook)))
 
 ;;;###autoload