[q-lang-cvs] qcalc qcalc.q,1.112,1.113

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

Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv13281

Modified Files:
	qcalc.q 
Log Message:
remove debugging output

Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.112
retrieving revision 1.113
diff -C2 -d -r1.112 -r1.113
*** qcalc.q	8 Nov 2007 21:30:58 -0000	1.112
--- qcalc.q	8 Nov 2007 21:42:57 -0000	1.113
***************
*** 939,944 ****
  gui_update X (I,J) _
  if is_global and then not is_recursive and then not is_nil X:
! 		= puts "gui_update\n" ||
! 		  if (I,J)<>current_cell then
  		    (qt TABLE "setCurrentCell" (I,J) ||
  		     qt TABLE "clearSelection" ()) ||
--- 939,943 ----
  gui_update X (I,J) _
  if is_global and then not is_recursive and then not is_nil X:
! 		= if (I,J)<>current_cell then
  		    (qt TABLE "setCurrentCell" (I,J) ||
  		     qt TABLE "clearSelection" ()) ||