Changeset 80779

Timestamp:

07/17/11 06:18:29 (4 years ago)

Author:

jmr@…

Message:

fix setting livecheck.name from sourceforge master_sites using the new layout

File:

• trunk/base/src/port1.0/portlivecheck.tcl (modified) (1 diff)

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

@@ -102 +102 @@
             foreach {master_site} ${master_sites} {
                 if {[regexp "^($available_types)(?::(\[^:\]+))?" ${master_site} _ site subdir]} {
+                    set subdirs [split $subdir /]
+                    if {[llength $subdirs] > 1} {
+                        if {[lindex $subdirs 0] == "project"} {
+                            set subdir [lindex $subdirs 1]
+                        } else {
+                            set subdir ""
+                        }
+                    }
                     if {${subdir} ne "" && ${livecheck.name} eq "default"} {
                         set livecheck.name ${subdir}