2 files changed, 8 insertions(+), 1 deletions(-)

M src/main.tal
M src/utils.tal

@@ 375,7 375,7 @@ BRK
 		#01 ;draw-filepath JSR2
 		POP BRK
 		&no-edit-backspace
-	( special ) #20 >~ ,&no-edit-enter JCN
+	( special ) DUP IS-VALID ,&no-edit-enter JCN
 		;untrap JSR2
 		#00 .state/blink STZ
 		#01 ;draw-filepath JSR2


@@ 638,6 638,12 @@ BRK
 		&not-locked
 	ROT
 
+	( skip numbers )
+	DUP #30 < ,&no-num JCN
+	DUP #39 > ,&no-num JCN
+		POP POP2 RTN
+		&no-num
+
 	( lowercase )
 	DUP #61 < ,&no-lc JCN
 	DUP #7a > ,&no-lc JCN

@@ 46,6 46,7 @@
 %IS-UC { DUP #40 > SWP #5b < AND }
 %IS-LC { DUP #60 > SWP #7b < AND }
 %IS-NUM { DUP #2f > SWP #3a < AND }
+%IS-VALID { DUP #1f > SWP #7f < AND }
 
 %AUTO-NONE   { #00 .Screen/auto DEO }
 %AUTO-X      { #01 .Screen/auto DEO }