mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
Use 'esh-module-autoload' for Eshell modules' defgroups
This will let modules define their own, regular autoloads, independent of the core Eshell machinery for defining modules. * lisp/eshell/em-alias.el (em-alias): * lisp/eshell/em-banner.el (em-banner): * lisp/eshell/em-basic.el (em-basic): * lisp/eshell/em-cmpl.el (em-cmpl): * lisp/eshell/em-dirs.el (em-dirs): * lisp/eshell/em-elecslash.el (em-elecslash): * lisp/eshell/em-extpipe.el: * lisp/eshell/em-glob.el (em-glob): * lisp/eshell/em-hist.el (em-hist): * lisp/eshell/em-ls.el (em-ls): * lisp/eshell/em-pred.el (em-pred): * lisp/eshell/em-prompt.el (em-prompt): * lisp/eshell/em-rebind.el (em-rebind): * lisp/eshell/em-script.el (em-script): * lisp/eshell/em-smart.el (em-smart): * lisp/eshell/em-term.el (em-term): * lisp/eshell/em-tramp.el (em-tramp): * lisp/eshell/em-unix.el (em-unix): * lisp/eshell/em-xtra.el (em-xtra): Use 'esh-module-autoload'. * lisp/eshell/esh-module.el ("esh-module-loaddefs"): Load this instead of "esh-groups". * .gitignore: Change esh-groups.el to esh-module-loaddefs.el
This commit is contained in:
parent
6c2f21e4a6
commit
4c924a5333
2
.gitignore
vendored
2
.gitignore
vendored
@ -128,7 +128,7 @@ lisp/cedet/semantic/wisent/js-wy.el
|
||||
lisp/cedet/semantic/wisent/python-wy.el
|
||||
lisp/cedet/srecode/srt-wy.el
|
||||
lisp/cedet/semantic/grammar-wy.el
|
||||
lisp/eshell/esh-groups.el
|
||||
lisp/eshell/esh-module-loaddefs.el
|
||||
lisp/finder-inf.el
|
||||
lisp/leim/ja-dic/
|
||||
leim/small-ja-dic-option
|
||||
|
@ -92,7 +92,7 @@
|
||||
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-alias nil
|
||||
"Command aliases allow for easy definition of alternate commands."
|
||||
@ -268,9 +268,4 @@ These are all the command aliases which begin with NAME."
|
||||
(eshell-parse-command alias))))))))))
|
||||
|
||||
(provide 'em-alias)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-alias.el ends here
|
||||
|
@ -44,7 +44,7 @@
|
||||
(require 'esh-util)
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-banner nil
|
||||
"This sample module displays a welcome banner at login.
|
||||
@ -82,9 +82,4 @@ This can be any sexp, and should end with at least two newlines."
|
||||
(eshell-interactive-print msg))))
|
||||
|
||||
(provide 'em-banner)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-banner.el ends here
|
||||
|
@ -58,7 +58,7 @@
|
||||
(require 'esh-opt)
|
||||
(require 'esh-util)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-basic nil
|
||||
"The \"basic\" code provides a set of convenience functions which
|
||||
@ -225,9 +225,4 @@ are:
|
||||
(while (pcomplete-here '("error" "form" "process"))))
|
||||
|
||||
(provide 'em-basic)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-basic.el ends here
|
||||
|
@ -76,7 +76,7 @@
|
||||
|
||||
(eval-when-compile (require 'cl-lib))
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-cmpl nil
|
||||
"This module provides a programmable completion function bound to
|
||||
@ -518,9 +518,4 @@ to writing a completion function."
|
||||
(define-obsolete-function-alias 'eshell-pcomplete #'completion-at-point "27.1")
|
||||
|
||||
(provide 'em-cmpl)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-cmpl.el ends here
|
||||
|
@ -47,7 +47,7 @@
|
||||
(require 'ring)
|
||||
(require 'esh-opt)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-dirs nil
|
||||
"Directory navigation involves changing directories, examining the
|
||||
@ -599,9 +599,4 @@ in the minibuffer:
|
||||
'no-message))))))))
|
||||
|
||||
(provide 'em-dirs)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-dirs.el ends here
|
||||
|
@ -32,7 +32,7 @@
|
||||
(require 'esh-mode)
|
||||
|
||||
;; This makes us an option when customizing `eshell-modules-list'.
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-elecslash nil
|
||||
"Electric forward slash in remote Eshells.
|
||||
@ -108,9 +108,4 @@ insertion."
|
||||
(insert "/")))))
|
||||
|
||||
(provide 'em-elecslash)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; esh-elecslash.el ends here
|
||||
|
@ -36,7 +36,7 @@
|
||||
|
||||
(eval-when-compile (require 'files-x))
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-extpipe nil
|
||||
"Native shell pipelines.
|
||||
|
@ -53,7 +53,7 @@
|
||||
(require 'esh-module)
|
||||
(require 'esh-util)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-glob nil
|
||||
"This module provides extended globbing syntax, similar what is used
|
||||
@ -417,9 +417,4 @@ directories and files."
|
||||
(eshell-glob-entries rdir globs only-dirs)))))
|
||||
|
||||
(provide 'em-glob)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-glob.el ends here
|
||||
|
@ -60,7 +60,7 @@
|
||||
(require 'esh-opt)
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-hist nil
|
||||
"This module provides command history management."
|
||||
@ -1067,9 +1067,4 @@ If N is negative, search backwards for the -Nth previous match."
|
||||
(remove-hook 'kill-emacs-hook 'eshell-save-some-history))
|
||||
|
||||
(provide 'em-hist)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-hist.el ends here
|
||||
|
@ -32,7 +32,7 @@
|
||||
(require 'esh-proc)
|
||||
(require 'esh-cmd)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-ls nil
|
||||
"This module implements the \"ls\" utility fully in Lisp.
|
||||
@ -956,9 +956,4 @@ to use, and each member of which is the width of that column
|
||||
(eshell-ls-disable-in-dired))
|
||||
|
||||
(provide 'em-ls)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-ls.el ends here
|
||||
|
@ -48,7 +48,7 @@
|
||||
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-pred nil
|
||||
"This module allows for predicates to be applied to globbing
|
||||
@ -576,9 +576,4 @@ If INVERT-P is non-nil, include only members not matching a regexp."
|
||||
lst))))
|
||||
|
||||
(provide 'em-pred)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-pred.el ends here
|
||||
|
@ -29,7 +29,7 @@
|
||||
(require 'esh-mode)
|
||||
(require 'text-property-search)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-prompt nil
|
||||
"This module provides command prompts, and navigation between them,
|
||||
@ -231,9 +231,4 @@ first (see `move-beginning-of-line' for more information)."
|
||||
(move-beginning-of-line arg)))
|
||||
|
||||
(provide 'em-prompt)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-prompt.el ends here
|
||||
|
@ -25,7 +25,7 @@
|
||||
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-rebind nil
|
||||
"This module allows for special keybindings that only take effect
|
||||
@ -250,9 +250,4 @@ input."
|
||||
(eshell-delete-backward-char (- arg)))))
|
||||
|
||||
(provide 'em-rebind)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-rebind.el ends here
|
||||
|
@ -25,7 +25,7 @@
|
||||
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-script nil
|
||||
"This module allows for the execution of files containing Eshell
|
||||
@ -115,9 +115,4 @@ Comments begin with `#'."
|
||||
(put 'eshell/. 'eshell-no-numeric-conversions t)
|
||||
|
||||
(provide 'em-script)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-script.el ends here
|
||||
|
@ -70,7 +70,7 @@
|
||||
|
||||
(require 'esh-mode)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-smart nil
|
||||
"This module combines the facility of normal, modern shells with
|
||||
@ -303,9 +303,4 @@ and the end of the buffer are still visible."
|
||||
(remove-hook 'window-configuration-change-hook #'eshell-smart-scroll))
|
||||
|
||||
(provide 'em-smart)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-smart.el ends here
|
||||
|
@ -36,7 +36,7 @@
|
||||
(require 'esh-ext)
|
||||
(require 'term)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-term nil
|
||||
"This module causes visual commands (e.g., `vi') to be executed by
|
||||
@ -330,9 +330,4 @@ the buffer."
|
||||
; (use-local-map term-old-mode-map))
|
||||
|
||||
(provide 'em-term)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-term.el ends here
|
||||
|
@ -35,7 +35,7 @@
|
||||
|
||||
;; There are no items in this custom group, but eshell modules (ab)use
|
||||
;; custom groups.
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-tramp nil
|
||||
"This module defines commands that use Tramp in a way that is
|
||||
@ -152,9 +152,4 @@ Execute a COMMAND as the superuser or another USER.")
|
||||
(put 'eshell/doas 'eshell-no-numeric-conversions t)
|
||||
|
||||
(provide 'em-tramp)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-tramp.el ends here
|
||||
|
@ -38,7 +38,7 @@
|
||||
(require 'esh-mode)
|
||||
(require 'pcomplete)
|
||||
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-unix nil
|
||||
"This module defines many of the more common UNIX utilities as
|
||||
@ -1096,9 +1096,4 @@ Show wall-clock time elapsed during execution of COMMAND.")
|
||||
(define-obsolete-function-alias 'eshell-diff-quit #'ignore "30.1")
|
||||
|
||||
(provide 'em-unix)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-unix.el ends here
|
||||
|
@ -28,7 +28,7 @@
|
||||
|
||||
;; There are no items in this custom group, but eshell modules (ab)use
|
||||
;; custom groups.
|
||||
;;;###autoload
|
||||
;;;###esh-module-autoload
|
||||
(progn
|
||||
(defgroup eshell-xtra nil
|
||||
"This module defines some extra alias functions which are entirely
|
||||
@ -85,9 +85,4 @@ naturally accessible within Emacs."
|
||||
(defalias 'eshell/gf #'find-grep-dired)
|
||||
|
||||
(provide 'em-xtra)
|
||||
|
||||
;; Local Variables:
|
||||
;; generated-autoload-file: "esh-groups.el"
|
||||
;; End:
|
||||
|
||||
;;; em-xtra.el ends here
|
||||
|
@ -38,7 +38,7 @@ customizing the variable `eshell-modules-list'."
|
||||
;; `eshell-modules-list'. We use "(progn (defgroup ..." in each file
|
||||
;; to force the autoloader into including the entire defgroup, rather
|
||||
;; than an abbreviated version.
|
||||
(load "esh-groups" nil 'nomessage)
|
||||
(load "esh-module-loaddefs" nil 'nomessage)
|
||||
|
||||
;;; User Variables:
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user