[Emacs-diffs] /srv/bzr/emacs/trunk r105752: * lisp/help.el (describe-key-briefly): Copy previous standard-output change.

[Glenn Morris]

------------------------------------------------------------
revno: 105752
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2011-09-13 00:22:05 -0700
message:
  * lisp/help.el (describe-key-briefly): Copy previous standard-output change.
modified:
  lisp/ChangeLog
  lisp/help.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-09-13 07:18:13 +0000
+++ b/lisp/ChangeLog    2011-09-13 07:22:05 +0000
@@ -1,3 +1,7 @@
+2011-09-13  Glenn Morris  <address@hidden>
+
+       * help.el (describe-key-briefly): Copy previous standard-output change.
+
 2011-09-13  PJ Weisberg  <address@hidden>  (tiny change)
 
        * help.el (where-is): Respect non-standard standard-output.  (Bug#9030)

=== modified file 'lisp/help.el'
--- a/lisp/help.el      2011-09-13 07:18:13 +0000
+++ b/lisp/help.el      2011-09-13 07:22:05 +0000
@@ -625,7 +625,7 @@
                    (aref key 1)
                  (aref key 0)))
         (modifiers (event-modifiers event))
-        (standard-output (if insert (current-buffer) t))
+        (standard-output (if insert (current-buffer) standard-output))
         (mouse-msg (if (or (memq 'click modifiers) (memq 'down modifiers)
                            (memq 'drag modifiers)) " at that spot" ""))
         (defn (key-binding key t))