uhhh

idkkkk

modules/home/users/crumb/emacs/lib/syd-handle-lookup.el

@@ -66,7 +66,7 @@ success.  When a handler returns a marker, the marker will be jumped to.")
   "Try to find documentation on IDENTIFIER, and "
   (interactive (list (syd-thing-at-point-or-region)))
   (or (syd-lookup--jump-to 'documentation identifier
-                           :display-fn #'pop-to-buffer)
+                           :display-fn #'display-buffer)
       (user-error "Couldn't find documentation on %S"
                   (substring-no-properties identifier))))
 
@@ -86,8 +86,10 @@ success.  When a handler returns a marker, the marker will be jumped to.")
                      (message "No lookup handler could find %S" identifier)
                      nil)
                     ((markerp result)
-                     (funcall display-fn (marker-buffer result))
-                     (goto-char result)
+                     (let ((b (marker-buffer result)))
+                       (funcall display-fn b)
+                       (when (eq (current-buffer) b)
+                         (goto-char result)))
                      result)
                     (result))
           (with-current-buffer (marker-buffer origin)