src/repl.lisp
Tue Apr 14 16:29:54 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Use overloaded cxx methods
--- old-qt.examples/src/repl.lisp 2014-10-30 07:39:10.000000000 +0100
+++ new-qt.examples/src/repl.lisp 2014-10-30 07:39:10.000000000 +0100
@@ -17,7 +17,7 @@
(let ((index (cxx:row-count list-model)))
(unless (cxx:insert-row list-model index)
(error "insert-row ~A for ~A failed." index list-model))
- (cxx:set-data list-model (cxx:index list-model index 0)
+ (cxx:set-data list-model (cxx:index list-model index)
(qt::make-variant string))))
(defmethod initialize-instance :after ((repl repl) &rest args)