Merge pull request #1244 from flatwhatson/better-apropos

Improvements to apropos and describe-symbol

modules/config/default/+emacs-bindings.el

@@ -320,6 +320,11 @@
       (:after helpful-mode
         :map helpful-mode-map
         "o" #'ace-link-help)
+      (:after apropos
+        :map apropos-mode-map
+        "o" #'ace-link-help
+        "n" #'forward-button
+        "p" #'backward-button)
       (:after info
         :map Info-mode-map
         "o" #'ace-link-info)

modules/lang/emacs-lisp/autoload.el

@@ -126,9 +126,8 @@ library/userland functions"
 
 ;;;###autoload
 (defun +emacs-lisp-lookup-documentation (thing)
-  "Lookup THING with `helpful-symbol' if it's a symbol, apropos otherwise."
-  (cond ((not thing)
-         (call-interactively #'helpful-symbol))
-        ((if-let* ((sym (intern-soft thing))) (helpful-symbol sym)))
-        ((apropos (format "^%s" thing)))
-        ((apropos thing))))
+  "Lookup THING with `helpful-variable' if it's a variable, `helpful-callable'
+if it's callable, `apropos' otherwise."
+  (if thing
+      (doom/describe-symbol thing)
+    (call-interactively #'doom/describe-symbol)))