Index: svn/Repository.cls.xml
===================================================================
diff -u -r1708 -r1710
--- svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1708)
+++ svn/Repository.cls.xml	(.../Repository.cls.xml)	(revision 1710)
@@ -73,6 +73,10 @@
 
 <Method name="Revert">
 <Implementation><![CDATA[
+	Set SvnHelper = ##class(svn.Helper).%New()
+	Do SvnHelper.CleanUp(..WorkspacePath(..Branch))
+	Do SvnHelper.RemoveUnversioned(..WorkspacePath(..Branch))
+	
 	set tCmd=##class(svn.Command).%New($lb(..WorkspacePath(..Branch)))
 	set tCmd.SubCommand="revert"
 	do tCmd.Options.SetAt("","-R")