From 3146b070694db4a74b3319f474016a351ebb0805 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 21 May 2008 03:51:08 +0000 Subject: [PATCH] Use eshell-defgroup rather than defgroup. Autoload the custom group. Set generated-autoload-file. --- lisp/eshell/em-alias.el | 11 ++++++++--- lisp/eshell/em-banner.el | 11 ++++++++--- lisp/eshell/em-cmpl.el | 11 ++++++++--- lisp/eshell/em-dirs.el | 11 ++++++++--- lisp/eshell/em-glob.el | 11 ++++++++--- lisp/eshell/em-hist.el | 11 ++++++++--- lisp/eshell/em-ls.el | 11 ++++++++--- lisp/eshell/em-pred.el | 11 ++++++++--- lisp/eshell/em-prompt.el | 11 ++++++++--- lisp/eshell/em-rebind.el | 11 ++++++++--- lisp/eshell/em-script.el | 11 ++++++++--- lisp/eshell/em-smart.el | 11 ++++++++--- lisp/eshell/em-term.el | 11 ++++++++--- lisp/eshell/em-unix.el | 11 ++++++++--- lisp/eshell/em-xtra.el | 11 ++++++++--- 15 files changed, 120 insertions(+), 45 deletions(-) diff --git a/lisp/eshell/em-alias.el b/lisp/eshell/em-alias.el index 58c6d84bb4e..2099828089a 100644 --- a/lisp/eshell/em-alias.el +++ b/lisp/eshell/em-alias.el @@ -1,7 +1,7 @@ ;;; em-alias.el --- creation and management of command aliases -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -95,7 +95,8 @@ (require 'esh-util)) (require 'eshell) -(defgroup eshell-alias nil +;;;###autoload +(eshell-defgroup eshell-alias nil "Command aliases allow for easy definition of alternate commands." :tag "Command aliases" ;; :link '(info-link "(eshell)Command aliases") @@ -274,5 +275,9 @@ These are all the command aliases which begin with NAME." (provide 'em-alias) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 8b018fc1-4e07-4ccc-aa73-c0a1ba361f82 ;;; em-alias.el ends here diff --git a/lisp/eshell/em-banner.el b/lisp/eshell/em-banner.el index abd02dbd4cb..43d665f8334 100644 --- a/lisp/eshell/em-banner.el +++ b/lisp/eshell/em-banner.el @@ -1,7 +1,7 @@ ;;; em-banner.el --- sample module that displays a login banner -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -46,7 +46,8 @@ (require 'esh-util) -(defgroup eshell-banner nil +;;;###autoload +(eshell-defgroup eshell-banner nil "This sample module displays a welcome banner at login. It exists so that others wishing to create their own Eshell extension modules may have a simple template to begin with." @@ -91,5 +92,9 @@ This can be any sexp, and should end with at least two newlines." (provide 'em-banner) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: e738b4ef-8671-42ae-a757-291779b92491 ;;; em-banner.el ends here diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index 0451c379ac2..a5dfe1424c9 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el @@ -1,7 +1,7 @@ ;;; em-cmpl.el --- completion using the TAB key -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -74,7 +74,8 @@ (require 'eshell)) (require 'esh-util) -(defgroup eshell-cmpl nil +;;;###autoload +(eshell-defgroup eshell-cmpl nil "This module provides a programmable completion function bound to the TAB key, which allows for completing command names, file names, variable names, arguments, etc." @@ -449,5 +450,9 @@ to writing a completion function." (provide 'em-cmpl) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 0e914699-673a-45f8-8cbf-82e1dbc571bc ;;; em-cmpl.el ends here diff --git a/lisp/eshell/em-dirs.el b/lisp/eshell/em-dirs.el index eab063219da..9977cd0c35c 100644 --- a/lisp/eshell/em-dirs.el +++ b/lisp/eshell/em-dirs.el @@ -1,7 +1,7 @@ ;;; em-dirs.el --- directory navigation commands -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -47,7 +47,8 @@ (require 'ring) (require 'esh-opt) -(defgroup eshell-dirs nil +;;;###autoload +(eshell-defgroup eshell-dirs nil "Directory navigation involves changing directories, examining the current directory, maintaining a directory stack, and also keeping track of a history of the last directory locations the user was in. @@ -564,5 +565,9 @@ in the minibuffer: (provide 'em-dirs) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 1e9c5a95-f1bd-45f8-ad36-55aac706e787 ;;; em-dirs.el ends here diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el index 27fab9afe60..319e2b4057d 100644 --- a/lisp/eshell/em-glob.el +++ b/lisp/eshell/em-glob.el @@ -1,7 +1,7 @@ ;;; em-glob.el --- extended file name globbing -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -53,7 +53,8 @@ (eval-when-compile (require 'eshell)) (require 'esh-util) -(defgroup eshell-glob nil +;;;###autoload +(eshell-defgroup eshell-glob nil "This module provides extended globbing syntax, similar what is used by zsh for filename generation." :tag "Extended filename globbing" @@ -354,5 +355,9 @@ the form: (provide 'em-glob) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: d0548f54-fb7c-4978-a88e-f7c26f7f68ca ;;; em-glob.el ends here diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index bc50cedc53e..b9913336547 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el @@ -1,7 +1,7 @@ ;;; em-hist.el --- history list management -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -60,7 +60,8 @@ (require 'em-pred) (require 'eshell) -(defgroup eshell-hist nil +;;;###autoload +(eshell-defgroup eshell-hist nil "This module provides command history management." :tag "History list management" :group 'eshell-module) @@ -984,5 +985,9 @@ If N is negative, search backwards for the -Nth previous match." (provide 'em-hist) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 1a847333-f864-4b96-9acd-b549d620b6c6 ;;; em-hist.el ends here diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el index 905b2547bbf..4d9bea58cef 100644 --- a/lisp/eshell/em-ls.el +++ b/lisp/eshell/em-ls.el @@ -1,7 +1,7 @@ ;;; em-ls.el --- implementation of ls in Lisp -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -31,7 +31,8 @@ (require 'esh-util) (require 'esh-opt) -(defgroup eshell-ls nil +;;;###autoload +(eshell-defgroup eshell-ls nil "This module implements the \"ls\" utility fully in Lisp. If it is passed any unrecognized command switches, it will revert to the operating system's version. This version of \"ls\" uses text @@ -921,5 +922,9 @@ to use, and each member of which is the width of that column (provide 'em-ls) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 9295181c-0cb2-499c-999b-89f5359842cb ;;; em-ls.el ends here diff --git a/lisp/eshell/em-pred.el b/lisp/eshell/em-pred.el index c594a91649a..f2b5d7b6a56 100644 --- a/lisp/eshell/em-pred.el +++ b/lisp/eshell/em-pred.el @@ -1,7 +1,7 @@ ;;; em-pred.el --- argument predicates and modifiers (ala zsh) -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -49,7 +49,8 @@ (eval-when-compile (require 'eshell)) -(defgroup eshell-pred nil +;;;###autoload +(eshell-defgroup eshell-pred nil "This module allows for predicates to be applied to globbing patterns (similar to zsh), in addition to string modifiers which can be applied either to globbing results, variable references, or just @@ -600,5 +601,9 @@ that 'ls -l' will show in the first column of its display. " (provide 'em-pred) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 8b5ce022-17f3-4c40-93c7-5faafaa63f31 ;;; em-pred.el ends here diff --git a/lisp/eshell/em-prompt.el b/lisp/eshell/em-prompt.el index bad8b782b6e..d063feac206 100644 --- a/lisp/eshell/em-prompt.el +++ b/lisp/eshell/em-prompt.el @@ -1,7 +1,7 @@ ;;; em-prompt.el --- command prompts -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -29,7 +29,8 @@ (eval-when-compile (require 'eshell)) -(defgroup eshell-prompt nil +;;;###autoload +(eshell-defgroup eshell-prompt nil "This module provides command prompts, and navigation between them, as is common with most shells." :tag "Command prompts" @@ -173,5 +174,9 @@ If this takes us past the end of the current line, don't skip at all." (provide 'em-prompt) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 01c1574b-ce70-4e89-bc38-e6619f61e208 ;;; em-prompt.el ends here diff --git a/lisp/eshell/em-rebind.el b/lisp/eshell/em-rebind.el index c580f549317..064eb08bb66 100644 --- a/lisp/eshell/em-rebind.el +++ b/lisp/eshell/em-rebind.el @@ -1,7 +1,7 @@ ;;; em-rebind.el --- rebind keys when point is at current input -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -26,7 +26,8 @@ (eval-when-compile (require 'eshell)) -(defgroup eshell-rebind nil +;;;###autoload +(eshell-defgroup eshell-rebind nil "This module allows for special keybindings that only take effect while the point is in a region of input text. By default, it binds C-a to move to the beginning of the input text (rather than just the @@ -242,5 +243,9 @@ input." (provide 'em-rebind) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 76d84f12-cc56-4d67-9b7d-c6b44ad20530 ;;; em-rebind.el ends here diff --git a/lisp/eshell/em-script.el b/lisp/eshell/em-script.el index c3f3f60e65f..78ec6c009f2 100644 --- a/lisp/eshell/em-script.el +++ b/lisp/eshell/em-script.el @@ -1,7 +1,7 @@ ;;; em-script.el --- Eshell script files -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -26,7 +26,8 @@ (require 'eshell) -(defgroup eshell-script nil +;;;###autoload +(eshell-defgroup eshell-script nil "This module allows for the execution of files containing Eshell commands, as a script file." :tag "Running script files." @@ -135,5 +136,9 @@ environment, binding ARGS to $1, $2, etc.") (provide 'em-script) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: a346439d-5ba8-4faf-ac2b-3aacfeaa4647 ;;; em-script.el ends here diff --git a/lisp/eshell/em-smart.el b/lisp/eshell/em-smart.el index bc844215d16..c8a902a739c 100644 --- a/lisp/eshell/em-smart.el +++ b/lisp/eshell/em-smart.el @@ -1,7 +1,7 @@ ;;; em-smart.el --- smart display of output -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -71,7 +71,8 @@ (eval-when-compile (require 'eshell)) -(defgroup eshell-smart nil +;;;###autoload +(eshell-defgroup eshell-smart nil "This module combines the facility of normal, modern shells with some of the edit/review concepts inherent in the design of Plan 9's 9term. See the docs for more details. @@ -322,5 +323,9 @@ and the end of the buffer are still visible." (provide 'em-smart) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 8c0112c7-379c-4d54-9a1c-204d68786a4b ;;; em-smart.el ends here diff --git a/lisp/eshell/em-term.el b/lisp/eshell/em-term.el index 5798c34d952..d50297083db 100644 --- a/lisp/eshell/em-term.el +++ b/lisp/eshell/em-term.el @@ -1,7 +1,7 @@ ;;; em-term.el --- running visual commands -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -35,7 +35,8 @@ (eval-when-compile (require 'eshell)) (require 'term) -(defgroup eshell-term nil +;;;###autoload +(eshell-defgroup eshell-term nil "This module causes visual commands (e.g., 'vi') to be executed by the `term' package, which comes with Emacs. This package handles most of the ANSI control codes, allowing curses-based applications to run @@ -263,5 +264,9 @@ allowed." (provide 'em-term) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: ab7c8fe4-3101-4257-925b-1354c6b2fe9d ;;; em-term.el ends here diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el index 9a30fda6b89..6d8515bc22c 100644 --- a/lisp/eshell/em-unix.el +++ b/lisp/eshell/em-unix.el @@ -1,7 +1,7 @@ ;;; em-unix.el --- UNIX command aliases -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -38,7 +38,8 @@ (require 'eshell) -(defgroup eshell-unix nil +;;;###autoload +(eshell-defgroup eshell-unix nil "This module defines many of the more common UNIX utilities as aliases implemented in Lisp. These include mv, ln, cp, rm, etc. If the user passes arguments which are too complex, or are unrecognized @@ -1047,5 +1048,9 @@ Show wall-clock time elapsed during execution of COMMAND.") (provide 'em-unix) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: 2462edd2-a76a-4cf2-897d-92e9a82ac1c9 ;;; em-unix.el ends here diff --git a/lisp/eshell/em-xtra.el b/lisp/eshell/em-xtra.el index b3c3d1b43a8..c9b2e051d51 100644 --- a/lisp/eshell/em-xtra.el +++ b/lisp/eshell/em-xtra.el @@ -1,7 +1,7 @@ ;;; em-xtra.el --- extra alias functions -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: John Wiegley @@ -29,7 +29,8 @@ (require 'pcomplete)) (require 'compile) -(defgroup eshell-xtra nil +;;;###autoload +(eshell-defgroup eshell-xtra nil "This module defines some extra alias functions which are entirely optional. They can be viewed as samples for how to write Eshell alias functions, or as aliases which make some of Emacs' behavior more @@ -118,5 +119,9 @@ naturally accessible within Emacs." (provide 'em-xtra) +;; Local Variables: +;; generated-autoload-file: "esh-groups.el" +;; End: + ;; arch-tag: f944cfda-a118-470c-a0d6-b41a3a5c99c7 ;;; em-xtra.el ends here