X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/4787a496a05fdc03241850b45911dd283d4b06b8..5df4f04cd32af723742c81095b38ae83b3c2b462:/lisp/eshell/em-smart.el?ds=sidebyside

diff --git a/lisp/eshell/em-smart.el b/lisp/eshell/em-smart.el
index bc844215d1..f988076107 100644
--- a/lisp/eshell/em-smart.el
+++ b/lisp/eshell/em-smart.el
@@ -1,7 +1,7 @@
 ;;; em-smart.el --- smart display of output
 
-;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009, 2010, 2011  Free Software Foundation, Inc.
 
 ;; Author: John Wiegley <johnw@gnu.org>
 
@@ -71,7 +71,8 @@
 
 (eval-when-compile (require 'eshell))
 
-(defgroup eshell-smart nil
+;;;###autoload
+(eshell-defgroup eshell-smart nil
   "This module combines the facility of normal, modern shells with
 some of the edit/review concepts inherent in the design of Plan 9's
 9term.  See the docs for more details.
@@ -290,7 +291,7 @@ and the end of the buffer are still visible."
 	(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)))
@@ -322,5 +323,9 @@ and the end of the buffer are still visible."
 
 (provide 'em-smart)
 
+;; Local Variables:
+;; generated-autoload-file: "esh-groups.el"
+;; End:
+
 ;; arch-tag: 8c0112c7-379c-4d54-9a1c-204d68786a4b
 ;;; em-smart.el ends here