Mercurial > hg > xemacs-beta

comparison lisp/utils/easymenu.el @ 70:131b0175ea99 r20-0b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents bcdc7deadc19
children c7528f8e288d
comparison
equal deleted inserted replaced
69:804d1389bcd6 70:131b0175ea99
1 ;;; easymenu.el - Easy menu support for Emacs 19 and XEmacs. 1 ;;; easymenu.el - Easy menu support for Emacs 19 and XEmacs.
2 ;; 2 ;;
3 ;; $Id: easymenu.el,v 1.2 1997/01/04 21:20:12 steve Exp $ 3 ;; $Id: easymenu.el,v 1.1.1.1 1996/12/18 22:43:01 steve Exp $
4 ;; 4 ;;
5 ;; LCD Archive Entry: 5 ;; LCD Archive Entry:
6 ;; easymenu|Per Abrahamsen|abraham@iesd.auc.dk| 6 ;; easymenu|Per Abrahamsen|abraham@iesd.auc.dk|
7 ;; Easy menu support for XEmacs| 7 ;; Easy menu support for XEmacs|
8 ;; $Date: 1997/01/04 21:20:12 $|$Revision: 1.2 $|~/misc/easymenu.el.gz| 8 ;; $Date: 1996/12/18 22:43:01 $|$Revision: 1.1.1.1 $|~/misc/easymenu.el.gz|
9 9
10 ;; Copyright (C) 1992, 1993, 1994, 1995 Free Software Foundation, Inc. 10 ;; Copyright (C) 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
11 11 ;;
12 ;; This file is part of XEmacs. 12 ;; This program is free software; you can redistribute it and/or modify
13 13 ;; it under the terms of the GNU General Public License as published by
14 ;; XEmacs is free software; you can redistribute it and/or modify it
15 ;; under the terms of the GNU General Public License as published by
16 ;; the Free Software Foundation; either version 2, or (at your option) 14 ;; the Free Software Foundation; either version 2, or (at your option)
17 ;; any later version. 15 ;; any later version.
18 16 ;;
19 ;; XEmacs is distributed in the hope that it will be useful, but 17 ;; This program is distributed in the hope that it will be useful,
20 ;; WITHOUT ANY WARRANTY; without even the implied warranty of 18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 ;; General Public License for more details. 20 ;; GNU General Public License for more details.
23 21 ;;
24 ;; You should have received a copy of the GNU General Public License 22 ;; You should have received a copy of the GNU General Public License
25 ;; along with XEmacs; if not, write to the Free Software 23 ;; along with this program; if not, write to the Free Software
26 ;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 24 ;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 ;; 02111-1307, USA.
28 25
29 ;;; Synched up with: Not synched with FSF. 26 ;;; Synched up with: Not synched with FSF.
30 ;;; In RMS's typical lame-ass way, he removed all support for 27 ;;; In RMS's typical lame-ass way, he removed all support for
31 ;;; what he calls "other Emacs versions" from the version of 28 ;;; what he calls "other Emacs versions" from the version of
32 ;;; easymenu.el included in FSF. He also incorrectly claims 29 ;;; easymenu.el included in FSF. He also incorrectly claims
55 ;; 52 ;;
56 ;; See the documentation for easy-menu-define for details. 53 ;; See the documentation for easy-menu-define for details.
57 ;; 54 ;;
58 ;; - Function: easy-menu-change PATH NAME ITEMS 55 ;; - Function: easy-menu-change PATH NAME ITEMS
59 ;; Change an existing menu. 56 ;; Change an existing menu.
60 ;; The menu must already exist an be visible on the menu bar. 57 ;; The menu must already exist and be visible on the menu bar.
61 ;; PATH is a list of strings used for locating the menu on the menu bar. 58 ;; PATH is a list of strings used for locating the menu on the menu bar.
62 ;; NAME is the name of the menu. 59 ;; NAME is the name of the menu.
63 ;; ITEMS is a list of menu items, as defined in `easy-menu-define'. 60 ;; ITEMS is a list of menu items, as defined in `easy-menu-define'.
64 ;; 61 ;;
65 ;; - Function: easy-menu-add MENU [ MAP ] 62 ;; - Function: easy-menu-add MENU [ MAP ]