X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/146174a91a192983720a158796dc066226ad0e55..21c1191d96d28acb87f4479c4eef93ca5aef5405:/win32/genmk95.pl diff --git a/win32/genmk95.pl b/win32/genmk95.pl index 8fe4f86..cf31457 100644 --- a/win32/genmk95.pl +++ b/win32/genmk95.pl @@ -64,6 +64,7 @@ while (<$in>) if (/^(.*?)(&&|\|\|)(.*)$/) # two commands separated by && or || { my ($one, $sep, $two) = ($1, $2, $3); + $one =~ s/^\t(?:-(?!-))?\@?(.*?)$/\t$1/; # no -,@ in group recipes LINE_CONT: if ($two =~ /\\\s*$/) { @@ -77,6 +78,7 @@ LINE_CONT: next; } # fall through - no need for special handling + s/^\t(?:-(?!-))?\@?(.*?)$/\t$1/; # no -,@ in group recipes print $out "$_\n"; } print $out "]\n" if ($inrec);