Index: svn/StudioHook.cls.xml
===================================================================
diff -u -r1545 -r1553
--- svn/StudioHook.cls.xml	(.../StudioHook.cls.xml)	(revision 1545)
+++ svn/StudioHook.cls.xml	(.../StudioHook.cls.xml)	(revision 1553)
@@ -196,12 +196,7 @@
 		set UpdateToVersion = $select(tMenu(2)["to head":"",1:0)
 		do ..SubversionUpdate(.InternalName,.Action,.Target,.Msg,.Reload,UpdateToVersion)
 	} elseif tMenu="getlatest" {
-		#dim Feedback As %CharacterStream = ..svnHelper.SubversionGetLatest()
-		Do Feedback.Rewind()
-		While 'Feedback.AtEnd 
-		{
-			Write Feedback.ReadLine(),!
-		}
+		do ..svnHelper.SubversionGetLatest()
 	} elseif tMenu="pre-commit" {
 		do ..SubversionPreCommit(.InternalName,.Action,.Target,.Msg,.Reload)
 	} elseif tMenu="check" {
Index: svn/Helper.cls.xml
===================================================================
diff -u -r1551 -r1553
--- svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1551)
+++ svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1553)
@@ -96,11 +96,11 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Feedback">
-<Type>%GlobalCharacterStream</Type>
+<Property name="IsCodeVeranderd">
+<Type>%Boolean</Type>
 </Property>
 
-<Property name="IsCodeVeranderd">
+<Property name="GetLatestFailed">
 <Type>%Boolean</Type>
 </Property>
 
@@ -144,7 +144,7 @@
 		}
 		Set SvnHelper = ##class(svn.Helper).%New()
 		Do SvnHelper.VoerUitGetLatest()	
-		If (SvnHelper.Failed.Count()>0){
+		If (SvnHelper.GetLatestFailed){
 			Do SvnHelper.MailGefaaldeSvnCommands("GetLatest")
 		}ElseIf(UitvoerenUnitTesten && SvnHelper.IsCodeVeranderd){	
 			Do SvnHelper.VoerUitUnitTesten()		
@@ -165,8 +165,7 @@
 <Method name="VoerUitUnitTesten">
 <Private>1</Private>
 <Implementation><![CDATA[
-	If (+$G($$$SVNGlobal("SourceControl","SVN","UnitTestNaGetLatest")) &&
-	(..Failed.Count() = 0)) {
+	If '..GetLatestFailed {
 		Set $$$SVNGlobal("SourceControl","SVN","UnitTestInProcess") = 1
 		Do ##class(vhUnitTest.Manager).RunTest("/MailOnError=1")
 		Set $$$SVNGlobal("SourceControl","SVN","UnitTestInProcess") = 0		
@@ -179,8 +178,7 @@
 <Implementation><![CDATA[
 	If ..Failed.Count() > 0 
 	{
-		#dim FeedbackStream As %CharacterStream = ..GeefFailedCharacterStream(Actie)
-		
+		#dim FeedbackStream As %CharacterStream = ..GeefFailedCharacterStream(Actie)		
 		#dim ServerNaam As %String = ##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam()
 		#dim Namespace As %String = ##class(TECH.Context.RuntimeContext).Instance().GeefNamespace()
 		#dim From As %String =  $$$SystemMail(ServerNaam_" - Subversion")
@@ -319,7 +317,7 @@
 			 }
 	
 			if ImportUitvoeren {
-					Do ..Feedback.WriteLine("Importing "_InternalName)
+					w "Importing "_InternalName,!
 					do ..Import(Filename) 
 					do ##class(svn.SourceCodeInfo).Update(InternalName,Filename)
 			}
@@ -329,7 +327,7 @@
 			}
 		}
 		else {
-			Do ..Feedback.WriteLine("Skipping : "_Filename)
+			w "Skipping : "_Filename,!
 		}
 	}
 ]]></Implementation>
@@ -1074,13 +1072,6 @@
 	 elseif ..MatchesWildCard(InternalName,"csp.svn*") { set result = 1 }
 	 elseif InternalName["svnSynchro" { set result = 1 }
 	 
-	 /* 
-	 if ..MatchesWildCard(InternalName,"kutac*") { set result = 1 }
-	 elseif ..MatchesWildCard(InternalName,"SyncTool*") { set result = 1 }
-	 elseif ..MatchesWildCard(InternalName,"/csp/SourceControl*") { set result = 1 }
-	 elseif ..MatchesWildCard(InternalName,"SourceControl*") { set result = 1 }
-	 */
-	 
 	 quit result
 ]]></Implementation>
 </Method>
@@ -1262,13 +1253,18 @@
 </Method>
 
 <Method name="ShowFailed">
-<Implementation><![CDATA[	Do ..Feedback.CopyFrom(..GeefFailedCharacterStream())
+<Implementation><![CDATA[
+	#dim FailedCharacterStream As %GlobalCharacterStream = ..GeefFailedCharacterStream()
+	while 'FailedCharacterStream.AtEnd
+	{
+		w FailedCharacterStream.ReadLine(),!
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="GeefFailedCharacterStream">
-<FormalSpec>Actie:%String=""</FormalSpec>
-<ReturnType>%GlobalCharacterStream</ReturnType>
+<FormalSpec>Actie:%String</FormalSpec>
+<ReturnType>%CharacterStream</ReturnType>
 <Implementation><![CDATA[
 	Set FailedFeedback = ##class(%GlobalCharacterStream).%New()
 	If (..Failed.Count()'=0){		
@@ -1301,7 +1297,6 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ..IsCodeVeranderd = 0
-	Set ..Feedback = ##class(%GlobalCharacterStream).%New()
 	set ..TECHCSPApplicatie = ##class(TECH.CSP.CSPApplicatie).Instance()
 	if ##class(svn.CompileList).%ExistsId(1) { set ..ToCompile = ##class(svn.CompileList).%OpenId(1) }
 	else { set ..ToCompile = ##class(svn.CompileList).%New() }
@@ -1844,46 +1839,36 @@
 </Method>
 
 <Method name="SubversionGetLatest">
-<ReturnType>%CharacterStream</ReturnType>
 <Implementation><![CDATA[
 	Do ..VoerUitGetLatest()
 	Do ..Failed.Clear()
-	
-	Set Feedback = ##class(%GlobalCharacterStream).%New()
-	Do Feedback.CopyFrom(..Feedback)
-	Do ..Feedback.Clear()
-	
-	Quit Feedback
 ]]></Implementation>
 </Method>
 
 <Method name="VoerUitGetLatest">
 <Private>1</Private>
 <Implementation><![CDATA[
-	set GetLatestFailed = 0
+	set ..GetLatestFailed = 0
 	Set ..IsCodeVeranderd = 0
 
 	if $get($$$SVNGlobal("SourceControl",$$$PRODUCT,"HasConflicts"))=1 {
-		Do ..Feedback.WriteLine()
-		Do ..Feedback.WriteLine("!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!")
-		Do ..Feedback.WriteLine(" Momenteel zijn er conflicten of compile problemen gelieve deze eerst op te lossen....  ")
-		Do ..Feedback.WriteLine(" Indien deze opgelost zijn gelieve "_ $ZR _ " te verwijderen ")
-		Do ..Feedback.WriteLine("!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!")
+		w !,"!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!",!
+		w " Momenteel zijn er conflicten of compile problemen gelieve deze eerst op te lossen....  ",!
+		w " Indien deze opgelost zijn gelieve "_ $ZR _ " te verwijderen ",!
+		w "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!",!
 	}		
 	else {
 	
 		if ..WorkingOffline() { 
-			Do ..Feedback.WriteLine("Currently not online")
+			w "Currently not online",!
 		}
 		else {
 			
 			set Message = "Getting Latest .. "_$zdatetime($ztimestamp,3)
 			set Streepkes="",$piece(Streepkes,"-",$length(Message))="-"
-			Do ..Feedback.WriteLine()
-			Do ..Feedback.WriteLine(Streepkes)
-			Do ..Feedback.WriteLine(Message)
-			Do ..Feedback.WriteLine()
-			Do ..Feedback.WriteLine("Getting code")
+			w !,Streepkes,!
+			w Message,!
+			w !,"Getting code",!
 			
 			set tCmd=##class(svn.Command).%New($lb(..LocalWorkspacePath(..Branch)))
 			set tCmd.SubCommand="update"
@@ -1897,8 +1882,7 @@
 
 		    set UnitTestWorkspacePath =  ..UnitTestWorkspacePath() 
 		    if $length(UnitTestWorkspacePath) && ( (UnitTestWorkspacePath)'="\" ) {
-    			Do ..Feedback.WriteLine()
-    			Do ..Feedback.WriteLine("Getting unittest info")
+    			w !,"Getting unittest info",!
 				set tCmd=##class(svn.Command).%New($lb(UnitTestWorkspacePath))
 				set tCmd.SubCommand="update"
 				Set tCmd.Revision= ""
@@ -1914,37 +1898,30 @@
 				set Message = "Getting Latest done"
 			} else {
 				Do ..ShowFailed()
-				set GetLatestFailed = 1
+				set ..GetLatestFailed = 1
 				set Message ="Getting Latest **FAILED**"
 			}
 			
 			set Streepkes="",$piece(Streepkes,"-",$length(Message))="-"
-			Do ..Feedback.WriteLine()
-			Do ..Feedback.WriteLine(Message)
-			Do ..Feedback.WriteLine(Streepkes)
-			Do ..Feedback.WriteLine()
-			
+			w !,Message,!
+			w Streepkes,!			
 			}
 		}
 		
-	if 'GetLatestFailed {
+	if '..GetLatestFailed {
 		if ..ToCompile.List.Count() {
-			Do ..Feedback.WriteLine()
-			Do ..Feedback.WriteLine()
-			Do ..Feedback.WriteLine("Hercompilatie voorgaande fouten")
+			w !!,"Hercompilatie voorgaande fouten",!
 			do ..CompileImportedSourceCode(1)
 			Do ..ShowFailed()
 			set GetLatestFailed = ..Failed.Count()
 			do ..Failed.Clear()
 		}
 	}
 	
-	if 'GetLatestFailed {
-		Do ..Feedback.WriteLine()
-		Do ..Feedback.WriteLine("Starting deploy classes")
-		Do ..Feedback.WriteLine()
+	if '..GetLatestFailed {
+		w !,"Starting deploy classes",!
 		do ##class(svn.Deploy).Run()
-		Do ..Feedback.WriteLine("Deploy classes finished")
+		w "Deploy classes finished",!
 	}
 ]]></Implementation>
 </Method>
@@ -1953,7 +1930,7 @@
 <Description>
 performs results display and post processing (if desired)</Description>
 <FormalSpec>pCmd:svn.Command</FormalSpec>
-<ReturnType>%CharacterStream</ReturnType>
+<ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	set tCmdDelim=$s($$$ISWINDOWS:"&",$$$ISUNIX:"&&",1:"?")
 	set tSC=$$$OK
@@ -1963,25 +1940,25 @@
 	do tResult.Rewind()
 	while tResult.AtEnd=0 {
 		Set line = tResult.ReadLine()
-		Do ..Feedback.WriteLine(line)
+		w line,!
 		if ($Extract($ZCVT(line,"U"),1,$length("Restored"))=$ZCVT("Restored","U"))
 		{   Set File = $PIECE(line,"'",2)
-			Do ..Feedback.WriteLine("Restore file : "_File)
+			w "Restore file : "_File,!
 			Do ..SVNImport(File)
-			Do ..Feedback.WriteLine(" *** Studio HINT: please make sure you add this file into your copy of project!")
+			w " *** Studio HINT: please make sure you add this file into your copy of project!",!
 		}
 	}
 		
 	if pCmd.Results.Count()>0 {
-		If ..Debug Do ..Feedback.WriteLine("SubCommand: "_pCmd.SubCommand_" & Reload = "_+pCmd.Reload)
+		If ..Debug w "SubCommand: "_pCmd.SubCommand_" & Reload = "_+pCmd.Reload,!
 		if pCmd.SubCommand="checkout" {
 			// checkout returns full external name - with path
 			set i="" set tCmdResult=pCmd.Results.GetNext(.i)
-			If ..Debug Do ..Feedback.WriteLine("tCmdResult:"_tCmdResult_" -> "_tCmdResult.Action_"---> "_pCmd.Results.GetNext(.i))
+			If ..Debug w "tCmdResult:"_tCmdResult_" -> "_tCmdResult.Action_"---> "_pCmd.Results.GetNext(.i),!
 			while tCmdResult'=$$$NULLOREF {
 				if tCmdResult.Action="A" { 
 					Do ..SVNImport(tCmdResult.ExternalName)
-					Do ..Feedback.WriteLine(" *** Studio HINT: please make sure you add this file into your copy of project!")
+					w " *** Studio HINT: please make sure you add this file into your copy of project!",!
 				} elseif tCmdResult.Action="D" {
 					set tIName=..InternalName(tCmdResult.ExternalName)
 					if ..HasToBeSynchronized(tIName) do ..DeleteCode(tIName)
@@ -1993,7 +1970,7 @@
 			// +DK 1.21
 		} elseif (pCmd.SubCommand="update")&(pCmd.Reload) {
 			// update returns only external name without path
-			If ..Debug	Do ..Feedback.WriteLine("Updating.. "_pCmd.SubCommand)
+			If ..Debug	w "Updating.. "_pCmd.SubCommand,!
 			set i="" set tCmdResult=pCmd.Results.GetNext(.i)
 			while tCmdResult'=$$$NULLOREF {
 				// +DK 1.21, DK 2.11 (G option)