From 486803aca6c7765002ccd9d9653d5a2cb99f0fe1 Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Fri, 1 Oct 2021 07:56:57 +0200
Subject: [PATCH] intra:: CLI option -be-square

---
 intra.cpp | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/intra.cpp b/intra.cpp
index 5bdc28cb..a6ca6d61 100644
--- a/intra.cpp
+++ b/intra.cpp
@@ -397,7 +397,15 @@ auto hooks1 =
     if(intra::in) v.push_back(named_dialog(XLAT("manage portals"), show_portals));
     })
   + arg::add3("-intra-add", [] { start_game(); become(); })
-  + arg::add3("-intra-start", [] { start_game(); become(); start(0); });
+  + arg::add3("-intra-start", [] { start_game(); become(); start(0); })
+  + arg::add3("-be-square", [] { 
+      check_cgi();
+      cgi.require_basics();
+      vid.plevel_factor = cgi.edgelen / cgi.scalefactor;
+      check_cgi();
+      cgi.require_basics();
+      });
+
 
 EX }