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

M src/orca.tal

@@ 276,7 276,8 @@ BRK
 	[ #1b ] NEQk NIP ,&no-esc JCN ;toggle-insert JSR2 POP BRK &no-esc
 	[ #20 ] NEQk NIP ,&no-spc JCN #01 #0000 ;mod-sel JSR2 POP BRK &no-spc
 	[ #08 ] NEQk NIP ,&no-bks JCN #ff #0000 ;mod-sel JSR2 CHAR-DOT ;fill-sel JSR2 POP BRK &no-bks
-	DUP ;ci-key JSR2 #00 EQU ,&no-key JCN .Controller/key DEI ;fill-sel JSR2 #01 #0000 ;mod-sel JSR2 &no-key
+	DUP ;ci-key JSR2 #00 EQU ,&no-key JCN 
+		DUP ;fill-sel JSR2 #01 #0000 ;mod-sel JSR2 &no-key
 	&end
 	POP
 


@@ 439,7 440,7 @@ JMP2r
 		STHk
 		.selection/x2 LDZ INC .selection/x1 LDZ
 		&hor
-			[ LIT &c $1 ] OVR STHkr ;get-cell JSR2 ;data/cells ADD2 STA
+			DUP STHkr [ LIT &c $1 ] ;set-cell JSR2
 			INC GTHk ,&hor JCN
 		POP2 POPr
 		INC GTHk ,&ver JCN