From 9a98887da67afcdef55f6070e410a598c2eb638f Mon Sep 17 00:00:00 2001
From: Devine Lu Linvega <aliceffekt@gmail.com>
Date: Mon, 11 Mar 2024 11:43:25 -0700
Subject: [PATCH] More flexible symbol finder

---
 src/left.tal | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/left.tal b/src/left.tal
index 6832c65..67a6cd6 100644
--- a/src/left.tal
+++ b/src/left.tal
@@ -175,7 +175,7 @@
 		<draw-widget-pos>
 		[ LIT2 01 _&textarea ] STR }
 	[ LIT &symbol 01 ] ?{
-		<draw-widget-symbol>
+		<draw-sym>
 		[ LIT2 01 _&symbol ] STR }
 	[ LIT &navbar $1 ] ?{
 		<draw-navbar>
@@ -591,6 +591,7 @@
 	JMP2r
 
 @find-symbol ( sym* -- addr* )
+	LDAk LIT "@ NEQ ?{ INC2 }
 	,&t STR2
 	;text
 	&>w ( -- )
@@ -1408,7 +1409,7 @@
 	[ LIT2 15 -Screen/sprite ] DEO
 	JMP2r
 
-@<draw-widget-symbol> ( -- )
+@<draw-sym> ( -- )
 	;search find-symbol ORAk ?{ POP2 JMP2r }
 	.Screen/width DEI2 #00e0 SUB2 .Screen/x DEO2
 	get-from addr-to-line .scroll/y LDZ2 SUB2 #40 SFT2 #0018 ADD2