Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-xmas.el @ 18:d95e72db5c07 r19-15b92

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b92
author cvs
date Mon, 13 Aug 2007 08:49:43 +0200
parents 0293115a14e9
children 8fc7fe29b841
comparison
equal deleted inserted replaced
17:4579af9d8826 18:d95e72db5c07
131 ;; Highlight selected article in summary buffer 131 ;; Highlight selected article in summary buffer
132 (when gnus-summary-selected-face 132 (when gnus-summary-selected-face
133 (when gnus-newsgroup-selected-overlay 133 (when gnus-newsgroup-selected-overlay
134 (delete-extent gnus-newsgroup-selected-overlay)) 134 (delete-extent gnus-newsgroup-selected-overlay))
135 (setq gnus-newsgroup-selected-overlay 135 (setq gnus-newsgroup-selected-overlay
136 (make-extent (point-at-bol) (point-at-eol))) 136 (make-extent (gnus-point-at-bol) (gnus-point-at-eol)))
137 (set-extent-face gnus-newsgroup-selected-overlay 137 (set-extent-face gnus-newsgroup-selected-overlay
138 gnus-summary-selected-face))) 138 gnus-summary-selected-face)))
139 139
140 (defvar gnus-xmas-force-redisplay t 140 (defvar gnus-xmas-force-redisplay t
141 "If non-nil, force a redisplay before recentering the summary buffer. 141 "If non-nil, force a redisplay before recentering the summary buffer.