Changeset 80586

Timestamp:

07/15/11 07:07:20 (4 years ago)

Author:

jmr@…

Message:

don't use subdir when fetching archive from an explicit porturl

File:

• trunk/base/src/package1.0/portarchivefetch.tcl (modified) (1 diff)

trunk/base/src/package1.0/portarchivefetch.tcl

@@ -79 +79 @@
     if {[file rootname [file tail $porturl]] == [file rootname [file tail [get_portimage_path]]]} {
         lappend ret [string range $porturl 0 end-[string length [file tail $porturl]]]
+        archive.subdir
     }
     return $ret