src/repl.lisp
Sun May 31 23:06:50 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Undo support for tick tack toe
--- old-qt.examples/src/repl.lisp 2014-10-30 07:37:59.000000000 +0100
+++ new-qt.examples/src/repl.lisp 2014-10-30 07:37:59.000000000 +0100
@@ -12,7 +12,6 @@
:initform (make-instance 'qt:line-edit)))
(:metaclass cxx:class))
-
(defun append-list-model (list-model string)
"Appends STRING to LIST-MODEL."
(let ((index (cxx:row-count list-model)))