Changeset 994 for trunk/base

Timestamp:

Oct 8, 2002, 3:01:05 PM (22 years ago)

Author:

jkh

Message:

Remove a debugging puts

File:

• trunk/base/src/port1.0/portutil.tcl (modified) (2 diffs)

trunk/base/src/port1.0/portutil.tcl

@@ -325 +325 @@
     seek $input 0
 
-        # copy from strsed output back into the input
+    # copy from strsed output back into the input
     if {[catch {fcopy $output $input} error]} {
         ui_error "reinplace: $error"
@@ -335 +335 @@
         
     set eof [file size "$tmpfile"]
-    puts "$tmpfile $eof"
     ftruncate $input $eof