[gsharp-cvs] CVS update: gsharp/gui.lisp

[Robert Strandh]

Update of /project/gsharp/cvsroot/gsharp
In directory common-lisp.net:/tmp/cvs-serv22319

Modified Files:
	gui.lisp 
Log Message:
Forgot to save buffer before committing. 

Date: Thu Feb 19 03:50:27 2004
Author: rstrandh

Index: gsharp/gui.lisp
diff -u gsharp/gui.lisp:1.5 gsharp/gui.lisp:1.6
--- gsharp/gui.lisp:1.5	Thu Feb 19 01:39:41 2004
+++ gsharp/gui.lisp	Thu Feb 19 03:50:27 2004
@@ -1063,7 +1063,7 @@
 (define-gsharp-command com-end-kbd-macro ()
   (message "keyboad macro defined~%")
   (setf *kbd-macro-recording-p* nil
-	*kbd-macro-keys* (nreverse *kbd-macro-keys*)))
+	*kbd-macro-keys* (nreverse (cddr *kbd-macro-keys*))))
 
 (define-gsharp-command com-call-last-kbd-macro ()
   (loop with commands = *global-command-table*