emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog eshell/em-smart.el eshell/...


From: Glenn Morris
Subject: [Emacs-diffs] emacs/lisp ChangeLog eshell/em-smart.el eshell/...
Date: Fri, 09 Jan 2009 04:23:42 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/01/09 04:23:42

Modified files:
        lisp           : ChangeLog 
        lisp/eshell    : em-smart.el esh-mode.el 

Log message:
        Replace last-command-char with last-command-event.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15068&r2=1.15069
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/eshell/em-smart.el?cvsroot=emacs&r1=1.26&r2=1.27
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/eshell/esh-mode.el?cvsroot=emacs&r1=1.39&r2=1.40

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15068
retrieving revision 1.15069
diff -u -b -r1.15068 -r1.15069
--- ChangeLog   9 Jan 2009 04:21:17 -0000       1.15068
+++ ChangeLog   9 Jan 2009 04:23:38 -0000       1.15069
@@ -7,6 +7,7 @@
        * calc/calc-keypd.el, calc/calc-misc.el, calc/calc-prog.el:
        * calc/calc-sel.el, calc/calc-store.el, calc/calc-stuff.el:
        * calc/calc-units.el, calc/calc-yank.el, calc/calc.el:
+       * eshell/em-smart.el, eshell/esh-mode.el:
        * play/mpuz.el:
        * progmodes/ada-mode.el, progmodes/antlr-mode.el, progmodes/cc-align.el:
        * progmodes/cc-cmds.el, progmodes/cperl-mode.el, progmodes/f90.el:

Index: eshell/em-smart.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/eshell/em-smart.el,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -b -r1.26 -r1.27
--- eshell/em-smart.el  5 Jan 2009 03:21:45 -0000       1.26
+++ eshell/em-smart.el  9 Jan 2009 04:23:41 -0000       1.27
@@ -291,7 +291,7 @@
        (setq clear t)
       (cond
        ((eq this-command 'self-insert-command)
-       (if (eq last-command-char ? )
+       (if (eq last-command-event ? )
            (if (and eshell-smart-space-goes-to-end
                     eshell-current-command)
                (if (not (pos-visible-in-window-p (point-max)))

Index: eshell/esh-mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/eshell/esh-mode.el,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -b -r1.39 -r1.40
--- eshell/esh-mode.el  5 Jan 2009 03:21:47 -0000       1.39
+++ eshell/esh-mode.el  9 Jan 2009 04:23:41 -0000       1.40
@@ -1,7 +1,7 @@
 ;;; esh-mode.el --- user interface
 
-;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009  Free Software Foundation, Inc.
 
 ;; Author: John Wiegley <address@hidden>
 
@@ -484,9 +484,9 @@
   (interactive "i")
   (process-send-string
    (eshell-interactive-process)
-   (char-to-string (if (symbolp last-command-char)
-                      (get last-command-char 'ascii-character)
-                    last-command-char))))
+   (char-to-string (if (symbolp last-command-event)
+                      (get last-command-event 'ascii-character)
+                    last-command-event))))
 
 (defun eshell-intercept-commands ()
   (when (and (eshell-interactive-process)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]