From 11a07d703b2ee9f7dbb9f3e311a1f034b4c71a20 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeffrey.armstrong@approximatrix.com>
Date: Thu, 21 May 2020 15:51:22 -0400
Subject: Fixed first lines being removed after changes to status line
 handling.  Window title on AppGraphics now resets on new pages.

---
 protocol.f90 | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'protocol.f90')

diff --git a/protocol.f90 b/protocol.f90
index 49d8fc5..b0699a6 100644
--- a/protocol.f90
+++ b/protocol.f90
@@ -191,7 +191,9 @@ contains
                         
                             write(binary_unit) buffer(i)
                         
-                        else if(.not. binary_file) then
+                        end if
+                        
+                        if(.not. binary_file) then
                         
                             write(unit_number, '(A1)', advance='no') buffer(i)
                             
-- 
cgit v1.2.3