~rabbits/left

aa99131e15cde8c010a8b9936b889f8adfaa9c80 — Devine Lu Linvega a month ago 6b6df24
Fixed issue with mousepicking in fixed width sections
1 files changed, 4 insertions(+), 5 deletions(-)

M src/left.tal
M src/left.tal => src/left.tal +4 -5
@@ 322,11 322,13 @@ BRK
	&ver-end
	POP2r
	( goto x )
	#00 .textarea/fixed STZ
	( b ) .Mouse/x DEI2 .scroll/x LDZ2 ADD2 #0090 SUB2 STH2
	( a ) LIT2r 0000
	&hor
		LDAk #0a EQU ?&hor-end
		get-width STH2 ADD2r
		walk-color POP
		LDAk get-chrw STH2 ADD2r
		LTH2kr STHr ?&hor-end
		INC2 LDAk ?&hor
	&hor-end


@@ 457,7 459,7 @@ JMP2r
	DUP2 find-line-start
	&l
		EQU2k ?&end
		get-width STH2 ADD2r
		LDAk get-chrw STH2 ADD2r
		INC2 GTH2k ?&l
	&end
	POP2 POP2


@@ 840,9 842,6 @@ JMP2r
	( rune )
	DUP2 is-rune #00 EQU ?&no-rune
		#01 ;draw-ufx/ul STA
		( color ) is-selected #0c MUL INC DUP ,&color STR ;draw-ufx/color STA
		( glyph ) LDAk ;runes cndx #50 SFT2 ;rune-icns ADD2 #08 ROT ROT draw-ufx/seg
		INC2 !&w
		&no-rune
	( color ) walk-color ,&color STR
	&w