Bruce/lua-debug-tui
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed arrow keys/scrolling.

Browse Source
This commit is contained in:
Bruce Hill 2018-03-21 19:30:36 -07:00
parent bcd871a0f3
commit 332fa176f4
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ldt.lua
View File

@ -405,6 +405,7 @@ ldb = {
C.doupdate() C.doupdate()
stdscr:getch() stdscr:getch()
end end
stdscr:keypad()
stdscr:wbkgd(color()) stdscr:wbkgd(color())
stdscr:clear() stdscr:clear()
stdscr:refresh() stdscr:refresh()
@ -627,11 +628,11 @@ ldb = {
C.doupdate() C.doupdate()
local c = stdscr:getch() local c = stdscr:getch()
local _exp_0 = c local _exp_0 = c
if C.KEY_DOWN == _exp_0 or C.KEY_SF == _exp_0 or ("j"):byte() == _exp_0 then if C.KEY_DOWN == _exp_0 or C.KEY_SR == _exp_0 or ("j"):byte() == _exp_0 then
selected_pad:scroll(1, 0) selected_pad:scroll(1, 0)
elseif ('J'):byte() == _exp_0 then elseif ('J'):byte() == _exp_0 then
selected_pad:scroll(10, 0) selected_pad:scroll(10, 0)
elseif C.KEY_UP == _exp_0 or C.KEY_SR == _exp_0 or ("k"):byte() == _exp_0 then elseif C.KEY_UP == _exp_0 or C.KEY_SF == _exp_0 or ("k"):byte() == _exp_0 then
selected_pad:scroll(-1, 0) selected_pad:scroll(-1, 0)
elseif ('K'):byte() == _exp_0 then elseif ('K'):byte() == _exp_0 then
selected_pad:scroll(-10, 0) selected_pad:scroll(-10, 0)

5
ldt.moon
View File

@ -268,6 +268,7 @@ ldb = {
C.doupdate! C.doupdate!
stdscr\getch! stdscr\getch!
stdscr\keypad!
stdscr\wbkgd(color!) stdscr\wbkgd(color!)
stdscr\clear! stdscr\clear!
stdscr\refresh! stdscr\refresh!
@ -442,12 +443,12 @@ ldb = {
C.doupdate! C.doupdate!
c = stdscr\getch! c = stdscr\getch!
switch c switch c
when C.KEY_DOWN, C.KEY_SF, ("j")\byte! when C.KEY_DOWN, C.KEY_SR, ("j")\byte!
selected_pad\scroll(1,0) selected_pad\scroll(1,0)
when ('J')\byte! when ('J')\byte!
selected_pad\scroll(10,0) selected_pad\scroll(10,0)
when C.KEY_UP, C.KEY_SR, ("k")\byte! when C.KEY_UP, C.KEY_SF, ("k")\byte!
selected_pad\scroll(-1,0) selected_pad\scroll(-1,0)
when ('K')\byte! when ('K')\byte!
selected_pad\scroll(-10,0) selected_pad\scroll(-10,0)