(shr-ensure-paragraph): Fix the non-empty line case.

[gnus] / lisp / shr.el

diff --git a/lisp/shr.el b/lisp/shr.el
index 118afe2..bfcb91e 100644 (file)
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -101,7 +101,7 @@ fit these criteria."
          (insert "\n"))
       (if (save-excursion
            (beginning-of-line)
-           (looking-at " *"))
+           (looking-at " *$"))
          (insert "\n")
        (insert "\n\n")))))