[q-lang-cvs] qcalc qcalc.q,1.167,1.168

[Albert G. <ag...@us...>]

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" (),