From 21fe51d34e7dd486a7b4e028497e3fd6dbbf9da8 Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Tue, 9 Aug 2005 03:26:50 +0000 Subject: [PATCH] Compilation cleanups. * lisp/muse-mode.el (muse-mode): Use `make-local-variable' instead of `make-variable-buffer-local' in order to silence compiler warnings. * lisp/muse.el: Add an eval-when-compile line to silence a compiler warning. * scripts/muse-build.el (muse-elint-files): Automatically load every elisp file rather than specifying each one. git-archimport-id: mwolson@gnu.org--2005/muse--main--1.0--patch-193 --- ChangeLog | 20 ++++++++++++++++++++ lisp/muse-mode.el | 6 +++--- lisp/muse.el | 3 +++ scripts/muse-build.el | 17 ++++------------- 4 files changed, 30 insertions(+), 16 deletions(-) diff --git a/ChangeLog b/ChangeLog index 44eede8..185c918 100644 --- a/ChangeLog +++ b/ChangeLog @@ -2,6 +2,26 @@ # arch-tag: automatic-ChangeLog--mwolson@gnu.org--2005/muse--main--1.0 # +2005-08-09 03:26:50 GMT Michael Olson patch-193 + + Summary: + Compilation cleanups. + Revision: + muse--main--1.0--patch-193 + + * lisp/muse-mode.el (muse-mode): Use `make-local-variable' instead of + `make-variable-buffer-local' in order to silence compiler warnings. + + * lisp/muse.el: Add an eval-when-compile line to silence a compiler + warning. + + * scripts/muse-build.el (muse-elint-files): Automatically load every + elisp file rather than specifying each one. + + modified files: + ChangeLog lisp/muse-mode.el lisp/muse.el scripts/muse-build.el + + 2005-08-08 22:58:24 GMT Michael Olson patch-192 Summary: diff --git a/lisp/muse-mode.el b/lisp/muse-mode.el index e5b3c61..1e30181 100644 --- a/lisp/muse-mode.el +++ b/lisp/muse-mode.el @@ -177,11 +177,11 @@ so only enable this if you don't use either of these." muse-regexp-blank "]*\\)*")) (when (featurep 'pcomplete) ;; If pcomplete is available, set it up - (set (make-variable-buffer-local 'pcomplete-default-completion-function) + (set (make-local-variable 'pcomplete-default-completion-function) 'muse-mode-completions) - (set (make-variable-buffer-local 'pcomplete-command-completion-function) + (set (make-local-variable 'pcomplete-command-completion-function) 'muse-mode-completions) - (set (make-variable-buffer-local 'pcomplete-parse-arguments-function) + (set (make-local-variable 'pcomplete-parse-arguments-function) 'muse-mode-current-word)) (when muse-mode-highlight-p (muse-use-font-lock))) diff --git a/lisp/muse.el b/lisp/muse.el index 4868aaa..c781bae 100644 --- a/lisp/muse.el +++ b/lisp/muse.el @@ -66,6 +66,9 @@ familiar with Emacs." ;; Default file extension +(eval-when-compile + (defvar muse-ignored-extensions)) + (defvar muse-ignored-extensions-regexp nil "A regexp of extensions to omit from the ending of a Muse page name. This is autogenerated from `muse-ignored-extensions'.") diff --git a/scripts/muse-build.el b/scripts/muse-build.el index 26eaed3..8a90495 100644 --- a/scripts/muse-build.el +++ b/scripts/muse-build.el @@ -8,19 +8,10 @@ (defvar nomessage t) (load "muse" nil nomessage) - ;;(load "muse-arabic" nil nomessage) - (load "muse-book" nil nomessage) - ;;(load "muse-cite" nil nomessage) - (load "muse-colors" nil nomessage) - (load "muse-html" nil nomessage) - (load "muse-http" nil nomessage) - (load "muse-journal" nil nomessage) - (load "muse-latex" nil nomessage) - (load "muse-mode" nil nomessage) - (load "muse-poem" nil nomessage) - (load "muse-project" nil nomessage) - (load "muse-regexps" nil nomessage) - (load "muse-texinfo" nil nomessage) + (dolist (dir '("../lisp" "../contrib" "../experimental")) + (dolist (file (directory-files dir nil "\\.el$")) + (setq file (substring file 0 (string-match "\\.el$" file))) + (load file nil nomessage))) (add-to-list 'elint-standard-variables 'current-prefix-arg) (add-to-list 'elint-standard-variables 'command-line-args-left) -- 2.11.4.GIT