From 03047d9fce83eb1ca2f302756e1d9165a4c41365 Mon Sep 17 00:00:00 2001
From: Bobbi Webber-Manners <bmanners@krakenrobotics.com>
Date: Thu, 25 Jun 2020 14:30:10 -0400
Subject: [PATCH] Bugfix to EMAIL.SYSTEM 'B' (page up) command

---
 apps/email.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/apps/email.c b/apps/email.c
index 76d04be..25edf08 100644
--- a/apps/email.c
+++ b/apps/email.c
@@ -218,7 +218,7 @@ retry1:
           break;
         case 'B':
         case 'b':
-          if (pos < (uint32_t)(SCROLLBACK)) {
+          if (pos < h->skipbytes + (uint32_t)(SCROLLBACK)) {
             pos = h->skipbytes;
             fseek(fp, pos, SEEK_SET);
             goto restart;
@@ -259,7 +259,7 @@ retry2:
       switch (c) {
       case 'B':
       case 'b':
-        if (pos < (uint32_t)(SCROLLBACK)) {
+        if (pos < h->skipbytes + (uint32_t)(SCROLLBACK)) {
           pos = h->skipbytes;
           fseek(fp, pos, SEEK_SET);
           goto restart;