aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaroly Lorentey2006-04-01 17:16:18 +0000
committerKaroly Lorentey2006-04-01 17:16:18 +0000
commit2518de51d20e848711c712f5030e8c207a4e2840 (patch)
treedda26e0ceee4db75acebbe92194e96490fc56ecd
parent5bcee7efff25b675da6da4d6dd31c6bbc822b957 (diff)
downloademacs-2518de51d20e848711c712f5030e8c207a4e2840.tar.gz
emacs-2518de51d20e848711c712f5030e8c207a4e2840.zip
(Attempt to) fix bootstrap error.
* lisp/mh-e/mh-e.el (mh-strip-package-version): Add autoload cookie. * lisp/ldefs-boot.el: Update. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-546
-rw-r--r--lisp/ldefs-boot.el12
-rw-r--r--lisp/mh-e/mh-e.el2
2 files changed, 12 insertions, 2 deletions
diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el
index eaf332de6e2..402278489bf 100644
--- a/lisp/ldefs-boot.el
+++ b/lisp/ldefs-boot.el
@@ -17640,7 +17640,8 @@ delete the draft message.
17640 17640
17641;;;*** 17641;;;***
17642 17642
17643;;;### (autoloads (mh-version) "mh-e" "mh-e/mh-e.el" (17454 30995)) 17643;;;### (autoloads (mh-strip-package-version mh-version) "mh-e" "mh-e/mh-e.el"
17644;;;;;; (17454 45382))
17644;;; Generated autoloads from mh-e/mh-e.el 17645;;; Generated autoloads from mh-e/mh-e.el
17645 17646
17646(put (quote mh-progs) (quote risky-local-variable) t) 17647(put (quote mh-progs) (quote risky-local-variable) t)
@@ -17654,6 +17655,13 @@ Display version information about MH-E and the MH mail handling system.
17654 17655
17655\(fn)" t nil) 17656\(fn)" t nil)
17656 17657
17658(autoload (quote mh-strip-package-version) "mh-e" "\
17659Strip :package-version keyword and its value from ARGS.
17660In Emacs versions that support the :package-version keyword,
17661ARGS is returned unchanged.
17662
17663\(fn ARGS)" nil nil)
17664
17657;;;*** 17665;;;***
17658 17666
17659;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder" 17667;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder"
@@ -30577,7 +30585,7 @@ Zone-mode does two things:
30577;;;;;; "url/url-nfs.el" "url/url-proxy.el" "url/url-vars.el" "url/vc-dav.el" 30585;;;;;; "url/url-nfs.el" "url/url-proxy.el" "url/url-vars.el" "url/vc-dav.el"
30578;;;;;; "vc-hooks.el" "vcursor.el" "version.el" "vms-patch.el" "vmsproc.el" 30586;;;;;; "vc-hooks.el" "vcursor.el" "version.el" "vms-patch.el" "vmsproc.el"
30579;;;;;; "vt-control.el" "vt100-led.el" "w32-fns.el" "w32-vars.el" 30587;;;;;; "vt-control.el" "vt100-led.el" "w32-fns.el" "w32-vars.el"
30580;;;;;; "widget.el" "window.el" "x-dnd.el") (17454 31067 173423)) 30588;;;;;; "widget.el" "window.el" "x-dnd.el") (17454 45486 164469))
30581 30589
30582;;;*** 30590;;;***
30583 30591
diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el
index ce2db4fb66e..1ed8a6d7176 100644
--- a/lisp/mh-e/mh-e.el
+++ b/lisp/mh-e/mh-e.el
@@ -925,6 +925,7 @@ keyword, introduced in Emacs 22."
925 `(defface ,face ,spec ,doc ,@(mh-strip-package-version args))) 925 `(defface ,face ,spec ,doc ,@(mh-strip-package-version args)))
926(put 'mh-defface 'lisp-indent-function 'defun) 926(put 'mh-defface 'lisp-indent-function 'defun)
927 927
928;;;###autoload
928(defun mh-strip-package-version (args) 929(defun mh-strip-package-version (args)
929 "Strip :package-version keyword and its value from ARGS. 930 "Strip :package-version keyword and its value from ARGS.
930In Emacs versions that support the :package-version keyword, 931In Emacs versions that support the :package-version keyword,
@@ -938,6 +939,7 @@ ARGS is returned unchanged."
938 (t t)) 939 (t t))
939 collect keyword)))) 940 collect keyword))))
940 941
942
941 943
942 944
943;;; MH-E Customization 945;;; MH-E Customization