~rabbits/left

559ec0e8f35316501a6bcac8e7707d5062ed5167 — Devine Lu Linvega 18 days ago 695449b
Fixed issue with search
1 files changed, 7 insertions(+), 5 deletions(-)

M src/left.tal
M src/left.tal => src/left.tal +7 -5
@@ 643,7 643,6 @@ JMP2r
		INC2 GTH2k ?&l
	&end
	POP2 POP2
	#0000 add-marker

!draw-navbar



@@ 651,13 650,16 @@ JMP2r

	get-eof ;text
	&l2
		LDA2k [ LIT2 0a "@ ] NEQ2 ?&no-flabel
		INC2k LDA2 [ LIT2 "@| ] NEQ2 ?&no-flabel
			INC2 DUP2 add-marker INC2
			&no-flabel
		;search OVR2 sseg #00 EQU ?&no-find
			DUP2 add-marker
			DUP2 find-prev-spacer INC2 add-marker
			&no-find
		( reached bottom ) .nav/len LDZ #18 GTH ?&end
		INC2 GTH2k ?&l2
	POP2 POP2
	#0000 add-marker

!draw-navbar



@@ 1336,8 1338,8 @@ JMP2r

	LDAk #00 EQU ?&skip
	;marker-icns draw-icn
	LDA2k [ LIT2 "@| ] NEQ2 ?&no-head 
		INC2 INC2 
	LDA2k [ LIT2 "@| ] NEQ2 ?&no-head
		INC2 INC2
		&no-head
	&w
		.Screen/x DEI2 #0070 GTH2 ?&truncate