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:
parent
5477308bb2
commit
4e6cc05cc9
4 changed files with 28 additions and 26 deletions
|
@ -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)
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue