Changeset 82551

Timestamp:

08/15/11 11:12:16 (4 years ago)

Author:

jmr@…

Message:

perl5 portgroup, p5-text-tabsxwrap: allow overriding name before calling perl5.setup, so invalid subport names can be avoided

Location:

trunk/dports

Files:

• _resources/port1.0/group/perl5-1.0.tcl (modified) (3 diffs)
• perl/p5-text-tabsxwrap/Portfile (modified) (1 diff)

trunk/dports/_resources/port1.0/group/perl5-1.0.tcl

@@ -90 +90 @@
     }
 
-    name                p5-[string tolower ${perl5.module}]
+    if {![info exists name]} {
+        name            p5-[string tolower ${perl5.module}]
+    }
     version             [perl5_convert_version ${perl5.moduleversion}]
     categories          perl
@@ -99 +101 @@
     dist_subdir         perl5
 
+    set rootname        [string range $name 3 end]
+
     foreach v ${perl5.branches} {
-        subport p${v}-[string tolower ${perl5.module}] { depends_lib port:perl${v} }
+        subport p${v}-${rootname} { depends_lib port:perl${v} }
     }
 
@@ -107 +111 @@
         distfiles
         supported_archs noarch
-        replaced_by p[option perl5.default_branch]-[string tolower ${perl5.module}]
-        depends_lib port:p[option perl5.default_branch]-[string tolower ${perl5.module}]
+        replaced_by p[option perl5.default_branch]-${rootname}
+        depends_lib port:p[option perl5.default_branch]-${rootname}
         use_configure no
         build {}

trunk/dports/perl/p5-text-tabsxwrap/Portfile

@@ -5 +5 @@
 PortGroup           perl5 1.0
 
+name                p5-text-tabsxwrap
 perl5.setup         Text-Tabs+Wrap 2009.0305
 revision            2
-name                p5-text-tabsxwrap
 platforms           darwin
 maintainers         l2g