(last-input-char, last-command-char): Move here from src/keyboard.c.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b3cf4e1deceb170f57fb810c58162a7e58df1c9..db149e7d739d3fb8feed6c6110529549a8460fd1 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-09  Glenn Morris  <rgm@gnu.org>
+
+       * subr.el (last-input-char, last-command-char):
+       Move here from src/keyboard.c.
+
 2009-01-09  Dave Love  <fx@gnu.org>
 
        * calendar/time-date.el: Require cl for `declare'.

diff --git a/lisp/subr.el b/lisp/subr.el
index ee95f48513290b833790417246bba9919a6011a0..c2d3e074fcce0ddaae52b1ff6bbca2f49a6f5b58 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1059,6 +1059,16 @@ to reread, so it now uses nil to mean `no event', instead of -1."
 (make-obsolete-variable 'translation-table-for-input nil "23.1")
 
 (defvaralias 'messages-buffer-max-lines 'message-log-max)
+
+;; These aliases exist in Emacs 19.34, and probably before, but were
+;; only marked as obsolete in 23.1.
+;; The lisp manual (since at least Emacs 21) descrribes them as
+;; existing "for compatibility with Emacs version 18".
+(define-obsolete-variable-alias 'last-input-char 'last-input-event
+  "at least 19.34")
+(define-obsolete-variable-alias 'last-command-char 'last-command-event
+  "at least 19.34")
+
 \f
 ;;;; Alternate names for functions - these are not being phased out.