Index: svn/Helper.cls.xml
===================================================================
diff -u -r1713 -r1716
--- svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1713)
+++ svn/Helper.cls.xml	(.../Helper.cls.xml)	(revision 1716)
@@ -235,12 +235,13 @@
 <Method name="MailGefaaldeSvnCommands">
 <FormalSpec>Actie:%String</FormalSpec>
 <Implementation><![CDATA[
-	If ..Failed.Count() > 0 
-	{
-		Set FeedbackStream = ..GeefFailedCharacterStream(Actie)		
-		Set From =  $$$SystemMail(..GeefServerNaam()_" - Subversion")
-		Set MailTo = $listbuild($$$SVNGlobal("SourceControl","SVN","MailWhenFailed"))
-		Do SendMiniMailForced^vhLib.Mail(From,MailTo,"Subversion failed on ["_..GeefServerNaam()_" => "_..GeefNamespace()_"]",FeedbackStream,1)
+	If ..Failed.Count() > 0 {
+		#dim MailTo As TECH.String = $$$SVNGlobal("SourceControl","SVN","MailWhenFailed")
+		If MailTo '= "" {
+			Set FeedbackStream = ..GeefFailedCharacterStream(Actie)		
+			Set From =  $$$SystemMail(..GeefServerNaam()_" - Subversion")
+			Do SendMiniMailForced^vhLib.Mail(From,$ListBuild(MailTo),"Subversion failed on ["_..GeefServerNaam()_" => "_..GeefNamespace()_"]",FeedbackStream,1)
+		}
 	}
 ]]></Implementation>
 </Method>