~rabbits/left

f45287d047e498763dcd7f189e25a7ae7a8423d4 — Devine Lu Linvega 3 months ago 6cd9dac
Reset scroll on filename change
1 files changed, 2 insertions(+), 0 deletions(-)

M src/main.tal
M src/main.tal => src/main.tal +2 -0
@@ 143,6 143,7 @@ BRK
	[ #20 ] GTHk NIP ,&no-special JCN ;untrap JSR2 POP JMP2r &no-special
	;filepath ;slen JSR2 NIP #2f EQU ,&no-push JCN
		DUP ;filepath ;sput JSR2
		#0000 ;set-scroll-y JSR2
		&no-push
	POP



@@ 1123,6 1124,7 @@ JMP2
	#00 ;draw-filepath JSR2
	;filepath ;sclr JSR2
	.selection/from LDZ2 ;filepath [ .selection/length LDZ2 #0040 LTH2k JMP SWP2 POP2 ] ;mcpy JSR2
	#0000 ;set-scroll-y JSR2

@file-open ( -- )