[82535] trunk/dports/_resources/port1.0/group/app-1.0.tcl

[ryandesign at macports.org]

Revision: 82535
          http://trac.macports.org/changeset/82535
Author:   ryandesign at macports.org
Date:     2011-08-15 05:47:38 -0700 (Mon, 15 Aug 2011)
Log Message:
-----------
app-1.0.tcl: app.identifier: strip periods in app.name portion; strip illegal chars everywhere

Modified Paths:
--------------
    trunk/dports/_resources/port1.0/group/app-1.0.tcl

Modified: trunk/dports/_resources/port1.0/group/app-1.0.tcl
===================================================================
--- trunk/dports/_resources/port1.0/group/app-1.0.tcl	2011-08-15 12:41:03 UTC (rev 82534)
+++ trunk/dports/_resources/port1.0/group/app-1.0.tcl	2011-08-15 12:47:38 UTC (rev 82535)
@@ -134,8 +134,8 @@
         set identifier [lrange ${identifier} 1 end]
     }
     set identifier [lreverse ${identifier}]
-    lappend identifier [regsub -all -nocase {[^a-z0-9.-]} ${app.name} "-"]
-    return [join ${identifier} .]
+    lappend identifier [string map {"." ""} ${app.name}]
+    return [regsub -all -nocase {[^a-z0-9.-]} [join ${identifier} .] ""]
 }
 
 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20110815/238e0394/attachment.html>