aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2007-12-05 07:00:23 +0000
committerGlenn Morris <[email protected]>2007-12-05 07:00:23 +0000
commit20d7538ee8ef3991d3b4d4684d332d4efa1f6f1c (patch)
tree63fc3fe679d148dd8b57447fa12e0f2b266f7d39 /lisp/eshell
parent784aa37620f6e9ce4f89198935f55ff3861a528b (diff)
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. (print-func): No need to define for compiler.
Diffstat (limited to 'lisp/eshell')
-rw-r--r--lisp/eshell/em-basic.el43
1 files changed, 20 insertions, 23 deletions
diff --git a/lisp/eshell/em-basic.el b/lisp/eshell/em-basic.el
index 458f6918de..57f9a09414 100644
--- a/lisp/eshell/em-basic.el
+++ b/lisp/eshell/em-basic.el
@@ -22,19 +22,6 @@
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
;; Boston, MA 02110-1301, USA.
-(provide 'em-basic)
-
-(eval-when-compile (require 'esh-maint))
-
-(defgroup eshell-basic nil
- "The \"basic\" code provides a set of convenience functions which
-are traditionally considered shell builtins. Since all of the
-functionality provided by them is accessible through Lisp, they are
-not really builtins at all, but offer a command-oriented way to do the
-same thing."
- :tag "Basic shell commands"
- :group 'eshell-module)
-
;;; Commentary:
;; There are very few basic Eshell commands -- so-called builtins.
@@ -48,14 +35,6 @@ same thing."
;; echo as an argument), or whether it should try to act like a normal
;; shell echo, and always result in a flat string being returned.
-(defcustom eshell-plain-echo-behavior nil
- "*If non-nil, `echo' tries to behave like an ordinary shell echo.
-This comes at some detriment to Lisp functionality. However, the Lisp
-equivalent of `echo' can always be achieved by using `identity'."
- :type 'boolean
- :group 'eshell-basic)
-
-;;;
;; An example of the difference is the following:
;;
;; echo Hello world
@@ -83,8 +62,27 @@ equivalent of `echo' can always be achieved by using `identity'."
;;; Code:
+(eval-when-compile
+ (require 'esh-util))
+
(require 'esh-opt)
+(defgroup eshell-basic nil
+ "The \"basic\" code provides a set of convenience functions which
+are traditionally considered shell builtins. Since all of the
+functionality provided by them is accessible through Lisp, they are
+not really builtins at all, but offer a command-oriented way to do the
+same thing."
+ :tag "Basic shell commands"
+ :group 'eshell-module)
+
+(defcustom eshell-plain-echo-behavior nil
+ "*If non-nil, `echo' tries to behave like an ordinary shell echo.
+This comes at some detriment to Lisp functionality. However, the Lisp
+equivalent of `echo' can always be achieved by using `identity'."
+ :type 'boolean
+ :group 'eshell-basic)
+
;;; Functions:
(defun eshell-echo (args &optional output-newline)
@@ -180,8 +178,7 @@ or `eshell-printn' for display."
"Warning: umask changed for all new files created by Emacs.\n"))
nil))
-(eval-when-compile
- (defvar print-func))
+(provide 'em-basic)
;;; arch-tag: 385a31b1-cb95-46f0-9829-9d352ee77db8
;;; em-basic.el ends here