Index: svn/Repository.cls.xml
===================================================================
diff -u -r1571 -r1573
--- svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1571)
+++ svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1573)
@@ -227,12 +227,12 @@
 			 }
 			if ImportUitvoeren {
 					w "Importing "_InternalName,!
-					do ..Import(Filename) 
-					do ##class(svn.SourceCodeInfo).Update(InternalName,Filename)
+					set stImport = ..Import(Filename) 
+					if stImport { 
+						do ..ToCompile.Insert(InternalName)	
+						do ##class(svn.SourceCodeInfo).Update(InternalName,Filename)
+					}
 			}
-			if ( 'ImportFailed ) && ( ImportUitvoeren ) {
-				do ..ToCompile.Insert(InternalName)	
-			}
 		}
 		else {
 			w "Skipping : "_Filename,!
@@ -244,11 +244,15 @@
 <Method name="Import">
 <FormalSpec>ExternalName:%String</FormalSpec>
 <ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit $$$OK
+]]></Implementation>
 </Method>
 
 <Method name="Export">
 <FormalSpec>InternalName:%String</FormalSpec>
 <ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit $$$OK
+]]></Implementation>
 </Method>
 
 <Method name="GetSVNAddFilename">
Index: svn/Repository/CSPRepository.cls.xml
===================================================================
diff -u -r1572 -r1573
--- svn/Repository/CSPRepository.cls.xml	(.../CSPRepository.cls.xml)	(revision 1572)
+++ svn/Repository/CSPRepository.cls.xml	(.../CSPRepository.cls.xml)	(revision 1573)
@@ -11,7 +11,7 @@
 <FormalSpec>InternalName</FormalSpec>
 <Implementation><![CDATA[
 	do ##class(%RoutineMgr).Delete(InternalName)
-	write !,"deleting "_InternalName,!
+	write "deleting "_InternalName,!
 ]]></Implementation>
 </Method>