diff lisp/textmodes/remember.el @ 85862:9e1be56af44a

remember.el (remember-mode-map): Define and initialize in one step.
author Michael Olson <mwolson@gnu.org>
date Thu, 01 Nov 2007 04:40:55 +0000
parents 70f347d257ec
children f5b982bf98e0
line wrap: on
line diff
--- a/lisp/textmodes/remember.el	Thu Nov 01 04:37:47 2007 +0000
+++ b/lisp/textmodes/remember.el	Thu Nov 01 04:40:55 2007 +0000
@@ -452,13 +452,12 @@
 
 ;;; Internal Functions:
 
-(defvar remember-mode-map ()
+(defvar remember-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map "\C-x\C-s" 'remember-finalize)
+    (define-key map "\C-c\C-c" 'remember-finalize)
+    (define-key map "\C-c\C-k" 'remember-destroy))
   "Keymap used in Remember mode.")
-(when (not remember-mode-map)
-  (setq remember-mode-map (make-sparse-keymap))
-  (define-key remember-mode-map "\C-x\C-s" 'remember-finalize)
-  (define-key remember-mode-map "\C-c\C-c" 'remember-finalize)
-  (define-key remember-mode-map "\C-c\C-k" 'remember-destroy))
 
 (defun remember-mode ()
   "Major mode for output from \\[remember].