shr.el (shr-insert): Minor shr white space rendering tweak

e76917e6 · Lars Magne Ingebrigtsen · Katsumi Yamaoka · 4ebb358f · e76917e6 · e76917e6
Commit e76917e6 authored Mar 19, 2012 by Lars Magne Ingebrigtsen Committed by Katsumi Yamaoka Mar 19, 2012
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 0 deletions

lisp/gnus/ChangeLog lisp/gnus/ChangeLog +5 -0

lisp/gnus/shr.el lisp/gnus/shr.el +1 -0

No files found.
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
+2012-03-19  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* shr.el (shr-insert): Update the text state properly to avoid
+	inserting spurious paragraph starts.
+
 2012-03-14  Lars Magne Ingebrigtsen  <larsi@gnus.org>
  
 	* gnus-sum.el (gnus-update-marks): Don't propagate marks unless

--- 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