From: Glenn Morris <rgm@gnu.org>
Date: Wed, 5 Dec 2007 07:07:12 +0000 (+0000)
Subject: Require individual files if needed when compiling, rather than
X-Git-Tag: emacs-pretest-23.0.90~9076
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=99abb67ec67ec14443f6989cd53d9a9806b57c04;p=emacs.git

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.
(top-level): Don't require pp.  Use condition-case rather than
ignore-errors.
---

diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el
index 8218cf9dc2b..50243e76032 100644
--- a/lisp/eshell/esh-util.el
+++ b/lisp/eshell/esh-util.el
@@ -22,19 +22,15 @@
 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 ;; Boston, MA 02110-1301, USA.
 
-(provide 'esh-util)
+;;; Commentary:
 
-(eval-when-compile (require 'esh-maint))
+;;; Code:
 
 (defgroup eshell-util nil
   "This is general utility code, meant for use by Eshell itself."
   :tag "General utilities"
   :group 'eshell)
 
-;;; Commentary:
-
-(require 'pp)
-
 ;;; User Variables:
 
 (defcustom eshell-stringify-t t
@@ -429,7 +425,9 @@ list."
   ;; "args out of range" error in `sit-for', if this function
   ;; runs while point is in the minibuffer and the users attempt
   ;; to use completion.  Don't ask me.
-  (ignore-errors (sit-for 0 0)))
+  (condition-case nil
+      (sit-for 0 0)
+    (error nil)))
 
 (defun eshell-read-passwd-file (file)
   "Return an alist correlating gids to group names in FILE."
@@ -781,7 +779,7 @@ If NOSORT is non-nil, the list is not sorted--its order is unpredictable.
 ;     (or result
 ;	(file-attributes filename))))
 
-;;; Code:
+(provide 'esh-util)
 
 ;;; arch-tag: 70159778-5c7a-480a-bae4-3ad332fca19d
 ;;; esh-util.el ends here