From bd17f8bb79274a3a614acdd8abb23d9df24249a9 Mon Sep 17 00:00:00 2001
From: Jali <jali@orca-central.de>
Date: Sun, 7 Sep 2025 22:13:19 +0200
Subject: [PATCH] Fix output

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

diff --git a/src/SUDOKU.MID b/src/SUDOKU.MID
index 91cffb6..75ff132 100644
--- a/src/SUDOKU.MID
+++ b/src/SUDOKU.MID
@@ -20,7 +20,7 @@ CHDSKI==2                              ;Read channel for disk input.
 JCL:    BLOCK 30                       ;Reserve space for the command line.
 FNAME1: BLOCK 15                       ;The first part of the file name.
 FNAME2: BLOCK 15                       ;The second file name.
-FIELD:  BLOCK 9                        ;Reserve 9 words to 
+FIELD:  BLOCK 9                        ;Reserve 9 words to store the grid. 
 
 ;Print flags
 ;Allows to change the beavihour of the OUTSTR and PUTLN subroutines.
@@ -103,7 +103,7 @@ PUTLN:  PUSHJ P,OUTSTR                 ;Calls the OUTSTR subroutine
         POPJ  P,                       ;before returning.
 
 IMPRTF: PUSH P,A                       ;Save the A register.
-        .OPEN       
+        .OPEN CHDSKI,[.UOA,,]   
 
 DONE:   .LOGOUT  2,                    ;Exit point for the program.
 WELCOME:ASCIZ /SUDOKU SOLVER v0.1/     ;Text of the welcome banner.