From e76917e6cd0abdfa01d73c9c62d0206afd3452dd Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Mon, 19 Mar 2012 14:44:14 +0000 Subject: [PATCH] shr.el (shr-insert): Minor shr white space rendering tweak --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/shr.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index d0d35407367..878b9b9eb6b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2012-03-19 Lars Magne Ingebrigtsen + + * shr.el (shr-insert): Update the text state properly to avoid + inserting spurious paragraph starts. + 2012-03-14 Lars Magne Ingebrigtsen * gnus-sum.el (gnus-update-marks): Don't propagate marks unless diff --git a/lisp/gnus/shr.el b/lisp/gnus/shr.el index 53c0063de2e..c2040a9b8cf 100644 --- a/lisp/gnus/shr.el +++ b/lisp/gnus/shr.el @@ -332,6 +332,7 @@ the URL of the image to the kill buffer instead." (unless shr-start (setq shr-start (point))) (insert elem) + (setq shr-state nil) (let (found) (while (and (> (current-column) shr-width) (progn -- 2.39.5