summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-art.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2011-02-01 03:54:46 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2011-02-01 03:54:46 +0000
commitabb97fbbedcd84a13bae7b7b70251514bf97cdbb (patch)
tree632dd80df206c85a4a3654782f2d7b9cd495e3c7 /lisp/gnus/gnus-art.el
parent8c9da040de3b584cca9a41292d7a8b34818ae21a (diff)
downloademacs-abb97fbbedcd84a13bae7b7b70251514bf97cdbb.tar.gz
emacs-abb97fbbedcd84a13bae7b7b70251514bf97cdbb.tar.bz2
emacs-abb97fbbedcd84a13bae7b7b70251514bf97cdbb.zip
shr.el (shr-render-td): Only do colours at the final rendering. Should be slightly faster.
(shr-insert-table): Fix up TD background colours when doing the vertical padding. gnus-art.el (article-update-date-lapsed): Don't use current-column to find the horizontal position. It's fragile in the presence of \003 characters.
Diffstat (limited to 'lisp/gnus/gnus-art.el')
-rw-r--r--lisp/gnus/gnus-art.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 07eabd98a6d..af47daf970b 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -3645,7 +3645,7 @@ function and want to see what the date was before converting."
(set-buffer (window-buffer w))
(when (eq major-mode 'gnus-article-mode)
(let ((old-line (count-lines (point-min) (point)))
- (old-column (current-column)))
+ (old-column (- (point) (line-beginning-position))))
(goto-char (point-min))
(while (re-search-forward "^Date:" nil t)
(let ((type (get-text-property (match-beginning 0) 'gnus-date-type)))