From dcdf2ef4ab0f04f0777a123eec4efcafefbcdd3d Mon Sep 17 00:00:00 2001
From: Jason Self <j@jxself.org>
Date: Fri, 21 Nov 2014 07:25:23 -0800
Subject: [PATCH] Check for mandatory terminal window size and fail if it's not

---
 src/ADPAR.PAS | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/ADPAR.PAS b/src/ADPAR.PAS
index 7d0967b..00f8b56 100644
--- a/src/ADPAR.PAS
+++ b/src/ADPAR.PAS
@@ -78,11 +78,11 @@ procedure init_windows;
   lang:=upcase(GetEnvironmentVariable('LANG'));  
   UTF8Scr:= (Pos('.UTF-8', lang) > 0) or (Pos('.UTF8', lang) > 0);
   { Check min req col & rows}
-  if nCols(stdscr) < 80 then begin
+  if nCols(stdscr) <> 80 then begin
    writeln('You must have 80 character columns');
    Halt;
   end;
-  if nRows(stdscr) < 25 then begin
+  if nRows(stdscr) <> 25 then begin
    writeln('You must have 25 character rows');
    Halt;
   end;
-- 
2.31.1