From 02864c7c77996811ba5f5dd23a56d057b062c31b Mon Sep 17 00:00:00 2001
From: Quinn Evans <Quinn Evans>
Date: Wed, 22 Mar 2017 23:30:18 -0600
Subject: [PATCH] Oooooooooooops

---
 WOPO.COB | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/WOPO.COB b/WOPO.COB
index 43f3ad0..750bfd8 100644
--- a/WOPO.COB
+++ b/WOPO.COB
@@ -228,7 +228,7 @@
            MOVE SPACES TO MSG-BODY OF INPUT-BUFFER.
            CALL "DECODE-STRING" USING INPUT-BUFFER.
       D    DISPLAY "RECEIVED LINE FROM CHANNEL",
-                   MSG-BODY OF INPUT-BUFFER.
+      D             MSG-BODY OF INPUT-BUFFER.
            IF NOT SUCCESS THEN DISPLAY MSG-BODY OF INPUT-BUFFER
                                GO TO DIE.
            PERFORM GET-IRC-STATE.