diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b3cf4e1dec..db149e7d739 100644
--- 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 ee95f485132..c2d3e074fcc 100644
--- 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")
+
 
 ;;;; Alternate names for functions - these are not being phased out.