release: 0.1.53

[lilypond.git] / bin / wild-perl

diff --git a/bin/wild-perl b/bin/wild-perl
index a26ceefcae6f5b42185eb1307a9f2ed58cf978a5..ede94c23fc5c85db16b38a933bdcc9cfead0e441 100755 (executable)
--- a/bin/wild-perl
+++ b/bin/wild-perl
@@ -1,6 +1,11 @@
 # -*- perl -*-
 ##! @PERL@
 
+use Getopt::Long;
+GetOptions("top-srcdir:s");
+
+$my_topsrcdir = $opt_top_srcdir ? $opt_top_srcdir : "\$(top_srcdir)";
+
 @ignorestuff = ();
 
 sub ignore_query
@@ -11,6 +16,7 @@ sub ignore_query
 
 print "# Generated automatically by wild-perl 0.1\n";
 
+
 while (<>) {
        $line = $_;
        if ($line =~ /^ *nowildcard: *(.*)$/) {
@@ -19,6 +25,7 @@ while (<>) {
            foreach $i (@ignorelist) {
                print "# ignoring wildcards for \`$i\'\n";
                push @ignorestuff, $i; # concat ? uh?
+               print "IGNORE_WILDCARDS=$ignore";
            }
 
            
@@ -37,5 +44,6 @@ while (<>) {
 
 
 print "\$(srcdir)/Makefile.am: \$(srcdir)/Makefile.am.wild\n" .
-    "\t\$(PERL) \$(top_srcdir)/bin/wild-perl < \$< > \$@";
+#    "\t\$(PERL) $my_topsrcdir/bin/wild-perl --top-srcdir=\"\$(real_topsrcdir)\" < \$< > \$@";
+    "\t\$(PERL) $my_topsrcdir/bin/wild-perl < \$< > \$@";