added ER_NEXTCOMP

diff --git a/form.c b/form.c
index 4f8577cf06eafb8bb5b4d6e46ffb8b55e8ef39a8..2d37350d465a8267a830079815bb116b52ae1ca4 100644 (file)
--- a/form.c
+++ b/form.c
@@ -246,6 +246,16 @@ static struct eventResult formEvent(newtComponent co, struct event ev) {
        
       case EV_NORMAL:
        er = subco->ops->event(subco, ev);
+       switch (er.result) {
+         case ER_NEXTCOMP:
+           er.result = ER_SWALLOWED;
+           dir = 1;
+           wrap = 0;
+           break;
+
+         default:
+           break;
+       }
        break;
 
       case EV_LATE:

diff --git a/newt_pr.h b/newt_pr.h
index 87b0d282cbbd90e557c361400ea88b7df619247c..fd5fe00d3aa53a829fe4013ccbebeea5c1391d95 100644 (file)
--- a/newt_pr.h
+++ b/newt_pr.h
@@ -34,7 +34,8 @@ struct newtComponent {
     void * data;
 } ;
 
-enum eventResultTypes { ER_IGNORED, ER_SWALLOWED, ER_EXITFORM, ER_SETFOCUS };
+enum eventResultTypes { ER_IGNORED, ER_SWALLOWED, ER_EXITFORM, ER_SETFOCUS,
+                       ER_NEXTCOMP };
 struct eventResult {
     enum eventResultTypes result;
     union {