Artifact
dc9fe27fbe11d5201ddf0be6148c4fb0e1933405:
Attachment "report.tcl.var-size-cols.patch" to
ticket [1204345fff]
added by
bschofield
2005-05-18 22:07:39.
10c10
< # RCS: @(#) $Id$
---
> # RCS: @(#) $Id: report.tcl,v 1.8 2004/01/15 06:36:13 andreas_kupries Exp $
13c13
< package provide report 0.3.2
---
> package provide report 0.3.1
860,863d859
< if {[string equal $size var]} {
< set csize($column) 0
< return ""
< }
867,868c863
< if {$size < 0} {
< # allow 0 for variable size cells
---
> if {$size <= 0} {
908c903
< if {$size <= -1} {
---
> if {$size <= 0} {
1342c1337
< if {$vlen == $size || $size == 0} {
---
> if {$vlen == $size} {
1344d1338
< # or no column width formatting is required
