emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/sesman e340810e82 030/100: Refer to a few commands with th


From: ELPA Syncer
Subject: [nongnu] elpa/sesman e340810e82 030/100: Refer to a few commands with the #' notation
Date: Tue, 28 Dec 2021 14:06:00 -0500 (EST)

branch: elpa/sesman
commit e340810e829e8a6ebeecf6d20ce4cd8f124b3aad
Author: Bozhidar Batsov <bozhidar@batsov.com>
Commit: Bozhidar Batsov <bozhidar@batsov.com>

    Refer to a few commands with the #' notation
---
 sesman.el | 36 ++++++++++++++++++------------------
 1 file changed, 18 insertions(+), 18 deletions(-)

diff --git a/sesman.el b/sesman.el
index f937deff01..c7f35da6a5 100644
--- a/sesman.el
+++ b/sesman.el
@@ -355,24 +355,24 @@ argument or 'all, show info for all sessions."
 (defvar sesman-map
   (let (sesman-map)
     (define-prefix-command 'sesman-map)
-    (define-key sesman-map (kbd "C-i") 'sesman-show-session-info)
-    (define-key sesman-map (kbd   "i") 'sesman-show-session-info)
-    (define-key sesman-map (kbd "C-l") 'sesman-show-links)
-    (define-key sesman-map (kbd   "l") 'sesman-show-links)
-    (define-key sesman-map (kbd "C-s") 'sesman-start)
-    (define-key sesman-map (kbd   "s") 'sesman-start)
-    (define-key sesman-map (kbd "C-r") 'sesman-restart)
-    (define-key sesman-map (kbd   "r") 'sesman-restart)
-    (define-key sesman-map (kbd "C-q") 'sesman-quit)
-    (define-key sesman-map (kbd   "q") 'sesman-quit)
-    (define-key sesman-map (kbd "C-b") 'sesman-link-with-buffer)
-    (define-key sesman-map (kbd   "b") 'sesman-link-with-buffer)
-    (define-key sesman-map (kbd "C-d") 'sesman-link-with-directory)
-    (define-key sesman-map (kbd   "d") 'sesman-link-with-directory)
-    (define-key sesman-map (kbd "C-p") 'sesman-link-with-project)
-    (define-key sesman-map (kbd   "p") 'sesman-link-with-project)
-    (define-key sesman-map (kbd "C-u") 'sesman-unlink)
-    (define-key sesman-map (kbd "  u") 'sesman-unlink)
+    (define-key sesman-map (kbd "C-i") #'sesman-show-session-info)
+    (define-key sesman-map (kbd   "i") #'sesman-show-session-info)
+    (define-key sesman-map (kbd "C-l") #'sesman-show-links)
+    (define-key sesman-map (kbd   "l") #'sesman-show-links)
+    (define-key sesman-map (kbd "C-s") #'sesman-start)
+    (define-key sesman-map (kbd   "s") #'sesman-start)
+    (define-key sesman-map (kbd "C-r") #'sesman-restart)
+    (define-key sesman-map (kbd   "r") #'sesman-restart)
+    (define-key sesman-map (kbd "C-q") #'sesman-quit)
+    (define-key sesman-map (kbd   "q") #'sesman-quit)
+    (define-key sesman-map (kbd "C-b") #'sesman-link-with-buffer)
+    (define-key sesman-map (kbd   "b") #'sesman-link-with-buffer)
+    (define-key sesman-map (kbd "C-d") #'sesman-link-with-directory)
+    (define-key sesman-map (kbd   "d") #'sesman-link-with-directory)
+    (define-key sesman-map (kbd "C-p") #'sesman-link-with-project)
+    (define-key sesman-map (kbd   "p") #'sesman-link-with-project)
+    (define-key sesman-map (kbd "C-u") #'sesman-unlink)
+    (define-key sesman-map (kbd "  u") #'sesman-unlink)
     sesman-map)
   "Session management prefix keymap.")
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]