[23841] users/pipping/test.pl

[source_changes at macosforge.org]

Revision: 23841
          http://trac.macosforge.org/projects/macports/changeset/23841
Author:   pipping at macports.org
Date:     2007-04-10 18:19:46 -0700 (Tue, 10 Apr 2007)

Log Message:
-----------
 * enclose whitespace in atomic grouping

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

Modified: users/pipping/test.pl
===================================================================
--- users/pipping/test.pl	2007-04-10 22:07:08 UTC (rev 23840)
+++ users/pipping/test.pl	2007-04-11 01:19:46 UTC (rev 23841)
@@ -6,8 +6,8 @@
 my $port = $ARGV[0];
 
 # prepare freqently used regexes
-my $trailing_comment      = qr{;\s*#.*};
-my $leading_comment       = qr{(?:^|\n)\s*#.*};
+my $trailing_comment      = qr{;(?>\s*)#(?>.*)};
+my $leading_comment       = qr{(?:^|\n)(?>\s*)#(?>.*)};
 my $connecting_backslash  = qr{\s*\\\n\s*};
 
 my $quick_check = qr{:$port}i;

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