Commit 0be02d8a authored by Katsumi Yamaoka's avatar Katsumi Yamaoka
Browse files

Protect against not having completion-styles bound by Lars Magne Ingebrigtsen <larsi@gnus.org>.

parent a3e01263
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
......
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment