Fix context changing in pull page

isc-etamarch · isc-etamarch · commit 13ff63d52109 · 2024-10-21T13:26:01.000-04:00
diff --git a/csp/pull.csp b/csp/pull.csp
@@ -11,13 +11,15 @@
 <body>
 <pre for="contextSelect" style="padding-top: 2em;white-space: pre-wrap;height: 60px;">Change Context:  <select id="newContext" onchange="updateContext()">
 	<server>
-		if (%request.Data("$NAMESPACE")) {
-			set $NAMESPACE = %request.Data("$NAMESPACE",1)
+		if $Data(%request.Data("$NAMESPACE",1),namespace)#2 {
+			set $NAMESPACE = namespace
 			set contextList = ##class(SourceControl.Git.Utils).GetContexts(1)
 			set iterator = contextList.%GetIterator()
-			&html<<option>Select</option>>
+			&html<<option>#(namespace)#</option>>
 			while iterator.%GetNext(.key, .value) {
-					&html<<option value=#(value)#>#(value)#</option>>
+				if (namespace '= value) {
+					&html<<option value="#(value)#">#(value)#</option>>
+				}
 			}
 		}
 	</server>
