[Emacs-diffs] /srv/bzr/emacs/trunk r110477: shr.el (shr-insert): \r is also not inserted, so don't try to delete it

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 110477
author: Lars Magne Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Tue 2012-10-09 02:28:34 +0000
message:
  shr.el (shr-insert): \r is also not inserted, so don't try to delete it
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/shr.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-10-06 20:30:26 +0000
+++ b/lisp/gnus/ChangeLog       2012-10-09 02:28:34 +0000
@@ -1,3 +1,8 @@
+2012-10-09  Lars Magne Ingebrigtsen  <address@hidden>
+
+       * shr.el (shr-insert): \r is also not inserted, so don't try to delete
+       it.
+
 2012-10-06  Glenn Morris  <address@hidden>
 
        * gnus-notifications.el (gnus-notifications):

=== modified file 'lisp/gnus/shr.el'
--- a/lisp/gnus/shr.el  2012-07-17 11:52:00 +0000
+++ b/lisp/gnus/shr.el  2012-10-09 02:28:34 +0000
@@ -391,7 +391,7 @@
            (shr-indent))
          (end-of-line))
        (insert " ")))
-    (unless (string-match "[ \t\n?]\\'" text)
+    (unless (string-match "[ \t\r\n?]\\'" text)
       (delete-char -1)))))
 
 (defun shr-find-fill-point ()