curioustorvald/tsvm
1
0
Fork 0
mirror of https://github.com/curioustorvald/tsvm.git synced 2026-06-09 14:44:05 +09:00
Code Issues Packages Projects Releases Wiki Activity

bug fix for less; console colour is preserved after the error print

Browse Source
This commit is contained in:
minjaesong
2022-06-21 11:43:12 +09:00
parent 371b80ca26
commit 8a0e89f5b9
3 changed files with 18 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
assets/disk0/tvdos/bin/less.js
View File

@@ -15,7 +15,7 @@ let buf = "";
let fileContent = undefined
let key = -1;
let panSize = termW >> 1;
let scrollSize = termH >> 3;
let scrollSize = (termH / 6)|0;
let startAddr = -1;
let paintCur = 0;
@@ -106,14 +106,18 @@ while (true) {
/*Q*/if (key == 113 || key == 81) break;
/*R*/else if (key == 114 || key == 82) repaint();
/*up*/else if (key == con.KEY_UP) {
scroll -= scrollSize;
if (scroll < 0) scroll = 0;
repaint();
if (lineToBytes.length >= termH) { // only allow scrolling if the text is taller than the screen
scroll -= scrollSize;
if (scroll < 0) scroll = 0;
repaint();
}
}
/*down*/else if (key == con.KEY_DOWN) {
scroll += scrollSize;
if (scroll > lineToBytes.length - termH) scroll = lineToBytes.length - termH;
repaint();
if (lineToBytes.length >= termH) { // only allow scrolling if the text is taller than the screen
scroll += scrollSize;
if (scroll > lineToBytes.length - termH) scroll = lineToBytes.length - termH;
repaint();
}
}
/*left*/else if (key == con.KEY_LEFT && pan > 0) {
pan -= panSize;