From 938433330703f4b82f70809f57dc484b6270c619 Mon Sep 17 00:00:00 2001 From: Quinn Evans Date: Sun, 19 Feb 2017 15:03:42 -0700 Subject: [PATCH] Alphabetize and complete help message. --- WOPO.COB | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/WOPO.COB b/WOPO.COB index 3b77b2b..e0d634d 100644 --- a/WOPO.COB +++ b/WOPO.COB @@ -427,10 +427,11 @@ HANDLE-HELP. PERFORM BEGIN-REPLY. - STRING "$$BF-INPUT $$BF-CODE $$BF-OUTPUT $$BF-RUN " - - "$$HELP $$LEVEL $$LIST-USERS $$JOIN $$PART " - - "$$VOICE $$DEVOICE $$OP $$DEOP " - - "$$SHOW-ESCAPES $$RELEVEL $$SOURCE $$STRESS" + STRING "COMMANDS$COLN$ " + - "$$BF-CODE $$BF-INPUT $$BF-OUTPUT $$BF-RUN $$DEOP " + - "$$DEVOICE $$HELP $$JOIN $$LEVEL $$LICK-ME " + - "$$LIST-USERS $$OP $$PART $$RELEVEL $$SHITFED " + - "$$SHOW-ESCAPES $$SOURCE $$STRESS $$VOICE " - "$NUL$" INTO MSG-BODY WITH POINTER WORK-PTR.