From 332fa176f4423fbcaad650089fd88df0a38c7727 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bitbucket@bruce-hill.com>
Date: Wed, 21 Mar 2018 19:30:36 -0700
Subject: [PATCH] Fixed arrow keys/scrolling.

---
 ldt.lua  | 5 +++--
 ldt.moon | 5 +++--
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/ldt.lua b/ldt.lua
index 451ea13..1f8498c 100644
--- a/ldt.lua
+++ b/ldt.lua
@@ -405,6 +405,7 @@ ldb = {
       C.doupdate()
       stdscr:getch()
     end
+    stdscr:keypad()
     stdscr:wbkgd(color())
     stdscr:clear()
     stdscr:refresh()
@@ -627,11 +628,11 @@ ldb = {
       C.doupdate()
       local c = stdscr:getch()
       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)
       elseif ('J'):byte() == _exp_0 then
         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)
       elseif ('K'):byte() == _exp_0 then
         selected_pad:scroll(-10, 0)
diff --git a/ldt.moon b/ldt.moon
index 776c8f7..06d446f 100644
--- a/ldt.moon
+++ b/ldt.moon
@@ -268,6 +268,7 @@ ldb = {
             C.doupdate!
             stdscr\getch!
 
+        stdscr\keypad!
         stdscr\wbkgd(color!)
         stdscr\clear!
         stdscr\refresh!
@@ -442,12 +443,12 @@ ldb = {
             C.doupdate!
             c = stdscr\getch!
             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)
                 when ('J')\byte!
                     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)
                 when ('K')\byte!
                     selected_pad\scroll(-10,0)