![]() ![]() " ) 65 'make-tab ) ) ) 66 67 record recently used major modes 68 69 ( defvar aquamacs-recent-major-modes ( ) 70 " Recently used major modes. " ) ) 62 ( define-key-after menu-bar-file-menu 63 ( list 'menu-item " New Buffer in Mode " menu-bar-new-file-menu 64 :help " Create a new buffer with a specific major mode. " 45 ( if ( consp list ) 46 ( let ( ( res nil ) ) 47 ( while ( consp list ) ( push ( pop list ) res ) ) 48 ( prog1 ( nreverse res ) ( setcdr res list ) ) ) 49 ( car list ) ) ) 50 51 ( defun aq-concat-symbol ( sym1 sym2 ) 52 ( intern ( concat ( if ( stringp sym1 ) sym1 ( symbol-name sym1 ) ) 53 ( if ( stringp sym2 ) sym2 ( symbol-name sym2 ) ) ) ) ) 54 55 ( defvar menu-bar-new-file-menu nil ) 56 ( defun aquamacs-update-new-file-menu ( ) 57 ( protect 58 ( setq menu-bar-new-file-menu 59 ( aquamacs-define-mode-menu ( make-sparse-keymap " New Buffer in Mode " ) 60 'aquamacs-menu-new-empty-buffer-in-mode 61 " Create a new buffer in `%s' mode. 32 33 Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010, 2011 David Reitter 34 35 36 ( require 'easymenu ) 37 38 39 40 ( eval-when-compile ( require 'aquamacs-macros ) ) 41 42 ( defun aq-copy-list ( list ) 43 " Return a copy of LIST, which may be a dotted list.Ĥ4 The elements of LIST are not copied, just the list structure itself. If not, write to the 30 Free Software Foundation, Inc., 59 Temple Place - Suite 330, 31 Boston, MA 02111-1307, USA. 27 28 You should have received a copy of the GNU General Public License 29 along with GNU Emacs see the file COPYING. See the 26 GNU General Public License for more details. 22 23 Aquamacs is distributed in the hope that it will be useful, 24 but WITHOUT ANY WARRANTY without even the implied warranty of 25 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 17 Apart from that, released under the GPL: 18 Aquamacs is free software you can redistribute it and/or modify 19 it under the terms of the GNU General Public License as published by 20 the Free Software Foundation either version 3, or (at your option) 21 any later version. 15 Attribution must be given in application About dialog or similar, 16 "Contains Aquamacs Menu by D Reitter" does the job. Large files files are truncated, but you can click here to view the full file 1 -*-mode:emacs-lisp coding: utf-8 -*-' 2 3 utf-8-emacs 4 aquamacs-menu 5 redefines and modifies the menu bar 6 7 Author: David Reitter, 8 Maintainer: David Reitter 9 Keywords: aquamacs 10 11 This file is part of Aquamacs Emacs 12 13 14 Attribution: Leave this header intact in case you redistribute this file.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |