From dcf54c64cacf0649fee120d046d0b2887536dacc Mon Sep 17 00:00:00 2001
From: Richard Cornwell <rcornwell@github.com>
Date: Wed, 7 Aug 2019 21:47:35 -0400
Subject: [PATCH] KA10: Attempt to handle 132 character lines correct on LP.

---
 PDP10/kx10_lp.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/PDP10/kx10_lp.c b/PDP10/kx10_lp.c
index 7d13337..119fbf9 100644
--- a/PDP10/kx10_lp.c
+++ b/PDP10/kx10_lp.c
@@ -241,6 +241,8 @@ lpt_output(UNIT *uptr, char c) {
 
     if (c == 0)
        return;
+    if (uptr->COL == 132)
+        lpt_printline(uptr, 1);
     if ((uptr->flags & UNIT_UC) && (c & 0140) == 0140)
         c &= 0137;
     if ((uptr->flags & UNIT_UTF8) && c < 040) {
@@ -260,8 +262,6 @@ lpt_output(UNIT *uptr, char c) {
         lpt_buffer[uptr->POS++] = c;
         uptr->COL++;
     }
-    if (uptr->COL == 132)
-        lpt_printline(uptr, 1);
     return;
 }