diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/gnus/gnus-group.el | 3 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index f2af7b2614f..991a9910e7f 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,11 @@ 2010-08-30 Lars Magne Ingebrigtsen <larsi@gnus.org> + * gnus-group.el (gnus-group-completing-read): Protect against not + having completion-styles bound. + + * mml.el (mml-insert-mime-headers-always): Change the default to t, to + make broken recipients happier. + * gnus-html.el (gnus-html-put-image): Use gnus-put-image. * gnus-ems.el (gnus-put-image): Have gnus-put-image take an optional diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index f9f97071eb5..adab5650dc3 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el @@ -2202,7 +2202,8 @@ be permanent." The arguments are the same as `completing-read' except that COLLECTION and HIST default to `gnus-active-hashtb' and `gnus-group-history' respectively if they are omitted." - (let ((completion-styles completion-styles) + (let ((completion-styles (and (boundp 'completion-styles) + completion-styles)) group) (push 'substring completion-styles) (mapatoms (lambda (symbol) |