Mercurial > emacs
changeset 83506:9905fc171253
(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
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Sat, 01 Apr 2006 17:16:18 +0000 |
parents | 57e924639750 |
children | 81f2d90dee68 |
files | lisp/ldefs-boot.el lisp/mh-e/mh-e.el |
diffstat | 2 files changed, 12 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ldefs-boot.el Sat Apr 01 16:37:26 2006 +0000 +++ b/lisp/ldefs-boot.el Sat Apr 01 17:16:18 2006 +0000 @@ -17640,7 +17640,8 @@ ;;;*** -;;;### (autoloads (mh-version) "mh-e" "mh-e/mh-e.el" (17454 30995)) +;;;### (autoloads (mh-strip-package-version mh-version) "mh-e" "mh-e/mh-e.el" +;;;;;; (17454 45382)) ;;; Generated autoloads from mh-e/mh-e.el (put (quote mh-progs) (quote risky-local-variable) t) @@ -17654,6 +17655,13 @@ \(fn)" t nil) +(autoload (quote mh-strip-package-version) "mh-e" "\ +Strip :package-version keyword and its value from ARGS. +In Emacs versions that support the :package-version keyword, +ARGS is returned unchanged. + +\(fn ARGS)" nil nil) + ;;;*** ;;;### (autoloads (mh-folder-mode mh-nmail mh-rmail) "mh-folder" @@ -30577,7 +30585,7 @@ ;;;;;; "url/url-nfs.el" "url/url-proxy.el" "url/url-vars.el" "url/vc-dav.el" ;;;;;; "vc-hooks.el" "vcursor.el" "version.el" "vms-patch.el" "vmsproc.el" ;;;;;; "vt-control.el" "vt100-led.el" "w32-fns.el" "w32-vars.el" -;;;;;; "widget.el" "window.el" "x-dnd.el") (17454 31067 173423)) +;;;;;; "widget.el" "window.el" "x-dnd.el") (17454 45486 164469)) ;;;***
--- a/lisp/mh-e/mh-e.el Sat Apr 01 16:37:26 2006 +0000 +++ b/lisp/mh-e/mh-e.el Sat Apr 01 17:16:18 2006 +0000 @@ -925,6 +925,7 @@ `(defface ,face ,spec ,doc ,@(mh-strip-package-version args))) (put 'mh-defface 'lisp-indent-function 'defun) +;;;###autoload (defun mh-strip-package-version (args) "Strip :package-version keyword and its value from ARGS. In Emacs versions that support the :package-version keyword, @@ -938,6 +939,7 @@ (t t)) collect keyword)))) + ;;; MH-E Customization