Mercurial > emacs
comparison lisp/calendar/cal-menu.el @ 7713:44a712d8ba03
(calendar-mode-map): Define mouse-2 as ignore.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 28 May 1994 04:27:04 +0000 |
parents | ca650a2739ba |
children | ca955be67b4f |
comparison
equal
deleted
inserted
replaced
7712:d15b6dd3bc2e | 7713:44a712d8ba03 |
---|---|
35 ;; Urbana, Illinois 61801 | 35 ;; Urbana, Illinois 61801 |
36 | 36 |
37 ;;; Code: | 37 ;;; Code: |
38 | 38 |
39 (define-key calendar-mode-map [down-mouse-2] 'calendar-mouse-2-date-menu) | 39 (define-key calendar-mode-map [down-mouse-2] 'calendar-mouse-2-date-menu) |
40 (define-key calendar-mode-map [mouse-2] 'ignore) | |
40 | 41 |
41 (defvar calendar-mouse-3-map (make-sparse-keymap "Calendar")) | 42 (defvar calendar-mouse-3-map (make-sparse-keymap "Calendar")) |
42 (define-key calendar-mode-map [down-mouse-3] calendar-mouse-3-map) | 43 (define-key calendar-mode-map [down-mouse-3] calendar-mouse-3-map) |
43 | 44 |
44 (define-key calendar-mode-map [menu-bar moon] | 45 (define-key calendar-mode-map [menu-bar moon] |