diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-12-06 03:30:23 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-12-06 03:30:23 +0000 |
| commit | 9ad948e2fdc7bbe7caa00fd3460ef3f47087c9c3 (patch) | |
| tree | ff67d3cd8f7f34eafc01f9b3ef56af6a82a98b20 /lisp/gnus/message.el | |
| parent | 9a81a97f1712feb7b6118e3513a671434bb3edb6 (diff) | |
| download | emacs-9ad948e2fdc7bbe7caa00fd3460ef3f47087c9c3.tar.gz emacs-9ad948e2fdc7bbe7caa00fd3460ef3f47087c9c3.tar.bz2 emacs-9ad948e2fdc7bbe7caa00fd3460ef3f47087c9c3.zip | |
Avoid letf macro use from Gnus
gnus/gmm-utils.el (gmm-flet): Remove.
gnus/gnus-sync.el (gnus-sync-lesync-call): Avoid overriding json-alist-p.
gnus/message.el (message-read-from-minibuffer): Avoid overriding mail-abbrev-in-expansion-header-p.
mail/mailabbrev.el (mail-abbrev-expand-wrapper): Work in minibuffer so as to enable message-read-from-minibuffer to expand mail aliases.
Diffstat (limited to 'lisp/gnus/message.el')
| -rw-r--r-- | lisp/gnus/message.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 2171dcf3edc..af5bee2056f 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -8141,8 +8141,7 @@ regexp VARSTR." (if (fboundp 'mail-abbrevs-setup) (let ((minibuffer-setup-hook 'mail-abbrevs-setup) (minibuffer-local-map message-minibuffer-local-map)) - (gmm-flet ((mail-abbrev-in-expansion-header-p nil t)) - (read-from-minibuffer prompt initial-contents))) + (read-from-minibuffer prompt initial-contents)) (let ((minibuffer-setup-hook 'mail-abbrev-minibuffer-setup-hook) (minibuffer-local-map message-minibuffer-local-map)) (read-string prompt initial-contents)))) |