[63544] trunk/base/src/port1.0

raimue at macports.org raimue at macports.org
Sun Feb 7 20:17:11 PST 2010


Revision: 63544
          http://trac.macports.org/changeset/63544
Author:   raimue at macports.org
Date:     2010-02-07 20:17:09 -0800 (Sun, 07 Feb 2010)
Log Message:
-----------
port1.0, macports1.0:
Remove unnecessary file join

Modified Paths:
--------------
    trunk/base/src/port1.0/portclean.tcl
    trunk/base/src/port1.0/portutil.tcl

Modified: trunk/base/src/port1.0/portclean.tcl
===================================================================
--- trunk/base/src/port1.0/portclean.tcl	2010-02-08 04:07:24 UTC (rev 63543)
+++ trunk/base/src/port1.0/portclean.tcl	2010-02-08 04:17:09 UTC (rev 63544)
@@ -203,7 +203,7 @@
 }
 proc portclean::clean_logs {args} {
     global portpath portbuildpath worksymlink name portverbose keeplogs prefix
-    set logpath [file join [getportlogpath $portpath]]
+    set logpath [getportlogpath $portpath]
   	if {[file isdirectory $logpath]} {
         ui_debug "Removing directory: ${logpath}"
         if {[catch {delete $logpath} result]} {

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2010-02-08 04:07:24 UTC (rev 63543)
+++ trunk/base/src/port1.0/portutil.tcl	2010-02-08 04:17:09 UTC (rev 63544)
@@ -1362,7 +1362,7 @@
         }
         if {[exists copy_log_files]} {
             set log_files [option copy_log_files]
-            set log_dir [file join [getportlogpath $portpath]]
+            set log_dir [getportlogpath $portpath]
             file mkdir $log_dir
  
             foreach log_file $log_files {
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100207/635be607/attachment.html>


More information about the macports-changes mailing list