Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv5416
Modified Files:
qcalc.q
Log Message:
bugfixes
Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.167
retrieving revision 1.168
diff -C2 -d -r1.167 -r1.168
*** qcalc.q 18 Nov 2007 05:22:22 -0000 1.167
--- qcalc.q 18 Nov 2007 05:49:12 -0000 1.168
***************
*** 2807,2812 ****
if C = "MyComboEdit";
= // confine the value to the given range and step size
! if Y<>Y0 then recursive (qt X "setValue" Y) ||
! process_gui2 (I,J) X || digest_loop
where Y0 = qt X "value" (),
MIN = qt X "minValue" (),
--- 2807,2811 ----
if C = "MyComboEdit";
= // confine the value to the given range and step size
! if Y<>Y0 then qt X "setValue" Y
where Y0 = qt X "value" (),
MIN = qt X "minValue" (),
|
