(gdb-gud-context-call): Does not need to be a macro.

[gnu-emacs] / lisp / progmodes / tcl.el

diff --git a/lisp/progmodes/tcl.el b/lisp/progmodes/tcl.el
index 2484146abc3d1def2612de3a6a4c64397cb040c7..8760df78ddf95a2c07f90fe0552bdedbbb2bb2e3 100644 (file)
--- a/lisp/progmodes/tcl.el
+++ b/lisp/progmodes/tcl.el
@@ -634,7 +634,7 @@ Commands:
   ;; Indent line first; this looks better if parens blink.
   (tcl-indent-line)
   (self-insert-command arg)
-  (if (and tcl-auto-newline (= last-command-char ?\;))
+  (if (and tcl-auto-newline (= last-command-event ?\;))
       (progn
        (newline)
        (tcl-indent-line))))
@@ -658,7 +658,7 @@ Commands:
        ;; In auto-newline case, must insert a newline after each
        ;; brace.  So an explicit loop is needed.
        (while (> arg 0)
-         (insert last-command-char)
+         (insert last-command-event)
          (tcl-indent-line)
          (newline)
          (setq arg (1- arg))))