Index: vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml
===================================================================
diff -u -r4568 -r4570
--- vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml	(.../Deploy20120208ICTUserFromIP.cls.xml)	(revision 4568)
+++ vhDeploy/WV/Deploy20120208ICTUserFromIP.cls.xml	(.../Deploy20120208ICTUserFromIP.cls.xml)	(revision 4570)
@@ -13,15 +13,11 @@
 <Method name="ExecCode">
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
-	#dim qspec As %String
-	#dim Errors As %String
-	#dim LijstClassesEnRoutines As %String = "TECH.Context.RuntimeContext.cls,TECH.Error.impl.ErrorHandler.cls,vhLib.Logger.cls,vhLib.mac"
+	Set LijstClassesEnRoutines = "TECH.Context.RuntimeContext.cls,TECH.Error.impl.ErrorHandler.cls,vhLib.Logger.cls,vhLib.mac"
 	
 	Write "Volgende code wordt gecompileerd : "_LijstClassesEnRoutines,!,! 
 	Do $System.OBJ.CompileList(LijstClassesEnRoutines,.qspec,.Errors)
 	
-	d WLIP^vhDBG(97,"compile : "_qspec)
-	
 	If ($D(Errors))&&($G(Errors)>0) {
 		Write "Errors bij het compileren van de code : ",!
 		Write $$ArrayToText^vhLib("Errors",.Errors),!