From ab5f7a047194357ab367848e6e322b76ed830de6 Mon Sep 17 00:00:00 2001 From: Greg Matheson Date: Fri, 20 Feb 2004 23:34:59 +0800 Subject: genmk95.pl touchup for distclean on Win98 Message-ID: <20040220153459.A30249@ms.chinmin.edu.tw> p4raw-id: //depot/perl@22346 --- win32/genmk95.pl | 2 ++ 1 file changed, 2 insertions(+) diff --git a/win32/genmk95.pl b/win32/genmk95.pl index 8fe4f86dbf..cf31457ab1 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); -- cgit v1.2.1