--- a/GitSourceCodeManager.st	Fri Mar 02 17:10:59 2012 +0100
+++ b/GitSourceCodeManager.st	Sat Mar 03 12:20:41 2012 +0100
@@ -16,7 +16,7 @@
 	classVariableNames:'Verbose DefaultRepository PerModuleRepositories DisabledModules
 		RecentlyCheckedModulesAndPackages GitCommandTimeout GitTempDir
 		GitCommandSemaphore GitExecutable GitCommitOptions
-		GitUpdateOptions'
+		GitUpdateOptions WorkDirectory'
 	poolDictionaries:''
 	category:'System-SourceCodeManagement'
 !
@@ -323,6 +323,18 @@
 
     "Created: / 10-10-2011 / 19:44:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 02-03-2012 / 15:25:35 / cg"
+!
+
+workDirectory
+    ^ WorkDirectory
+
+    "Created: / 03-03-2012 / 11:08:29 / cg"
+!
+
+workDirectory:aPath
+    WorkDirectory := aPath
+
+    "Created: / 03-03-2012 / 11:08:37 / cg"
 ! !
 
 !GitSourceCodeManager class methodsFor:'basic administration'!
@@ -412,11 +424,11 @@
 !GitSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.3 2012-03-03 11:20:41 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.2 2012-03-02 16:10:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/GitSourceCodeManager.st,v 1.3 2012-03-03 11:20:41 cg Exp $'
 ! !
 
 GitSourceCodeManager initialize!