Changeset 1586 for ccr/trunk/p/C0CMXMLB.m

Timestamp:

Oct 30, 2012, 1:11:02 PM (12 years ago)

Author:

Sam Habiel

Message:

Changed license to AGPL. Some clean-up for XINDEX

File:

• ccr/trunk/p/C0CMXMLB.m (modified) (2 diffs)

ccr/trunk/p/C0CMXMLB.m

@@ -1 +1 @@
 C0CMXMLB        ;;ISF/RWF - Tool to build XML ; 5/10/12 2:51pm
-        ;;1.2;C0C;;May 11, 2012;Build 47
+        ;;1.2;CCD/CCR GENERATION UTILITIES;;Oct 30, 2012;Build 50
         QUIT
+        ;
+        ; FOIA Routine - Public Domain
         ;
         ;DOC - The top level tag
@@ -10 +12 @@
         S ^TMP("MXMLBLD",$J,"DOC")=DOC,^TMP("MXMLBLD",$J,"STK")=0
         I $G(FLAG)["G" S ^TMP("MXMLBLD",$J,"CNT")=1
-        I $G(NO1ST)'=1 D OUTPUT($$XMLHDR) 
+        I $G(NO1ST)'=1 D OUTPUT($$XMLHDR)
         D:$L($G(DOCTYPE)) OUTPUT("<!DOCTYPE "_DOCTYPE_">") D OUTPUT("<"_DOC_">")
         Q