2 files changed, 20 insertions(+), 20 deletions(-)

M src/left.tal
M src/manifest.tal

@@ 57,24 57,24 @@ BRK
 @manifest
 
 	06 "Left $1
-		01 "n :file-new "New $1
-		01 "r :trap "Rename $1
-		01 "o :file-open "Open $1
-		01 "g :file-goto "OpenSelection $1
-		01 "s :file-save "Save $1
-		01 "q :exit "Exit $1
+		01 "n =file-new "New $1
+		01 "r =trap "Rename $1
+		01 "o =file-open "Open $1
+		01 "g =file-goto "OpenSelection $1
+		01 "s =file-save "Save $1
+		01 "q =exit "Exit $1
 	07 "Edit $1
-		01 "c :edit-copy "Copy $1
-		01 "v :edit-paste "Paste $1
-		01 "x :edit-cut "Cut $1
-		00 08 :erase "Erase $1
-		00 7f :delete "Delete $1
-		01 09 :edit-select-at "SelectWord $1
-		00 1b :reset-selection "SelectReset $1
+		01 "c =edit-copy "Copy $1
+		01 "v =edit-paste "Paste $1
+		01 "x =edit-cut "Cut $1
+		00 08 =erase "Erase $1
+		00 7f =delete "Delete $1
+		01 09 =edit-select-at "SelectWord $1
+		00 1b =reset-selection "SelectReset $1
 	01 "Find $1
-		01 "f :capture-selection "Selection $1
+		01 "f =capture-selection "Selection $1
 	01 "View $1
-		01 "h :toggle-highlight "Highlight $1
+		01 "h =toggle-highlight "Highlight $1
 	$1
 
 (


@@ 356,7 356,7 @@ JMP2r
 
 @count-lines ( -- line* )
 
-	.scroll/y LDZ2 STH2
+	.scroll/y STH LDZ2r
 	,get-eof JSR .scroll/addr LDZ2
 	&while
 		LDAk #0a NEQ JMP INC2r


@@ 435,7 435,7 @@ JMP2r
 		[ LIT ". ] EQUk NIP ,&special JCN
 		[ LIT ", ] EQUk NIP ,&special JCN
 		[ LIT "; ] EQUk NIP ,&special JCN
-		[ LIT ": ] EQUk NIP ,&special JCN
+		[ LIT "= ] EQUk NIP ,&special JCN
 		&skip-highlight
 	#00 SWP ;font ADD2 LDA #00 SWP
 


@@ 824,7 824,7 @@ JMP2r
 	.textarea/highlight LDZ ,&skip JCN
 	,walk-color/c LDR ,&skip JCN
 	LDAk LIT ", EQU ,&pass JCN
-	LDAk LIT ": EQU ,&pass JCN
+	LDAk LIT "= EQU ,&pass JCN
 	LDAk LIT "; EQU ,&pass JCN
 	LDAk LIT ". EQU ,&pass JCN
 	&skip


@@ 869,7 869,7 @@ JMP2r
 	[ LIT "; ] NEQk NIP  ,&no-litabs JCN
 		POP #08 ;litabs-icn ,&seg JMP
 		&no-litabs
-	[ LIT ": ] NEQk NIP  ,&no-rawabs JCN
+	[ LIT "= ] NEQk NIP  ,&no-rawabs JCN
 		POP #08 ;rawabs-icn ,&seg JMP
 		&no-rawabs
 	&skip-highlight

@@ 223,7 223,7 @@ JMP2r
 	#0010 .Screen/x DEO2
 	#0004 .Screen/y DEO2
 	#00 ,&id STR
-	[ LIT2 &manifest :manifest ]
+	[ LIT2 &manifest =manifest ]
 	&cat
 		#0401 [ LIT &sel ff ] [ LIT &id $1 ] EQU [ JMP SWP POP ] ;draw-chr/color STA
 		INC2k ;draw-str JSR2 POP2 .Screen/x DEI2k #0008 ADD2 ROT DEO2