# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 708120422 0
# Node ID e2780d9a814cf06f6539c03eea732611e8077364
# Parent  c89caa39704a5f6c6e6534078688e4ef0d7d960b
*** empty log message ***

diff -r c89caa39704a -r e2780d9a814c lisp/electric.el
--- a/lisp/electric.el	Tue Jun 09 18:16:08 1992 +0000
+++ b/lisp/electric.el	Tue Jun 09 20:07:02 1992 +0000
@@ -95,6 +95,7 @@
       (if cmd
 	  (condition-case conditions
 	      (progn (command-execute cmd)
+		     (setq last-command this-command)
 		     (if (or (prog1 quit-flag (setq quit-flag nil))
 			     (= last-input-char ?\C-g))
 			 (progn (setq unread-command-char -1)