X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=generate;h=f46747da641acb3e0bb1847af7714fe548dceb19;hb=d817b49007e60b0e7392f23caf08dc0328eb32de;hp=b4c52ae40073c1c3cca1b3026a2c52595e1d9851;hpb=f5a41a874d98a44c36040aa74e6be685628baf70;p=subdirmk.git diff --git a/generate b/generate index b4c52ae..f46747d 100755 --- a/generate +++ b/generate @@ -133,8 +133,8 @@ sub process_input_mk ($$$$$$$$) { my %pfxmap = ( '' => $dir_prefix, - ',' => "\$(top_srcdir)${dir_suffix}/", - ';' => "\$(top_srcdir)/", + '^' => "\$(top_srcdir)${dir_suffix}/", + '~' => "\$(top_srcdir)/", ); while (<$input>) { @@ -153,12 +153,12 @@ sub process_input_mk ($$$$$$$$) { $targets->{$t} //= [ ]; } elsif (m{^(?=$caps_re)}) { o $var_prefix } - elsif (s{^([,;]?)(?=$lc_re)}{}) { o $pfxmap{$1} } + elsif (s{^([~^]?)(?=$lc_re)}{}) { o $pfxmap{$1} } elsif (s{^_}{}) { o $var_prefix } elsif (s{^=_}{}) { o $var_prefix } - elsif (s{^([,;]?)/}{}) { o $pfxmap{$1} } + elsif (s{^([~^]?)/}{}) { o $pfxmap{$1} } elsif (s{^=/}{}) { o $dir_name } - elsif (s{^([,;]?)(?=[ \t])}{}) { + elsif (s{^([~^]?)(?=[ \t])}{}) { my $prefix = $pfxmap{$1} // die; my $after=''; if (m{([ \t])$esc}) { ($_,$after) = ($`, $1.$'); }