From ed5e5a99a86ffac2a5fd1b8ac7bb6c45ef7bc72c Mon Sep 17 00:00:00 2001
From: Aryadev Chavali <aryadev@aryadevchavali.com>
Date: Wed, 12 Jun 2024 02:04:27 +0100
Subject: (Emacs/config)+which-key descriptions for sly bindings
---
Emacs/.config/emacs/config.org | 24 ++++++++++++++----------
1 file changed, 14 insertions(+), 10 deletions(-)
diff --git a/Emacs/.config/emacs/config.org b/Emacs/.config/emacs/config.org
index 66226a7..84c25e1 100644
--- a/Emacs/.config/emacs/config.org
+++ b/Emacs/.config/emacs/config.org
@@ -2927,7 +2927,6 @@ learnt the basics of org).
#+begin_src emacs-lisp
(use-package org-msg
:straight t
- :defer t
:hook
(message-mode-hook . org-msg-mode)
(notmuch-message-mode-hook . org-msg-mode)
@@ -3568,19 +3567,24 @@ Here I just setup Sly to use ~sbcl~.
(shell-leader
"s" #'sly-mrepl)
(nmap
- :keymaps '(lisp-mode-map sly-mrepl-mode-map)
+ :keymaps 'lisp-mode-map
"gr" #'sly-eval-buffer
"gd" #'sly-edit-definition
"gR" #'sly-who-calls)
(local-leader
- :keymaps '(lisp-mode-map sly-mrepl-mode-map)
- "s" #'sly-mrepl
- "c" #'sly-compile-file
- "a" #'sly-apropos
- "d" #'sly-describe-symbol
- "D" #'sly-documentation-lookup
- "S" #'sly-mrepl-sync
- "E" #'sly-eval-defun)
+ :keymaps '(sly-mrepl-mode-map lisp-mode-map)
+ "a" '(sly-apropos :which-key "Apropos")
+ "d" '(sly-describe-symbol :which-key "Describe symbol")
+ "D" '(sly-documentation-lookup :which-key "Lookup on lispworks"))
+ (local-leader
+ :keymaps 'sly-mrepl-mode-map
+ "s" '(sly-mrepl-shortcut :which-key "Shortcut"))
+ (local-leader
+ :keymaps 'lisp-mode-map
+ "l" '(sly-load-file :which-key "Load file")
+ "c" '(sly-compile-defun :which-key "Compile defun")
+ "C" '(sly-compile-file :which-key "Compile file")
+ "S" '(sly-mrepl-sync :which-key "Sync REPL"))
(local-leader
:keymaps 'lisp-mode-map
:infix "e"
--
cgit v1.2.3-13-gbd6f