aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell/em-basic.el
diff options
context:
space:
mode:
authorGlenn Morris2007-12-05 07:00:23 +0000
committerGlenn Morris2007-12-05 07:00:23 +0000
commit20d7538ee8ef3991d3b4d4684d332d4efa1f6f1c (patch)
tree63fc3fe679d148dd8b57447fa12e0f2b266f7d39 /lisp/eshell/em-basic.el
parent784aa37620f6e9ce4f89198935f55ff3861a528b (diff)
downloademacs-20d7538ee8ef3991d3b4d4684d332d4efa1f6f1c.tar.gz
emacs-20d7538ee8ef3991d3b4d4684d332d4efa1f6f1c.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. (print-func): No need to define for compiler.
Diffstat (limited to 'lisp/eshell/em-basic.el')
-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 458f6918de4..57f9a094141 100644
--- a/lisp/eshell/em-basic.el
+++ b/lisp/eshell/em-basic.el
@@ -22,19 +22,6 @@
22;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 22;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
23;; Boston, MA 02110-1301, USA. 23;; Boston, MA 02110-1301, USA.
24 24
25(provide 'em-basic)
26
27(eval-when-compile (require 'esh-maint))
28
29(defgroup eshell-basic nil
30 "The \"basic\" code provides a set of convenience functions which
31are traditionally considered shell builtins. Since all of the
32functionality provided by them is accessible through Lisp, they are
33not really builtins at all, but offer a command-oriented way to do the
34same thing."
35 :tag "Basic shell commands"
36 :group 'eshell-module)
37
38;;; Commentary: 25;;; Commentary:
39 26
40;; There are very few basic Eshell commands -- so-called builtins. 27;; There are very few basic Eshell commands -- so-called builtins.
@@ -48,14 +35,6 @@ same thing."
48;; echo as an argument), or whether it should try to act like a normal 35;; echo as an argument), or whether it should try to act like a normal
49;; shell echo, and always result in a flat string being returned. 36;; shell echo, and always result in a flat string being returned.
50 37
51(defcustom eshell-plain-echo-behavior nil
52 "*If non-nil, `echo' tries to behave like an ordinary shell echo.
53This comes at some detriment to Lisp functionality. However, the Lisp
54equivalent of `echo' can always be achieved by using `identity'."
55 :type 'boolean
56 :group 'eshell-basic)
57
58;;;
59;; An example of the difference is the following: 38;; An example of the difference is the following:
60;; 39;;
61;; echo Hello world 40;; echo Hello world
@@ -83,8 +62,27 @@ equivalent of `echo' can always be achieved by using `identity'."
83 62
84;;; Code: 63;;; Code:
85 64
65(eval-when-compile
66 (require 'esh-util))
67
86(require 'esh-opt) 68(require 'esh-opt)
87 69
70(defgroup eshell-basic nil
71 "The \"basic\" code provides a set of convenience functions which
72are traditionally considered shell builtins. Since all of the
73functionality provided by them is accessible through Lisp, they are
74not really builtins at all, but offer a command-oriented way to do the
75same thing."
76 :tag "Basic shell commands"
77 :group 'eshell-module)
78
79(defcustom eshell-plain-echo-behavior nil
80 "*If non-nil, `echo' tries to behave like an ordinary shell echo.
81This comes at some detriment to Lisp functionality. However, the Lisp
82equivalent of `echo' can always be achieved by using `identity'."
83 :type 'boolean
84 :group 'eshell-basic)
85
88;;; Functions: 86;;; Functions:
89 87
90(defun eshell-echo (args &optional output-newline) 88(defun eshell-echo (args &optional output-newline)
@@ -180,8 +178,7 @@ or `eshell-printn' for display."
180 "Warning: umask changed for all new files created by Emacs.\n")) 178 "Warning: umask changed for all new files created by Emacs.\n"))
181 nil)) 179 nil))
182 180
183(eval-when-compile 181(provide 'em-basic)
184 (defvar print-func))
185 182
186;;; arch-tag: 385a31b1-cb95-46f0-9829-9d352ee77db8 183;;; arch-tag: 385a31b1-cb95-46f0-9829-9d352ee77db8
187;;; em-basic.el ends here 184;;; em-basic.el ends here