--- a/Tools__StoreProjectBrowser.st	Sat Sep 19 13:13:52 2009 +0200
+++ b/Tools__StoreProjectBrowser.st	Sat Sep 19 16:50:15 2009 +0200
@@ -787,6 +787,7 @@
 !
 
 postOpenWith:aBuilder
+    super postOpenWith:aBuilder.
     self updatePackagesList.
 !
 
@@ -814,7 +815,7 @@
 
     defaultInfo := StoreSourceCodeManager defaultDBInfo.
     defaultInfo dbName isNil ifTrue:[
-        defaultInfo := StoreSourceCodeManager repositoryInfoPerModule first.
+        defaultInfo := StoreSourceCodeManager repositoryInfoPerModule firstIfEmpty:nil.
     ].
     dbInfo := defaultInfo
 !
@@ -829,6 +830,7 @@
         ].
         connection := session.
         self updateInfo.
+        self updatePackagesList.
     ]
 !
 
@@ -1025,5 +1027,5 @@
 !StoreProjectBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__StoreProjectBrowser.st,v 1.8 2006-08-28 13:39:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__StoreProjectBrowser.st,v 1.9 2009-09-19 14:50:15 cg Exp $'
 ! !