(erc-input-message): Replace last-command-char with last-command-event.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog
index bc11adc7f75..aeae366a1d5 100644
--- a/lisp/erc/ChangeLog
+++ b/lisp/erc/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-09  Glenn Morris  <rgm@gnu.org>
+
+        * erc.el (erc-input-message): Replace last-command-char with
+        last-command-event.
+
 2009-01-08  Glenn Morris  <rgm@gnu.org>
 
         * erc.el (tabbar--local-hlf): Silence compiler.
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index a1762d84d94..756ecef14fd 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -3708,7 +3708,7 @@ If FACE is non-nil, it will be used to propertize the prompt.  If it is nil,
   (let ((minibuffer-allow-text-properties t)
         (read-map minibuffer-local-map))
     (insert (read-from-minibuffer "Message: "
-                                  (string last-command-char) read-map))
+                                  (string last-command-event) read-map))
     (erc-send-current-line)))
 
 (defvar erc-action-history-list ()