[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Changes to gnats/contrib/tkgnats/tkpr_library.tcl
From: |
Michael Richardson |
Subject: |
Changes to gnats/contrib/tkgnats/tkpr_library.tcl |
Date: |
Tue, 07 Jan 2003 15:46:32 -0500 |
Index: gnats/contrib/tkgnats/tkpr_library.tcl
diff -c gnats/contrib/tkgnats/tkpr_library.tcl:1.8
gnats/contrib/tkgnats/tkpr_library.tcl:1.9
*** gnats/contrib/tkgnats/tkpr_library.tcl:1.8 Tue Jan 7 15:45:10 2003
--- gnats/contrib/tkgnats/tkpr_library.tcl Tue Jan 7 15:46:32 2003
***************
*** 1879,1885 ****
if {[info exists flds($field)]} {
set tlength [string length $flds($field)]
! puts stderr "field $field ($flds($field) has length: $tlength"
} {
set tlength 0
}
--- 1879,1885 ----
if {[info exists flds($field)]} {
set tlength [string length $flds($field)]
! #puts stderr "field $field ($flds($field) has length: $tlength"
} {
set tlength 0
}