--- a/ProjectBuilder.st	Wed Oct 14 13:43:27 2009 +0200
+++ b/ProjectBuilder.st	Wed Oct 14 17:33:36 2009 +0200
@@ -17,14 +17,36 @@
     self new
         package:'stx:projects/helloWorldApp';
         build
+!
+
+example2
+    |builder|
+
+    Smalltalk loadPackage:'stx:clients/Demos/foxCalcApplication' asAutoloaded:true.
+
+    builder := self new.
+    builder package:'stx:clients/Demos/foxCalcApplication'.
+    builder build.
+
+    UserPreferences fileBrowserClass openOnDirectory:builder packageBuildDirectory.
 ! !
 
 !ProjectBuilder methodsFor:'accessing'!
 
+buildDirectory
+    ^ buildDirectory
+!
+
 package:aPackageIDOrSymbol
     package := aPackageIDOrSymbol asPackageId.
 !
 
+packageBuildDirectory
+    "the directoray, where the deployable binary is created (xxxSetup.exe)"
+
+    ^ buildDirectory / (package asPackageId module) / (package asPackageId directory)
+!
+
 projectDefinitionClass:something
     projectDefinitionClass := something.
 ! !