--- a/VSEPackageFileSourceWriter.st	Wed Feb 04 13:18:45 2015 +0100
+++ b/VSEPackageFileSourceWriter.st	Thu Feb 05 12:13:02 2015 +0100
@@ -328,8 +328,28 @@
         vsePackageName := projectDefinitionClass perform:#vsePackageName ifNotUnderstood:nil.
     ].
     vsePackageName isNil ifTrue:[
-        (Dialog confirm:('No vsePackageName defined in ProjectDefinition.\\Proceed (using ST/X package name)?') withCRs)
-        ifFalse:[
+        |action optionLabels options|
+
+        projectDefinitionClass notNil ifTrue:[
+            optionLabels := #('Cancel' 'No, Browse' 'Yes').
+            options := #(#abort #browse #yes)
+        ] ifFalse:[
+            optionLabels := #('Cancel' 'Yes').
+            options := #(#abort #yes)
+        ].
+        action := OptionBox
+                          request:(Dialog resources stringWithCRs:'No vsePackageName defined in ProjectDefinition.\\Proceed (using ST/X package name)?')
+                          label:'VSE Package Export'
+                          image:(WarningBox iconBitmap)
+                          buttonLabels:(Dialog resources array:optionLabels)
+                          values:options
+                          default:(projectDefinitionClass isNil ifTrue:#abort ifFalse:#browse)
+                          onCancel:#abort.
+        action == #abort ifTrue:[
+            AbortOperationRequest raise
+        ].
+        action == #browse ifTrue:[
+            UserPreferences browserClass openInClass:projectDefinitionClass.
             AbortOperationRequest raise
         ].
     ].
@@ -418,10 +438,10 @@
 !VSEPackageFileSourceWriter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEPackageFileSourceWriter.st,v 1.8 2015-02-03 19:51:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEPackageFileSourceWriter.st,v 1.9 2015-02-05 11:13:02 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEPackageFileSourceWriter.st,v 1.8 2015-02-03 19:51:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEPackageFileSourceWriter.st,v 1.9 2015-02-05 11:13:02 cg Exp $'
 ! !