diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-12-05 07:03:18 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-12-05 07:03:18 +0000 |
| commit | dbba8a04c9c73ad7a8b74e716a9126ee3333fc08 (patch) | |
| tree | 1f93769ecc38b19d6598d8f2225f3c67937abd57 /lisp/eshell/em-cmpl.el | |
| parent | 20d7538ee8ef3991d3b4d4684d332d4efa1f6f1c (diff) | |
| download | emacs-dbba8a04c9c73ad7a8b74e716a9126ee3333fc08.tar.gz emacs-dbba8a04c9c73ad7a8b74e716a9126ee3333fc08.tar.bz2 emacs-dbba8a04c9c73ad7a8b74e716a9126ee3333fc08.zip | |
Require individual files if needed when compiling, rather than
esh-maint. Collect any require statements. Move provide statement to
end. Move any commentary to start.
Diffstat (limited to 'lisp/eshell/em-cmpl.el')
| -rw-r--r-- | lisp/eshell/em-cmpl.el | 27 |
1 files changed, 14 insertions, 13 deletions
diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index 8672885cc60..b5f666a6bf6 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el @@ -22,18 +22,6 @@ ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ;; Boston, MA 02110-1301, USA. -(provide 'em-cmpl) - -(eval-when-compile (require 'esh-maint)) -(require 'esh-util) - -(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." - :tag "Argument completion" - :group 'eshell-module) - ;;; Commentary: ;; Eshell, by using the pcomplete package, provides a full @@ -82,6 +70,19 @@ variable names, arguments, etc." ;; This only works well if the completion function has provided Eshell ;; with sufficient pointers to locate the relevant help text. +;;; Code: + +(eval-when-compile + (require 'eshell)) +(require 'esh-util) + +(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." + :tag "Argument completion" + :group 'eshell-module) + ;;; User Variables: (defcustom eshell-cmpl-load-hook '(eshell-cmpl-initialize) @@ -448,7 +449,7 @@ to writing a completion function." (all-completions filename obarray 'functionp)) completions))))))) -;;; Code: +(provide 'em-cmpl) ;;; arch-tag: 0e914699-673a-45f8-8cbf-82e1dbc571bc ;;; em-cmpl.el ends here |