Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv6163
Modified Files:
qcalc.q
Log Message:
bugfixes
Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.132
retrieving revision 1.133
diff -C2 -d -r1.132 -r1.133
*** qcalc.q 12 Nov 2007 18:16:34 -0000 1.132
--- qcalc.q 12 Nov 2007 18:20:52 -0000 1.133
***************
*** 917,921 ****
if not is_nil IT where IT:QtObject = qt TABLE "item" (I,J):
= IT where (_,_,_|_) = qt_data IT;
! = qt IT "setText" S || qt IT "setPixmap" PM || IT
where S = cell_text (I,J), PM = cell_pixmap (I,J),
IT:QtObject = make_table_item (I,J) $
--- 917,922 ----
if not is_nil IT where IT:QtObject = qt TABLE "item" (I,J):
= IT where (_,_,_|_) = qt_data IT;
! = qt IT "setText" S || qt IT "setPixmap" PM ||
! qt TABLE "updateCell" (I,J) || IT
where S = cell_text (I,J), PM = cell_pixmap (I,J),
IT:QtObject = make_table_item (I,J) $
|