diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/mh-e/ChangeLog | 16 | ||||
-rw-r--r-- | lisp/mh-e/mh-comp.el | 3 |
2 files changed, 18 insertions, 1 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 3b7e56a571d..d9df3290743 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog @@ -1,5 +1,21 @@ 2006-01-29 Bill Wohler <wohler@newt.com> + * mh-comp.el (mh-insert-fields): Handle nil values. Rmail, at + least, will deliver them to us. + + * mh-e.el (mh-after-commands-processed-hook) + (mh-before-commands-processed-hook): Specify what sort of requests + in docstring. + + * mh-folder.el (mh-folder-mode): Use add-to-list to modify + minor-mode-alias. + + * mh-letter.el (mh-letter-menu): Remove. Defvar no longer needed + to shush compiler. + (mh-letter-mode): Remove Mail menu. + +2006-01-29 Bill Wohler <wohler@newt.com> + The Great Cleanup Remove circular dependencies. mh-e.el now includes few require statements and stands alone. Other files should need to require diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el index d9ce48a959b..529aac777d2 100644 --- a/lisp/mh-e/mh-comp.el +++ b/lisp/mh-e/mh-comp.el @@ -870,7 +870,8 @@ Do not insert any pairs whose value is the empty string." (value (car (cdr name-values)))) (if (not (string-match "^.*:$" field-name)) (setq field-name (concat field-name ":"))) - (cond ((equal value "") + (cond ((or (null value) + (equal value "")) nil) ((mh-position-on-field field-name) (insert " " (or value ""))) |