[Emacs-diffs] /srv/bzr/emacs/trunk r102029: gnus-sum.el (gnus-summary-edit-article-done): Bind replace-result.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 102029
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Thu 2010-10-21 02:52:45 +0000
message:
  gnus-sum.el (gnus-summary-edit-article-done): Bind replace-result.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/gnus-sum.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2010-10-21 02:44:47 +0000
+++ b/lisp/gnus/ChangeLog       2010-10-21 02:52:45 +0000
@@ -1,3 +1,7 @@
+2010-10-21  Katsumi Yamaoka  <address@hidden>
+
+       * gnus-sum.el (gnus-summary-edit-article-done): Bind replace-result.
+
 2010-10-21  Lars Magne Ingebrigtsen  <address@hidden>
 
        * gnus.el (gnus-message-archive-group): Quote value.

=== modified file 'lisp/gnus/gnus-sum.el'
--- a/lisp/gnus/gnus-sum.el     2010-10-21 01:23:34 +0000
+++ b/lisp/gnus/gnus-sum.el     2010-10-21 02:52:45 +0000
@@ -10278,7 +10278,8 @@
          (insert (number-to-string lines))))))
   ;; Replace the article.
   (let ((buf (current-buffer))
-       (article (cdr gnus-article-current)))
+       (article (cdr gnus-article-current))
+       replace-result)
     (with-temp-buffer
       (insert-buffer-substring buf)
       (if (and (not read-only)