aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBill Wohler2006-01-15 18:27:26 +0000
committerBill Wohler2006-01-15 18:27:26 +0000
commit98eab4e47742190fb317bc398dde0ed126241ab5 (patch)
tree97c821dbf81477f1bbc011d0bef3eab0e4f8829e
parent0501acd449d13363381707188907572fc5b6e2fd (diff)
downloademacs-98eab4e47742190fb317bc398dde0ed126241ab5.tar.gz
emacs-98eab4e47742190fb317bc398dde0ed126241ab5.zip
* mh-exec.el: Require mh-acros, mh-buffers, and mh-utils for
standalone compile. (mh-progs, mh-lib, mh-lib-progs): Move here from mh-init.el. * mh-init.el (mh-progs, mh-lib, mh-lib-progs): Move to mh-exec.el, where they are used.
-rw-r--r--lisp/mh-e/ChangeLog7
-rw-r--r--lisp/mh-e/mh-exec.el26
-rw-r--r--lisp/mh-e/mh-init.el18
3 files changed, 32 insertions, 19 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog
index fb3b1d70069..debaf5c943a 100644
--- a/lisp/mh-e/ChangeLog
+++ b/lisp/mh-e/ChangeLog
@@ -1,5 +1,12 @@
12006-01-15 Bill Wohler <wohler@newt.com> 12006-01-15 Bill Wohler <wohler@newt.com>
2 2
3 * mh-exec.el: Require mh-acros, mh-buffers, and mh-utils for
4 standalone compile.
5 (mh-progs, mh-lib, mh-lib-progs): Move here from mh-init.el.
6
7 * mh-init.el (mh-progs, mh-lib, mh-lib-progs): Move to mh-exec.el,
8 where they are used.
9
3 * mh-comp.el (mh-pgp-support-flag): Move here from mh-utils.el; 10 * mh-comp.el (mh-pgp-support-flag): Move here from mh-utils.el;
4 needed to help remove dependency on mh-utils. 11 needed to help remove dependency on mh-utils.
5 12
diff --git a/lisp/mh-e/mh-exec.el b/lisp/mh-e/mh-exec.el
index 71e40e5bdb0..e7a4a94b9a5 100644
--- a/lisp/mh-e/mh-exec.el
+++ b/lisp/mh-e/mh-exec.el
@@ -33,7 +33,31 @@
33 33
34;;; Code: 34;;; Code:
35 35
36;;; 36(eval-when-compile (require 'mh-acros))
37(mh-require-cl)
38
39(require 'mh-buffers)
40(require 'mh-utils)
41
42(defvar mh-progs nil
43 "Directory containing MH commands, such as inc, repl, and rmm.")
44
45;;;###autoload
46(put 'mh-progs 'risky-local-variable t)
47
48(defvar mh-lib nil
49 "Directory containing the MH library.
50This directory contains, among other things, the components file.")
51
52;;;###autoload
53(put 'mh-lib 'risky-local-variable t)
54
55(defvar mh-lib-progs nil
56 "Directory containing MH helper programs.
57This directory contains, among other things, the mhl program.")
58
59;;;###autoload
60(put 'mh-lib-progs 'risky-local-variable t)
37 61
38(defvar mh-index-max-cmdline-args 500 62(defvar mh-index-max-cmdline-args 500
39 "Maximum number of command line args.") 63 "Maximum number of command line args.")
diff --git a/lisp/mh-e/mh-init.el b/lisp/mh-e/mh-init.el
index 86a62768980..180db2b22a5 100644
--- a/lisp/mh-e/mh-init.el
+++ b/lisp/mh-e/mh-init.el
@@ -68,27 +68,9 @@ directories to the customizable variable `mh-path'.")
68;; was installed into. But if you installed MH after building Emacs, 68;; was installed into. But if you installed MH after building Emacs,
69;; this would almost certainly be wrong, so now we do it at run time. 69;; this would almost certainly be wrong, so now we do it at run time.
70 70
71(defvar mh-progs nil
72 "Directory containing MH commands, such as inc, repl, and rmm.")
73
74(defvar mh-lib nil
75 "Directory containing the MH library.
76This directory contains, among other things, the components file.")
77
78(defvar mh-lib-progs nil
79 "Directory containing MH helper programs.
80This directory contains, among other things, the mhl program.")
81
82(defvar mh-flists-present-flag nil 71(defvar mh-flists-present-flag nil
83 "Non-nil means that we have \"flists\".") 72 "Non-nil means that we have \"flists\".")
84 73
85;;;###autoload
86(put 'mh-progs 'risky-local-variable t)
87;;;###autoload
88(put 'mh-lib 'risky-local-variable t)
89;;;###autoload
90(put 'mh-lib-progs 'risky-local-variable t)
91
92(defvar mh-variants nil 74(defvar mh-variants nil
93 "List describing known MH variants. 75 "List describing known MH variants.
94Do not access this variable directly as it may not have yet been initialized. 76Do not access this variable directly as it may not have yet been initialized.