--- a/GitSourceCodeManager.st	Thu Jun 02 09:19:54 2016 +0100
+++ b/GitSourceCodeManager.st	Mon Jun 06 12:32:59 2016 +0100
@@ -65,10 +65,17 @@
     DisabledModules := nil.
 !
 
+gitCommandSemaphore
+    GitCommandSemaphore isNil ifTrue:[
+        GitCommandSemaphore := (Semaphore new:10) name:'Concurrent GIT Commands'.    "/ at most 10 git activities concurrently
+    ].
+    ^ GitCommandSemaphore
+!
+
 initialize
     | s |
 
-    GitCommandSemaphore := (Semaphore new:10) name:'Concurrent GIT Commands'.    "/ at most 10 git activities concurrently
+    "/ GitCommandSemaphore := (Semaphore new:10) name:'Concurrent GIT Commands'.    "/ at most 10 git activities concurrently
     GitCommitOptions := ''.
     GitUpdateOptions := ''.
     DisabledModules := nil.