[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0510040 1/2: Adjust cmuscheme.el menu bar after previous scheme.e
From: |
Lars Ingebrigtsen |
Subject: |
master 0510040 1/2: Adjust cmuscheme.el menu bar after previous scheme.el change |
Date: |
Sun, 28 Feb 2021 12:20:16 -0500 (EST) |
branch: master
commit 05100407543deef4191ba0453ec4b89ef40dde90
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Adjust cmuscheme.el menu bar after previous scheme.el change
* lisp/cmuscheme.el (map): Adjust the keymap lookup after recent
scheme.el change (bug#46820).
---
lisp/cmuscheme.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/cmuscheme.el b/lisp/cmuscheme.el
index 772891d..f41f2bf 100644
--- a/lisp/cmuscheme.el
+++ b/lisp/cmuscheme.el
@@ -132,7 +132,7 @@
(define-key scheme-mode-map "\C-c\C-l" 'scheme-load-file)
(define-key scheme-mode-map "\C-c\C-k" 'scheme-compile-file) ;k for "kompile"
-(let ((map (lookup-key scheme-mode-map [menu-bar scheme])))
+(let ((map (lookup-key scheme-mode-map [menu-bar Scheme])))
(define-key map [separator-eval] '("--"))
(define-key map [compile-file]
'("Compile Scheme File" . scheme-compile-file))