diff --git a/IRC-MSG.COB b/IRC-MSG.COB
index 51133da..6104ed4 100644
--- a/IRC-MSG.COB
+++ b/IRC-MSG.COB
@@ -9,7 +9,7 @@
        LINKAGE SECTION.
        01 BUFFER.
            03 MSG-LENGTH PIC 9(3).
-	   03 MSG-BODY PIC X(512).
+           03 MSG-BODY PIC X(512).
            03 MSG-BODY-1 REDEFINES MSG-BODY PIC X.
                88 HAS-PREFIX VALUE ";".
        01 IRC-MESSAGE.
@@ -21,13 +21,13 @@
            03 PARAMETERS.
                05 TARGET PIC X(50).
                05 REST PIC X(480).
-	       05 REST-PREFIX REDEFINES REST PIC X.
-	           88 REST-PARAM VALUE ";".
+               05 REST-PREFIX REDEFINES REST PIC X.
+                   88 REST-PARAM VALUE ";".
 
        PROCEDURE DIVISION USING BUFFER, IRC-MESSAGE.
            MOVE SPACES TO IRC-MESSAGE.
-	   MOVE SPACES TO WORK.
-	   MOVE 1 TO MSG-POINTER.
+           MOVE SPACES TO WORK.
+           MOVE 1 TO MSG-POINTER.
            IF HAS-PREFIX THEN
                PERFORM WITH-PREFIX
            ELSE
@@ -39,21 +39,21 @@
            UNSTRING MSG-BODY,
                INTO REST,
                WITH POINTER MSG-POINTER.
-	   IF REST-PARAM THEN
-	       MOVE REST TO WORK
-	       MOVE 2 TO MSG-POINTER
-	       UNSTRING WORK
-		 INTO REST
-		 WITH POINTER MSG-POINTER.
+           IF REST-PARAM THEN
+               MOVE REST TO WORK
+               MOVE 2 TO MSG-POINTER
+               UNSTRING WORK
+                        INTO REST
+                        WITH POINTER MSG-POINTER.
 
        WITH-PREFIX.
            MOVE 2 TO MSG-POINTER.
            UNSTRING MSG-BODY,
-               DELIMITED BY SPACES,
-               INTO WORK,
-               WITH POINTER MSG-POINTER.
+                    DELIMITED BY SPACES,
+                    INTO WORK,
+                    WITH POINTER MSG-POINTER.
            UNSTRING WORK,
-               DELIMITED BY "!" OR "@",
-               INTO NICK,
-                    IDENT,
-                    HOST.
+                   DELIMITED BY "!" OR "@",
+                   INTO NICK,
+                   IDENT,
+                   HOST.