lisp/gnus/gnus-art.el (gnus-treat-buttonize): Don't buttonize URLs in HTML

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 94a55f4bf4eaac0a5ebcab5a9fadfceef9e7b55e..f21d01f9fefce87ece543283f6fc7d911be62216 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-11  Lars Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-art.el (gnus-treat-buttonize): Don't re-buttonize URLs in HTML
+       parts, because that breaks filling (since buttons are in a bold face).
+
 2015-02-10  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * mm-decode.el (mm-convert-shr-links): Delete useless variable `face';

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 557c6a3a4ab2f33fc14b29899b2e6a80cc650251..4ad0601099dd843e4bba9ca8c3adff983b34d47e 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -1139,7 +1139,7 @@ predicate.  See Info node `(gnus)Customizing Articles'."
   :type gnus-article-treat-custom)
 (put 'gnus-treat-highlight-signature 'highlight t)
 
-(defcustom gnus-treat-buttonize 100000
+(defcustom gnus-treat-buttonize '(and 100000 (typep "text/plain"))
   "Add buttons.
 Valid values are nil, t, `head', `first', `last', an integer or a
 predicate.  See Info node `(gnus)Customizing Articles'."