[40693] trunk/base/src/port/port.tcl

raimue at macports.org raimue at macports.org
Fri Oct 10 16:35:40 PDT 2008


Revision: 40693
          http://trac.macports.org/changeset/40693
Author:   raimue at macports.org
Date:     2008-10-10 16:35:39 -0700 (Fri, 10 Oct 2008)
Log Message:
-----------
port/port.tcl:
Fix 'port cat'; A newline was always appended on the end of the file and there
was a problem with files larger than 4096 bytes. Closes #16817

Modified Paths:
--------------
    trunk/base/src/port/port.tcl

Modified: trunk/base/src/port/port.tcl
===================================================================
--- trunk/base/src/port/port.tcl	2008-10-10 22:53:30 UTC (rev 40692)
+++ trunk/base/src/port/port.tcl	2008-10-10 23:35:39 UTC (rev 40693)
@@ -2306,7 +2306,7 @@
                     # Copy the portfile to standard output
                     set f [open $portfile RDONLY]
                     while { ![eof $f] } {
-                        puts [read $f 4096]
+                        puts -nonewline [read $f 4096]
                     }
                     close $f
                 }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20081010/ab576ad8/attachment.html 


More information about the macports-changes mailing list