[pilot-db-list] Scroll buttons in the record edit view

[Brian F. <bri...@ei...>]

Hi,
I'd noticed that when editing records in db, pressing the hardware up and
down buttons wouldn't scroll through the fields. Here's a quick patch that
makes the buttons behave in the same way as the up and down arrows on the
screen.

Cheers,
Brian.

--- edit.c~	Thu May 31 00:19:16 2001
+++ edit.c	Thu May 31 00:16:47 2001
@@ -1127,6 +1122,18 @@
 	    return HandleCommonMenuEvent(event->data.menu.itemID);
 	}
 	break;
+
+    case keyDownEvent:
+        switch (event->data.keyDown.chr) {
+        case pageUpChr:
+            EditViewScroll(winUp);
+            break;
+
+        case pageDownChr:
+            EditViewScroll(winDown);
+            break;
+        }
+        break;

     default:
 	break;