Update of /cvsroot/q-lang/qcalc
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv10599
Modified Files:
qcalc.q
Log Message:
set word wrap on all custom table items
Index: qcalc.q
===================================================================
RCS file: /cvsroot/q-lang/qcalc/qcalc.q,v
retrieving revision 1.145
retrieving revision 1.146
diff -C2 -d -r1.145 -r1.146
*** qcalc.q 15 Nov 2007 09:54:05 -0000 1.145
--- qcalc.q 15 Nov 2007 10:15:48 -0000 1.146
***************
*** 927,932 ****
spanned_table_item (I,J) (N,M)
! = qt IT "setSpan" (N,M) ||
! qt IT "setWordWrap" (N>1) || IT
if not is_nil IT
where (I0,J0) = real_index (I,J),
--- 927,931 ----
spanned_table_item (I,J) (N,M)
! = qt IT "setSpan" (N,M) || IT
if not is_nil IT
where (I0,J0) = real_index (I,J),
***************
*** 937,940 ****
--- 936,940 ----
= qt TABLE "setItem" (I,J,IT) ||
qt IT "setSpan" (N,M) ||
+ qt IT "setWordWrap" true ||
insert_cells ((I,J),IT) || IT
if not is_nil IT
|