[23733] users/pipping/test.pl

[source_changes at macosforge.org]

Revision: 23733
          http://trac.macosforge.org/projects/macports/changeset/23733
Author:   pipping at macports.org
Date:     2007-04-07 18:52:41 -0700 (Sat, 07 Apr 2007)

Log Message:
-----------
 * ignore case for $port

Modified Paths:
--------------
    users/pipping/test.pl

Modified: users/pipping/test.pl
===================================================================
--- users/pipping/test.pl	2007-04-08 00:02:32 UTC (rev 23732)
+++ users/pipping/test.pl	2007-04-08 01:52:41 UTC (rev 23733)
@@ -16,7 +16,7 @@
     # depending on $port
     if ($_ =~ m{
         :$port
-    }x)
+    }ix)
     {
       # concatenate lines connected through trailing backslashes
       s{\s*\\\n\s*}{ }mgi;
@@ -28,7 +28,7 @@
       if ($_ =~ m{
         depends_(?:build|run|lib)(?:-(?:append|delete))?
         .*
-        (?:port|(?:path|lib|bin):[^:]+):${port}(?:\s|$)}x)
+        (?:port|(?:path|lib|bin):[^:]+):(?i:${port})(?:\s|$)}x)
       {
         # remove trailing '/Portfile' in the path
         $portfile =~ s{\/Portfile$}{};

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070407/49d063a3/attachment.html