Commit 888ab661 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen Committed by Katsumi Yamaoka
Browse files

shr.el (shr-remove-trailing-whitespace): Really delete the padding on too-wide lines.

parent fcacfa8d
2012-02-15 Lars Ingebrigtsen <larsi@gnus.org>
* shr.el (shr-remove-trailing-whitespace): Really delete the padding on
too-wide lines.
2012-02-15 Paul Eggert <eggert@cs.ucla.edu> 2012-02-15 Paul Eggert <eggert@cs.ucla.edu>
   
* shr.el (shr-rescale-image): Undo previous change; see * shr.el (shr-rescale-image): Undo previous change; see
......
...@@ -160,7 +160,7 @@ DOM should be a parse tree as generated by ...@@ -160,7 +160,7 @@ DOM should be a parse tree as generated by
(goto-char start) (goto-char start)
(while (not (eobp)) (while (not (eobp))
(end-of-line) (end-of-line)
(when (> (current-column) width) (when (> (shr-previous-newline-padding-width (current-column)) width)
(dolist (overlay (overlays-at (point))) (dolist (overlay (overlays-at (point)))
(when (overlay-get overlay 'before-string) (when (overlay-get overlay 'before-string)
(overlay-put overlay 'before-string nil)))) (overlay-put overlay 'before-string nil))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment