Index: svn/Command.cls.xml
===================================================================
diff -u -r1710 -r1731
--- svn/Command.cls.xml	(.../Command.cls.xml)	(revision 1710)
+++ svn/Command.cls.xml	(.../Command.cls.xml)	(revision 1731)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="svn.Command">
-<IncludeCode>svn,%occErrors,%sySite</IncludeCode>
+<IncludeCode>svn.Include</IncludeCode>
 <Super>%RegisteredObject</Super>
 
 <Parameter name="PRODUCT">
@@ -153,7 +153,7 @@
 <Implementation><![CDATA[
 	// DK 2.16
 	//#dim ex as %Exception.AbstractException
-	
+
 	for ii=0,1 set tCmd(ii)=$s($$$ISWINDOWS:"cmd /C ",$$$ISUNIX:"bash -c ",1:"?")
 	set:..File="..xml" ..File="" ;set tSC=..%Save()
 	
@@ -221,13 +221,13 @@
 	if ($$$SVNGlobal("SourceControl",..#PRODUCT, "CommandLog") '= 0) {
 			write "Exec ",tCmd(0),!
 		}
+	
 	do $ZF(-1, tCmd(0))
 	
 	if '(..CallOut) {
 		do ..AddOutputFileToResult(OutputFilename)
 		do ..DisplayErrors(ErrorFilename)
 	}
-
 	quit
 ]]></Implementation>
 </Method>