Fix the thing instead of lying about it.

(See previous commit.)
2017-03-22 20:45:29 -06:00 · 2017-03-22 20:45:29 -06:00 · 19a3a94686
parent d57d0c768d
commit 19a3a94686
1 changed files with 1 additions and 1 deletions
--- a/WOPO.COB
+++ b/WOPO.COB
@ -978,7 +978,7 @@
                      BF-INPUT,
                      "$NUL$"
                      INTO R(1)
-      D        DISPLAY "BF-INPUT. ", BF-CODE
+      D        DISPLAY "BF-INPUT. ", BF-INPUT
               MOVE 1 TO SRC
               PERFORM BEGIN-STANDARD-REPLY
               PERFORM DO-OUTPUT