chiark / gitweb /
do not demand \W after CAPS and lc
[subdirmk.git] / subdirmk / generate
index 8abc040..6ce18f9 100755 (executable)
@@ -109,8 +109,8 @@ sub process_input_mk ($$$$$$$$) {
        $var_prefix, $targets,
        $f, $esclitr, $enoent_ok) = @_;
 
-    my $caps_re = qr{[A-Z][0-9_A-Z]*(?=\W)};
-    my $lc_re = qr{[a-z][-+,0-9_a-z]*(?=\W)};
+    my $caps_re = qr{[A-Z]};
+    my $lc_re = qr{[a-z]};
 
     my $esc;
     my $set_esc = sub {