[q-lang-cvs] qcalc calclib.q,1.30,1.31 qcalc.q,1.151,1.152

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

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

Modified Files:
	calclib.q qcalc.q 
Log Message:
make action buttons flat

Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.151
retrieving revision 1.152
diff -C2 -d -r1.151 -r1.152
*** qcalc.q	16 Nov 2007 07:03:28 -0000	1.151
--- qcalc.q	16 Nov 2007 07:08:12 -0000	1.152
***************
*** 2447,2451 ****
  
  actionbutton_gui (I,J) () (TEXT,ICON,INIT)
! 		= qt_connect X (SIGNAL "clicked()") X (SLOT "guiUpdate()") ||
  		  gui_set_actionbutton X INIT ||
  		  qt TABLE "setCellWidget" (I,J,X) || IT
--- 2447,2452 ----
  
  actionbutton_gui (I,J) () (TEXT,ICON,INIT)
! 		= qt X "setFlat" true ||
! 		  qt_connect X (SIGNAL "clicked()") X (SLOT "guiUpdate()") ||
  		  gui_set_actionbutton X INIT ||
  		  qt TABLE "setCellWidget" (I,J,X) || IT

Index: calclib.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/calclib.q,v
retrieving revision 1.30
retrieving revision 1.31
diff -C2 -d -r1.30 -r1.31
*** calclib.q	16 Nov 2007 06:52:52 -0000	1.30
--- calclib.q	16 Nov 2007 07:08:12 -0000	1.31
***************
*** 140,149 ****
    hslider ARGS, vslider ARGS, pushbutton ARGS, togglebutton ARGS;
  
! /* The action button is a special push button which has an associated Q
!    expression (special argument) to be evaluated in the inferior Q process
!    whenever the button is clicked. The ARGS parameter has the same format as
!    for toggle buttons (the INIT parameter specifies the initial value of the
!    button, 0 by default). The result returned by the action expression (which
!    can be any Q value) becomes the value of the button when it is clicked. */
  
  public special actionbutton ~ARGS X;
--- 140,150 ----
    hslider ARGS, vslider ARGS, pushbutton ARGS, togglebutton ARGS;
  
! /* The action button is a special push button with a slightly different visual
!    appearance, which has an associated Q expression (special argument) to be
!    evaluated in the inferior Q process whenever the button is clicked. The
!    ARGS parameter has the same format as for toggle buttons (the INIT
!    parameter specifies the initial value of the button, 0 by default). The
!    result returned by the action expression (which can be any Q value) becomes
!    the value of the button when it is clicked. */
  
  public special actionbutton ~ARGS X;