Mercurial > emacs

comparison lisp/calendar/cal-menu.el @ 60980:794bc6a34084

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update copyright. (top level): Delete local C-down-mouse-3 binding. Suggested by Stephan Stahl <stahl@eos.franken.de>.
author Glenn Morris <rgm@gnu.org>
date Sat, 26 Mar 2005 15:54:29 +0000
parents 670acab99124
children ffc19ed45d7f 4da4a09e8b1b
comparison
equal deleted inserted replaced
60979:2a96c49243d2 60980:794bc6a34084
1 ;;; cal-menu.el --- calendar functions for menu bar and popup menu support 1 ;;; cal-menu.el --- calendar functions for menu bar and popup menu support
2 2
3 ;; Copyright (C) 1994, 1995, 2001, 2003, 2004 Free Software Foundation, Inc. 3 ;; Copyright (C) 1994, 1995, 2001, 2003, 2004, 2005 Free Software Foundation, Inc.
4 4
5 ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu> 5 ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
6 ;; Lara Rios <lrios@coewl.cen.uiuc.edu> 6 ;; Lara Rios <lrios@coewl.cen.uiuc.edu>
7 ;; Maintainer: Glenn Morris <gmorris@ast.cam.ac.uk> 7 ;; Maintainer: Glenn Morris <gmorris@ast.cam.ac.uk>
8 ;; Keywords: calendar 8 ;; Keywords: calendar
50 (define-key calendar-mode-map [down-mouse-2] 'calendar-mouse-2-date-menu) 50 (define-key calendar-mode-map [down-mouse-2] 'calendar-mouse-2-date-menu)
51 (define-key calendar-mode-map [mouse-2] 'ignore) 51 (define-key calendar-mode-map [mouse-2] 'ignore)
52 52
53 (defvar calendar-mouse-3-map (make-sparse-keymap "Calendar")) 53 (defvar calendar-mouse-3-map (make-sparse-keymap "Calendar"))
54 (define-key calendar-mode-map [down-mouse-3] calendar-mouse-3-map) 54 (define-key calendar-mode-map [down-mouse-3] calendar-mouse-3-map)
55 (define-key calendar-mode-map [C-down-mouse-3] calendar-mouse-3-map)
56 55
57 (define-key calendar-mode-map [menu-bar moon] 56 (define-key calendar-mode-map [menu-bar moon]
58 (cons "Moon" (make-sparse-keymap "Moon"))) 57 (cons "Moon" (make-sparse-keymap "Moon")))
59 58
60 (define-key calendar-mode-map [menu-bar moon moon] 59 (define-key calendar-mode-map [menu-bar moon moon]