Oooooooooooops

2017-03-22 23:30:18 -06:00 · 2017-03-22 23:30:18 -06:00 · 02864c7c77
parent c73e9af127
commit 02864c7c77
1 changed files with 1 additions and 1 deletions
--- 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.