gnus-art: simplify condition
authorJulien Danjou <julien@danjou.info>
Wed, 19 Jan 2011 14:23:39 +0000 (15:23 +0100)
committerJulien Danjou <julien@danjou.info>
Wed, 19 Jan 2011 14:23:39 +0000 (15:23 +0100)
Signed-off-by: Julien Danjou <julien@danjou.info>
lisp/ChangeLog
lisp/gnus-art.el

index 6d2ad21..841142d 100644 (file)
@@ -1,3 +1,7 @@
+2011-01-19  Julien Danjou  <julien@danjou.info>
+
+       * gnus-art.el (gnus-article-add-buttons): Simplify condition.
+
 2011-01-15  Glenn Morris  <rgm@gnu.org>
 
        * message.el (message-mail): A compose-mail function should
index 3694426..56f631a 100644 (file)
@@ -7758,8 +7758,7 @@ specified by `gnus-button-alist'."
          (let ((start (match-beginning (nth 1 entry)))
                (end (match-end (nth 1 entry)))
                (from (match-beginning 0)))
-           (when (and (or (eq t (nth 2 entry))
-                          (eval (nth 2 entry)))
+           (when (and (eval (nth 2 entry))
                       (not (gnus-button-in-region-p
                             start end 'gnus-callback)))
              ;; That optional form returned non-nil, so we add the