* gnus-sum.el (gnus-highlight-selected-summary)

[gnus] / lisp / gnus-score.el

diff --git a/lisp/gnus-score.el b/lisp/gnus-score.el
index 7733f9d..41adecb 100644 (file)
--- a/lisp/gnus-score.el
+++ b/lisp/gnus-score.el
@@ -1818,7 +1818,7 @@ score in `gnus-newsgroup-scored' by SCORE."
            (goto-char (point-min))
            (if (= dmt ?e)
                (while (funcall search-func match nil t)
            (goto-char (point-min))
            (if (= dmt ?e)
                (while (funcall search-func match nil t)

-                 (and (= (progn (beginning-of-line) (point))
+                 (and (= (gnus-point-at-bol)

                          (match-beginning 0))
                       (= (progn (end-of-line) (point))
                          (match-end 0))
                          (match-beginning 0))
                       (= (progn (end-of-line) (point))
                          (match-end 0))