Changes to gnats/contrib/tkgnats/tkpr_library.tcl

Michael Richardson <[email protected]> Tue, 07 Jan 2003 15:46:32 -0500

Newsgroups	gmane.comp.bug-tracking.gnats.patches
Message-ID	<[email protected]>

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
  	    }