[Emacs-diffs] emacs/lisp ChangeLog subr.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/01/09 03:28:59

Modified files:
        lisp           : ChangeLog subr.el 

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

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15063&r2=1.15064
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/subr.el?cvsroot=emacs&r1=1.628&r2=1.629

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15063
retrieving revision 1.15064
diff -u -b -r1.15063 -r1.15064
--- ChangeLog   9 Jan 2009 03:12:01 -0000       1.15063
+++ ChangeLog   9 Jan 2009 03:28:56 -0000       1.15064
@@ -1,3 +1,8 @@
+2009-01-09  Glenn Morris  <address@hidden>
+
+       * subr.el (last-input-char, last-command-char):
+       Move here from src/keyboard.c.
+
 2009-01-09  Dave Love  <address@hidden>
 
        * calendar/time-date.el: Require cl for `declare'.

Index: subr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/subr.el,v
retrieving revision 1.628
retrieving revision 1.629
diff -u -b -r1.628 -r1.629
--- subr.el     5 Jan 2009 03:19:47 -0000       1.628
+++ subr.el     9 Jan 2009 03:28:59 -0000       1.629
@@ -1060,6 +1060,16 @@
 
 (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.
 
 (defalias 'send-string 'process-send-string)