diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-05-10 22:55:08 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-05-11 16:12:00 +0200 |
| commit | 4993050c2aacee2d05b090861566a7f3a56cb64c (patch) | |
| tree | 3d4136a8846a5bee7bd60f859e6a8744d9f10986 /lisp/calendar/diary-lib.el | |
| parent | fb42001086a67a1cf47ad31c2495de4f5c6661e7 (diff) | |
| download | emacs-4993050c2aacee2d05b090861566a7f3a56cb64c.tar.gz | |
* lisp/calendar/diary-lib.el (diary-mode-map): Prefer defvar-keymap.
Diffstat (limited to 'lisp/calendar/diary-lib.el')
| -rw-r--r-- | lisp/calendar/diary-lib.el | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index 45df0c6259c..48dbf33adff 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el @@ -1,7 +1,6 @@ ;;; diary-lib.el --- diary functions -*- lexical-binding:t -*- -;; Copyright (C) 1989-1990, 1992-1995, 2001-2022 Free Software -;; Foundation, Inc. +;; Copyright (C) 1989-2022 Free Software Foundation, Inc. ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu> ;; Maintainer: emacs-devel@gnu.org @@ -2246,12 +2245,10 @@ Prefix argument ARG makes the entry nonmarking." ;; Return value suitable for `write-contents-functions'. nil) -(defvar diary-mode-map - (let ((map (make-sparse-keymap))) - (define-key map "\C-c\C-s" 'diary-show-all-entries) - (define-key map "\C-c\C-q" 'quit-window) - map) - "Keymap for `diary-mode'.") +(defvar-keymap diary-mode-map + :doc "Keymap for `diary-mode'." + "C-c C-s" #'diary-show-all-entries + "C-c C-q" #'quit-window) (defun diary-font-lock-sexps (limit) "Recognize sexp diary entry up to LIMIT for font-locking." |