--- a/Tools__ProjectBuilderAssistantApplication.st	Fri Oct 07 00:04:03 2016 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st	Fri Oct 07 01:57:58 2016 +0200
@@ -3079,7 +3079,11 @@
             windowSpecSelector: page2_projectSelectionSpec
             enterCallbackSelector: updateListOfMatchingProjectsAndProjectIDs
             leaveCallbackSelector: fetchAttributesFromProjectDefinition
-            infoText: 'Choose an existing project definition or create a new one. These are subclasses of <I>ProjectDefinition</I> and define the type and contents of a project. Notice that the ID directly reflects the project''s location within the source code repository (module:directory/subdirectory...). If in doubt, use "&lt;yourname&gt;:demos/xxx_n".'
+            infoText: 'Choose an existing project definition or create a new one. 
+These are subclasses of <I>ProjectDefinition</I> and define the type and contents of a project. 
+<p>
+Notice that the ID directly reflects the project''s location within the source code repository (module:directory/subdirectory...). 
+If in doubt, use "&lt;yourname&gt;:demos/xxx_n".'
         ) decodeAsLiteralArray.
 
     specs add:
@@ -3089,7 +3093,9 @@
             isEnabledQuerySelector: #projectTypeIsGuiApplication
             canEnterQuerySelector: #canEnterApplicationSelection
             enterCallbackSelector: updateListOfApplicationsInProject
-            infoText: 'Choose an existing application or create a new one. These are subclasses of <I>ApplicationModel</I> and define the GUI and control flow inside the application. Can also be left blank if the startup class does it all (stx build).'
+            infoText: 'Choose an existing application or create a new one. 
+These are subclasses of <I>ApplicationModel</I> and define the GUI and control flow inside the application. 
+Can also be left blank if the startup class does it all (stx build).'
         ) decodeAsLiteralArray.
 
     specs add:
@@ -3099,7 +3105,9 @@
             isEnabledQuerySelector: #projectTypeIsNotLibrary
             canEnterQuerySelector: #canEnterStartupClassSelection
             enterCallbackSelector: updateListOfStartupClassesInProject
-            infoText: 'Choose an existing startup-class or create a new one. These are subclasses of <I>StandaloneStartup</I> and start the application. Command line arguments can be interpreted there.'
+            infoText: 'Choose an existing startup-class or create a new one. 
+These are subclasses of <I>StandaloneStartup</I> and start the application. 
+Command line arguments can be interpreted there.'
         ) decodeAsLiteralArray.
 
     specs add:
@@ -3108,7 +3116,12 @@
             windowSpecSelector: page5_specifyIncludedClasses
             enterCallbackSelector: enterContentsSpecification
             canEnterQuerySelector: #canEnterContentsSelection
-            infoText: 'Define which (other) classes are to be included. Do not include classes from other packages here. Press "<I>Scan</I>" to include all classes of the package; "<I>Browse</I>" to edit the contents manually.'
+            infoText: 'Define which (other) classes are to be included. 
+Do not include classes from other packages here. 
+<p>
+Press "<I>Scan</I>" to include all classes of the package; 
+<br>
+"<I>Browse</I>" to edit the contents manually.'
         ) decodeAsLiteralArray.
 
     specs add:
@@ -3117,14 +3130,19 @@
             windowSpecSelector: page5b_specifyPrerequisitePackages
             enterCallbackSelector: enterPrerequisitesSpecification
             canEnterQuerySelector: #canEnterPrerequisitesSelection
-            infoText: 'Define which packages are needed as prerequisites. These are required class libraries which should be packaged together with the application. Press "<I>Scan</I>" to search for prerequisites; "<I>Browse</I>" to edit the list manually.'
+            infoText: 'Define which packages are needed as prerequisites. 
+These are required class libraries which should be packaged together with the application. 
+<p>
+Press "<I>Scan</I>" to search for prerequisites; 
+<br>"<I>Browse</I>" to edit the list manually.'
         ) decodeAsLiteralArray.
 
     specs add:
         #(AssistantPageSpec
             pageTitle: 'Specify Project Attributes'
             windowSpecSelector: page6a_specifyProjectAttributes
-            infoText: 'Define additional attributes. These will be shown during the installation of the deployed package and affect the name of the deployed self installable file.'
+            infoText: 'Define additional attributes. 
+These will be shown during the installation of the deployed package and affect the name of the deployed self-installable file.'
             enterCallbackSelector: updateProjectAttributes
             leaveCallbackSelector: #rememberProjectAttributes
         ) decodeAsLiteralArray.
@@ -3323,9 +3341,11 @@
 enterDeploySpecification
     |fileBrowserCanvas fileBrowser|
 
-    fileBrowserCanvas := self builder componentAt:'FileBrowserSubCanvas'.
-    fileBrowser := fileBrowserCanvas application. 
-    fileBrowser filterModel value:('*' , ObjectFileLoader sharedLibraryExtension).
+    self projectTypeIsLibrary ifTrue:[
+        fileBrowserCanvas := self builder componentAt:'FileBrowserSubCanvas'.
+        fileBrowser := fileBrowserCanvas application. 
+        fileBrowser filterModel value:('*' , ObjectFileLoader sharedLibraryExtension).
+    ].
 !
 
 enterPrerequisitesSpecification