From bbf9f302f3d700f70a1c29592a5a803c1173eaca Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Thu, 25 Nov 2010 01:13:37 +0000 Subject: [PATCH] shr.el (shr-get-background): Fix argument name. --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/shr.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4f06225f8ca..e369ce9c55c 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2010-11-25 Katsumi Yamaoka + + * shr.el (shr-get-background): Fix argument name. + 2010-11-24 Lars Magne Ingebrigtsen * gnus-cache.el (gnus-summary-insert-cached-articles): Use it. diff --git a/lisp/gnus/shr.el b/lisp/gnus/shr.el index 26d2b3b4cd2..9078e524031 100644 --- a/lisp/gnus/shr.el +++ b/lisp/gnus/shr.el @@ -522,7 +522,7 @@ ones, in case fg and bg are nil." (defun shr-get-background (pos) "Return background color at POS." - (dolist (overlay (overlays-in start (1+ start))) + (dolist (overlay (overlays-in pos (1+ pos))) (let ((background (plist-get (overlay-get overlay 'face) :background))) (when background -- 2.39.5