updated logic and default setting for lockbranch

Author: ksaduest

cls/SourceControl/Git/Extension.cls

@@ -3,6 +3,7 @@ Import SourceControl.Git
 /// Main source control extension class, configured namespace-wide to enable use via VSCode and Studio
 Class SourceControl.Git.Extension Extends %Studio.SourceControl.Base
 {
+
 Parameter DOMAIN = "Studio";
 
 XData Menu
@@ -181,16 +182,16 @@ Method OnSourceMenuItem(name As %String, ByRef Enabled As %String, ByRef Display
         }
 
         set settings = ##class(SourceControl.Git.Settings).%New()
-        if settings.lockBranch set BranchLocked = settings.lockBranch
+        if settings.lockBranch = 1 {set BranchLocked = -1} else {set BranchLocked = 1}
 
         if ##class(SourceControl.Git.Utils).BasicMode() {
             set Enabled = $CASE(name,
                 "Status": 1,
                 "GitWebUI" : 1,
                 "Import": 1,
                 "ImportForce": 1,
-                "NewBranch": 1-BranchLocked,
-                "SwitchBranch": 1-BranchLocked,
+                "NewBranch": BranchLocked,
+                "SwitchBranch": BranchLocked,
                 "Sync": 1,
                 "": 1,
                 :-1
@@ -204,8 +205,8 @@ Method OnSourceMenuItem(name As %String, ByRef Enabled As %String, ByRef Display
                 "ExportForce": 1,
                 "Import": 1,
                 "ImportForce": 1,
-                "NewBranch": 1-BranchLocked,
-                "SwitchBranch": 1-BranchLocked,
+                "NewBranch": BranchLocked,
+                "SwitchBranch": BranchLocked,
                 "Push": 1,
                 "PushForce": 1,
                 "Fetch": 1,

cls/SourceControl/Git/Settings.cls

@@ -510,7 +510,7 @@ Method RetrieveDefaults() As %Boolean
 Method SaveDefaults() As %Boolean
 {
     set defaults = {}
-    set items = $lb("gitBinPath", "pullEventClass", "percentClassReplace", "environmentName", "systemBasicMode", "defaultMergeBranch", "mappedItemsReadOnly", "compileOnImport", "lockBranch")
+    set items = $lb("gitBinPath", "pullEventClass", "percentClassReplace", "environmentName", "systemBasicMode", "defaultMergeBranch", "mappedItemsReadOnly", "compileOnImport")
     for i=1:1:$LISTLENGTH(items) {
         set property = $listget(items,i)
         do defaults.%Set(property, $property($this, property))

cls/SourceControl/Git/Utils.cls

@@ -187,7 +187,7 @@ ClassMethod EnvironmentName() As %String
 
 ClassMethod LockBranch() As %Boolean
 {
-    quit $get(@..#Storage@("settings","lockBranch"),1)
+    quit $get(@..#Storage@("settings","lockBranch"),0)
 }
 
 ClassMethod IsLIVE() As %Boolean

csp/gitprojectsettings.csp

@@ -22,6 +22,7 @@ body {
     text-align: left;
 }
 
+
 .btn-add {
     border:none;
     padding:0%;