From b0cf4b2ac8cb4b01c82a67eb501f1b63037d3332 Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Thu, 16 Feb 2012 22:43:36 -0500 Subject: [PATCH] ANSI efficiency updates --- mystic/bbs_ansi_menubox.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/mystic/bbs_ansi_menubox.pas b/mystic/bbs_ansi_menubox.pas index b1887de..d587bce 100644 --- a/mystic/bbs_ansi_menubox.pas +++ b/mystic/bbs_ansi_menubox.pas @@ -479,13 +479,13 @@ Begin Picked := ListMax; Update; End; - #80 : Begin { down arrow } - If Picked < ListMax Then Inc (Picked); + #80 : If Picked < ListMax Then Begin + Inc (Picked); If Picked > TopPage + WinSize - 1 Then Inc (TopPage); Update; End; #77, - #81 : If ListMax > 0 Then Begin { page down / right arrow } + #81 : If (Picked <> ListMax) Then Begin { pgdn/right } If ListMax > WinSize Then Begin If Picked + WinSize > ListMax Then Picked := ListMax