Updating Doom Emacs.

.emacs.d/modules/lang/racket/autoload.el

@@ -10,3 +10,20 @@
               (let ((buf (get-buffer "*Racket REPL*")))
                 (bury-buffer buf)
                 buf)))))
+
+;;;###autoload
+(defun +racket-lookup-documentation (thing)
+  "A `+lookup/documentation' handler for Racket."
+  (let ((buf (if racket-xp-mode
+                 (racket-xp-describe thing)
+               (racket-repl-describe thing))))
+    (when buf
+      (pop-to-buffer buf)
+      t)))
+
+;;;###autoload
+(defun +racket-lookup-definition (_thing)
+  "A `+lookup/definition' handler for Racket."
+  (if racket-xp-mode
+      (call-interactively #'racket-xp-visit-definition)
+    (call-interactively #'racket-repl-visit-definition)))

.emacs.d/modules/lang/racket/config.el

@@ -8,12 +8,13 @@
 ;;; Packages
 
 (use-package! racket-mode
+  :mode "\\.rkt\\'"  ; give it precedence over :lang scheme
   :hook (racket-repl-mode . racket-unicode-input-method-enable)
   :config
   (set-repl-handler! 'racket-mode #'+racket/open-repl)
   (set-lookup-handlers! 'racket-mode
-    :definition    #'racket-visit-definition
-    :documentation #'racket-describe)
+    :definition    #'+racket-lookup-definition
+    :documentation #'+racket-lookup-documentation)
   (set-docsets! 'racket-mode "Racket")
   (set-pretty-symbols! 'racket-mode
     :lambda  "lambda"
@@ -24,8 +25,14 @@
 
   (add-hook! 'racket-mode-hook
              #'rainbow-delimiters-mode
-             #'highlight-quoted-mode
-             #'racket-smart-open-bracket-mode)
+             #'highlight-quoted-mode)
+
+  (when (featurep! +xp)
+    (add-hook 'racket-mode-hook #'racket-xp-mode))
+
+  (unless (or (featurep! :editor parinfer)
+              (featurep! :editor lispy))
+    (add-hook 'racket-mode-hook #'racket-smart-open-bracket-mode))
 
   (map! :localleader
         :map racket-mode-map

.emacs.d/modules/lang/racket/packages.el

@@ -1,4 +1,4 @@
 ;; -*- no-byte-compile: t; -*-
 ;;; lang/racket/packages.el
 
-(package! racket-mode)
+(package! racket-mode :pin "8f3b214a5ea06e6a2a9492e7d20b19badd0c3bdf")