Mercurial > emacs
changeset 69357:1f70898570ca
(mh-profile-component): Drop `s' from mhparam -components for
Mailutils compatibility (closes SF #1446985).
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Fri, 10 Mar 2006 16:56:16 +0000 |
| parents | 53ca33e3b6a5 |
| children | aa7eed467b01 |
| files | lisp/mh-e/ChangeLog lisp/mh-e/mh-e.el |
| diffstat | 2 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mh-e/ChangeLog Fri Mar 10 08:10:33 2006 +0000 +++ b/lisp/mh-e/ChangeLog Fri Mar 10 16:56:16 2006 +0000 @@ -1,3 +1,8 @@ +2006-03-10 Bill Wohler <wohler@newt.com> + + * mh-e.el (mh-profile-component): Drop `s' from mhparam + -components for Mailutils compatibility (closes SF #1446985). + 2006-03-06 Bill Wohler <wohler@newt.com> * mh-e.el (Version, mh-version): Add +cvs to version.
--- a/lisp/mh-e/mh-e.el Fri Mar 10 08:10:33 2006 +0000 +++ b/lisp/mh-e/mh-e.el Fri Mar 10 16:56:16 2006 +0000 @@ -808,7 +808,9 @@ (defun mh-profile-component (component) "Return COMPONENT value from mhparam, or nil if unset." (save-excursion - (mh-exec-cmd-quiet nil "mhparam" "-components" component) + ;; MH and nmh use -components, Mailutils uses -component. Since MH + ;; and nmh work with an unambiguous prefix, the `s' is dropped here. + (mh-exec-cmd-quiet nil "mhparam" "-component" component) (mh-profile-component-value component))) (defun mh-profile-component-value (component)