From fa31eac318ab7f344c16cbe0c31489b8e598fbe7 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 5 Dec 2007 07:06:30 +0000 Subject: [PATCH] Require individual files if needed when compiling, rather than esh-maint. Collect any require statements. Leave provide at start. Move any commentary to start. (eshell-load-defgroups): Eval and compile. --- lisp/eshell/esh-module.el | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/lisp/eshell/esh-module.el b/lisp/eshell/esh-module.el index 4ae741a9e66..cf9c2595a87 100644 --- a/lisp/eshell/esh-module.el +++ b/lisp/eshell/esh-module.el @@ -23,11 +23,15 @@ ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, ;; Boston, MA 02110-1301, USA. +;;; Code: + (provide 'esh-module) (eval-when-compile - (require 'esh-maint) - (require 'cl)) + (require 'cl) + (require 'esh-util)) + +(require 'esh-util) (defgroup eshell-module nil "The `eshell-module' group is for Eshell extension modules, which @@ -36,10 +40,7 @@ customizing the variable `eshell-modules-list'." :tag "Extension modules" :group 'eshell) -;;; Commentary: - -(require 'esh-util) - +(eval-and-compile (defun eshell-load-defgroups (&optional directory) "Load `defgroup' statements from Eshell's module files." (let ((vc-handled-backends nil)) ; avoid VC fucking things up @@ -70,7 +71,7 @@ customizing the variable `eshell-modules-list'." (setq files (cdr files)))) ;; Don't make backups, to avoid prompting the user if there are ;; excess backup versions. - (save-buffer 0)))) + (save-buffer 0))))) ;; load the defgroup's for the standard extension modules, so that ;; documentation can be provided when the user customize's -- 2.39.2