Replace removed discarded-state code

Author: isc-etamarch

cls/SourceControl/Git/WebUIDriver.cls

@@ -137,6 +137,9 @@ ClassMethod HandleRequest(pagePath As %String, InternalName As %String = "", Out
             } elseif (pathStart = "dirname") {
                 do %data.Write(##class(SourceControl.Git.Utils).TempFolder())
                 set handled = 1
+            } elseif (pathStart = "discarded-states") {
+                set discardsInBranch = ##class(SourceControl.Git.DiscardState).DiscardStatesInBranch()
+                do %data.Write(discardsInBranch.%ToJSON())
             } elseif (pathStart = "contexts") {
                 set contexts = ##class(SourceControl.Git.Utils).GetContexts()
                 do contexts.%ToJSON(%data)