diff --git a/projects/nat-archive-tool/src/nat/ArchiveController.kiss b/projects/nat-archive-tool/src/nat/ArchiveController.kiss
index 612fd465..c3e23f45 100644
--- a/projects/nat-archive-tool/src/nat/ArchiveController.kiss
+++ b/projects/nat-archive-tool/src/nat/ArchiveController.kiss
@@ -25,13 +25,11 @@
                     (ui.enterText
                         "${arg.name} (up to ${maxLength} characters):"
                         trySubmit
-                        maxLength))
-                (trySubmit (readString stream)))
+                        maxLength)
+                (trySubmit (readString stream))))
         ((VarText maxLength)
             (unless maxLength (set maxLength Math.POSITIVE_INFINITY))
             (let [collectedText []]
-                
-                
                 (localFunction :Void enterTextAgain []
                     (localFunction :Void trySubmit [text]
                         (if !text