From dbba8a04c9c73ad7a8b74e716a9126ee3333fc08 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 5 Dec 2007 07:03:18 +0000 Subject: 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. --- lisp/eshell/em-ls.el | 21 ++++++++++----------- 1 file changed, 10 insertions(+), 11 deletions(-) (limited to 'lisp/eshell/em-ls.el') diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el index d6b4f3aed29..01a6bb87a1f 100644 --- a/lisp/eshell/em-ls.el +++ b/lisp/eshell/em-ls.el @@ -22,9 +22,16 @@ ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ;; Boston, MA 02110-1301, USA. -(provide 'em-ls) +;;; Commentary: + +;; Most of the command switches recognized by GNU's ls utility are +;; supported ([(fileutils)ls invocation]). -(eval-when-compile (require 'esh-maint)) +;;; Code: + +(eval-when-compile (require 'eshell)) +(require 'esh-util) +(require 'esh-opt) (defgroup eshell-ls nil "This module implements the \"ls\" utility fully in Lisp. If it is @@ -35,14 +42,6 @@ properties to colorize its output based on the setting of :tag "Implementation of `ls' in Lisp" :group 'eshell-module) -;;; Commentary: - -;; Most of the command switches recognized by GNU's ls utility are -;; supported ([(fileutils)ls invocation]). - -(require 'esh-util) -(require 'esh-opt) - ;;; User Variables: (defvar eshell-ls-orig-insert-directory @@ -922,7 +921,7 @@ to use, and each member of which is the width of that column (car file))))) (car file)) -;;; Code: +(provide 'em-ls) ;;; arch-tag: 9295181c-0cb2-499c-999b-89f5359842cb ;;; em-ls.el ends here -- cgit v1.2.3