[23901] users/pipping/find_dependents.pl

source_changes at macosforge.org source_changes at macosforge.org
Thu Apr 12 10:00:07 PDT 2007


Revision: 23901
          http://trac.macosforge.org/projects/macports/changeset/23901
Author:   pipping at macports.org
Date:     2007-04-12 10:00:07 -0700 (Thu, 12 Apr 2007)

Log Message:
-----------
 * <ignore me>

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

Modified: users/pipping/find_dependents.pl
===================================================================
--- users/pipping/find_dependents.pl	2007-04-12 16:48:39 UTC (rev 23900)
+++ users/pipping/find_dependents.pl	2007-04-12 17:00:07 UTC (rev 23901)
@@ -10,12 +10,12 @@
 my $leading_comment       = qr{(?:^|\n)(?>\s*)#(?>.*)};
 my $connecting_backslash  = qr{\s*\\\n\s*};
 
-my $quick_check = qr{:$port}i;
+my $quick_check = qr{:$port}io;
 my $dependency  = qr{
                     (?=[plb])(?:port|(?:path|lib|bin):[^:]+)  # kind
                     :                                         # separator
                     (?i:${port})\b                            # name
-                  }x;
+                  }xo;
 
 $/ = ".\n";
 
@@ -25,13 +25,13 @@
   while (<>) {
     # make a quick and dirty check if the port has a remote chance of
     # depending on $port
-    if ( m{$quick_check}o ) {
+    if ( m{$quick_check} ) {
 
-      s{$connecting_backslash}{ }o;   # merge backslash-connected lines
-      s{$leading_comment}{}o;         # remove leading comments
-      s{$trailing_comment}{}o;        # remove trailing comments
+      s{$connecting_backslash}{ };    # merge backslash-connected lines
+      s{$leading_comment}{};          # remove leading comments
+      s{$trailing_comment}{};         # remove trailing comments
 
-      if ( m{$dependency}o ) {
+      if ( m{$dependency} ) {
         $portfile =~ s{/Portfile$}{}; # remove trailing '/Portfile'
         print "$portfile\n";
       }

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


More information about the macports-changes mailing list