[gnus git] branch master updated: m0-3-84-g26eca13 =1= (shr-insert): Only insert a blank line if we're starting from an image.
Lars Magne Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 26eca13465f697cd34c9ce6a4a9321eecc17b15c (commit)
from 805a2f5d5bfe7110709d7e092c8b9427d73dc672 (commit)
- Log -----------------------------------------------------------------
commit 26eca13465f697cd34c9ce6a4a9321eecc17b15c
Author: Lars Magne Ingebrigtsen <[email protected]>
Date: Mon Mar 19 14:21:43 2012 +0100
(shr-insert): Only insert a blank line if we're starting from an image.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2b52a65..d6b2626 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,7 @@
space. This seems to produce more pleasing results.
(shr-tag-br): Make <br> only ensure a line break instead of always
creating a blank line. This looks more readable in my test corpus.
+ (shr-insert): Only insert a blank line if we're starting from an image.
2012-03-15 Elias Pipping <[email protected]>
diff --git a/lisp/shr.el b/lisp/shr.el
index f46afaa..3ca7f1c 100644
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -333,6 +333,7 @@ size, and full-buffer size."
(defun shr-insert (text)
(when (and (eq shr-state 'image)
+ (not (bolp))
(not (string-match "\\`[ \t\n]+\\'" text)))
(insert "\n")
(setq shr-state nil))
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 1 +
lisp/shr.el | 1 +
2 files changed, 2 insertions(+), 0 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project