allow any number of # characters in marker comments

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@1293 f88db872-0e4f-0410-b76b-b9085cfa78c5

1 files changed, 4 insertions, 3 deletions

diff --git a/src/misc/select.patch b/src/misc/select.patch
index ff09a7b..b3457e5 100755
--- a/src/misc/select.patch
+++ b/src/misc/select.patch
@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl -w
+#!/usr/bin/perl -w
 # $Header$
 
 #
@@ -8,7 +8,8 @@
 # This filter prints that part of standard input starting with a
 # line of the form (eg)
 #	## +z patch
-# and continuing up to and including two consecutive newlines.
+# (with any number >= 1 of # characters allowed) and continuing up to and
+# including two consecutive newlines.
 #
 
 use strict;
@@ -21,7 +22,7 @@ my $in_selected_patch = 0;
 my $newline_count = 0;
 	while (my $line = <STDIN>)
 	{
-	if ($line =~ /^### \Q${patch_name}/o)
+	if ($line =~ /^#+ \Q${patch_name}/o)
 		{ $in_selected_patch = 1; }
 	if ($line =~ /^\n/)
 		{ ++$newline_count; }