From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 13 Nov 2019 16:52:12 +0000 (+0000)
Subject: do not demand \W after CAPS and lc
X-Git-Tag: subdirmk/0.1~65
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=subdirmk.git;a=commitdiff_plain;h=f5ac12b12476ff3155665bc07344467f4741ab27

do not demand \W after CAPS and lc
---

diff --git a/subdirmk/generate b/subdirmk/generate
index 8abc040..6ce18f9 100755
--- a/subdirmk/generate
+++ b/subdirmk/generate
@@ -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 {