--- a/SVNSourceCodeManager.st	Tue Oct 20 11:47:39 2009 +0200
+++ b/SVNSourceCodeManager.st	Tue Oct 20 11:48:37 2009 +0200
@@ -42,12 +42,12 @@
 
 loadPackageWithId: aPackageId fromRepositoryAsAutoloaded: doLoadAsAutoloaded
 
-    | retval loadBlock manager |
+    | retval loadBlock |
 
-    manager := SVN::RepositoryManager current.
 
     loadBlock := [
-        | repo packageDir |
+        | repo packageDir manager|
+        manager := SVN::RepositoryManager current.
         repo := manager repositoryForPackage: aPackageId.
         retval := (repo notNil and:[repo exists]) ifTrue:[
             repo workingCopy checkout.