Require individual files if needed when compiling, rather than

esh-maint.  Collect any require statements.  Leave provide at start.
Move any commentary to start.
This commit is contained in:
Glenn Morris 2007-12-05 07:08:55 +00:00
parent 5477308bb2
commit 4e6cc05cc9
4 changed files with 28 additions and 26 deletions

View file

@ -22,17 +22,6 @@
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
(provide 'esh-ext)
(eval-when-compile (require 'esh-maint))
(require 'esh-util)
(defgroup eshell-ext nil
"External commands are invoked when operating system executables are
loaded into memory, thus beginning a new process."
:tag "External commands"
:group 'eshell)
;;; Commentary:
;; To force a command to invoked external, either provide an explicit
@ -43,6 +32,18 @@ loaded into memory, thus beginning a new process."
;; /bin/grep ; will definitely invoke /bin/grep
;; *grep ; will also invoke /bin/grep
(provide 'esh-ext)
(eval-when-compile
(require 'esh-cmd))
(require 'esh-util)
(defgroup eshell-ext nil
"External commands are invoked when operating system executables are
loaded into memory, thus beginning a new process."
:tag "External commands"
:group 'eshell)
;;; User Variables:
(defcustom eshell-ext-load-hook '(eshell-ext-initialize)

View file

@ -22,15 +22,6 @@
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
(provide 'esh-mode)
(eval-when-compile (require 'esh-maint))
(defgroup eshell-mode nil
"This module contains code for handling input from the user."
:tag "User interface"
:group 'eshell)
;;; Commentary:
;; Basically, Eshell is used just like shell mode (<M-x shell>). The
@ -68,11 +59,19 @@
;;
;; @ <C-c C-b> will move backward a complete shell argument.
(provide 'esh-mode)
(eval-when-compile (require 'esh-util))
(require 'esh-module)
(require 'esh-cmd)
(require 'esh-io)
(require 'esh-var)
(defgroup eshell-mode nil
"This module contains code for handling input from the user."
:tag "User interface"
:group 'eshell)
;;; User Variables:
(defcustom eshell-mode-unload-hook nil

View file

@ -22,9 +22,11 @@
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
;;; Commentary:
(provide 'esh-opt)
(eval-when-compile (require 'esh-maint))
(eval-when-compile (require 'esh-ext))
(defgroup eshell-opt nil
"The options processing code handles command argument parsing for
@ -32,8 +34,6 @@ Eshell commands implemented in Lisp."
:tag "Command options processing"
:group 'eshell)
;;; Commentary:
;;; User Functions:
(defmacro eshell-eval-using-options (name macro-args

View file

@ -22,9 +22,13 @@
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
;;; Commentary:
(provide 'esh-proc)
(eval-when-compile (require 'esh-maint))
(eval-when-compile
(require 'eshell)
(require 'esh-util))
(defgroup eshell-proc nil
"When Eshell invokes external commands, it always does so
@ -33,8 +37,6 @@ finish."
:tag "Process management"
:group 'eshell)
;;; Commentary:
;;; User Variables:
(defcustom eshell-proc-load-hook '(eshell-proc-initialize)