noise: allow '#'s in input and '_' in module-names

1 files changed, 2 insertions, 1 deletions

diff --git a/noise b/noise
index 2b63acbe..f979c34c 100755
--- a/noise
+++ b/noise
@@ -77,7 +77,8 @@ readline() {
   { read && echo "$REPLY" ; } | sed -rn "
     s/[']//g
     s/~%/\n/g
-    s:^/([a-z]+)([[:space:]]+(.*))?$:command=\1; args='\3';:p;t
+    s/([^\\])#/\1\\\\#/g
+    s:^/([a-z_]+)([[:space:]]+(.*))?$:command=\1; args='\3';:p;t
     s@^([[:alnum:]_/+-]+):[[:space:]]*(.*)@command=lang; args='\1 \2';@p;t
     s@^\![[:space:]]*(.*)@command=play; args='\1';@p;t
     s:.*:command='$noise_default_command'; args='&';:p;t