# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1362786855 -3600
# Node ID 14e91641aff1b084f9c2d5344a6cdc3fd4b9b034
# Parent  93eb3b7e0db1f0760c27ae77a6ead0ffc82cb31b
Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites

diff -r 93eb3b7e0db1 -r 14e91641aff1 stx_libbasic.st
--- a/stx_libbasic.st	Sat Mar 09 00:41:30 2013 +0100
+++ b/stx_libbasic.st	Sat Mar 09 00:54:15 2013 +0100
@@ -50,16 +50,47 @@
     ^ #(
         #'exept:ctypes'    "CType - referenced by ExternalLibraryFunction>>ffiTypeSymbolForType: "
         #'exept:expecco'    "Expecco::ExpeccoXMLDecoder - referenced by ClassDescription>>iconInBrowserForVariableNamed: "
+        #'exept:libcrypt'    "HashRandom - referenced by HashStream class>>random "
+        #'stx:goodies'    "LockedFileStream - referenced by ClassDescription>>changesStream "
+        #'stx:goodies/simpleServices'    "STXScriptingServer - referenced by StandaloneStartup class>>handleScriptingOptionsFromArguments: "
+        #'stx:goodies/sunit'    "TestRunner - referenced by UserPreferences>>testRunnerClass "
+        #'stx:goodies/xml/stx'    "XMLCoder - referenced by ClassDescription>>fileOutXMLString:on: "
+        #'stx:goodies/xml/vw'    "XML::XMLParser - referenced by PeekableStream>>fileInXMLNotifying:passChunk: "
+        #'stx:libbasic2'    "List - referenced by Collection>>asList "
+        #'stx:libbasic3'    "ClassOrganizer - referenced by ClassDescription>>organization "
+        #'stx:libboss'    "BinaryObjectStorage - referenced by PeekableStream>>fileInBinary "
+        #'stx:libcomp'    "Parser - referenced by CharacterArray>>isValidSmalltalkIdentifier "
+        #'stx:libcompat'    "Dolphin::ClassCategoriesReader - referenced by ClassDescription>>categoriesForClass "
+        #'stx:libhtml'    "URL - referenced by CharacterArray>>asURL "
+        #'stx:libtool'    "Tools::ToDoListBrowser - referenced by ClassBuilder>>checkInstvarRedefsWith:subclassOf:old:name: "
+        #'stx:libview'    "Image - referenced by UserPreferences class>>saveSettings:in: "
+        #'stx:libview2'    "ApplicationModel - referenced by ApplicationDefinition class>>startupClassName_code "
+        #'stx:libwidg'    "Button - referenced by UserPreferences class>>saveSettings:in: "
+        #'stx:libwidg2'    "ProgressNotification - referenced by UserNotification class>>notify:progress: "
     )
 !
 
-preRequisites
-    "list all required packages.
+mandatoryPreRequisites
+    "list all required mandatory packages.
+     Packages are mandatory, if they contain superclasses of the package's classes
+     or classes which are extended by this package.
      This list can be maintained manually or (better) generated and
-     updated by scanning the superclass hierarchies and looking for
-     global variable accesses. (the browser has a menu function for that)
-     Howevery, often too much is found, and you may want to explicitely
-     exclude individual packages in the #excludedFromPrerequisites method."
+     updated by scanning the superclass hierarchies
+     (the browser has a menu function for that)
+     However, often too much is found, and you may want to explicitely
+     exclude individual packages in the #excludedFromPreRequisites method."
+
+    ^ #(
+    )
+!
+
+referencedPreRequisites
+    "list all packages containing classes referenced by the packages's members.
+     This list can be maintained manually or (better) generated and
+     updated by looking for global variable accesses
+     (the browser has a menu function for that)
+     However, often too much is found, and you may want to explicitely
+     exclude individual packages in the #excludedFromPreRequisites method."
 
     ^ #(
     )
@@ -505,6 +536,13 @@
 
 !stx_libbasic class methodsFor:'description - project information'!
 
+applicationIconFileName
+    "Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file"
+
+    ^ nil
+    "/ ^ self applicationName
+!
+
 companyName
     "Return a companyname which will appear in <lib>.rc"
 
@@ -523,6 +561,19 @@
     ^ 'Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012'
 
     "Modified: / 18-07-2012 / 19:10:19 / cg"
+!
+
+productInstallDirBaseName
+    "Returns a default installDir which will appear in <app>.nsi.
+     This is usually not the one you want to keep"
+
+    ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last
+!
+
+productName
+    "Return a product name which will appear in <lib>.rc"
+
+    ^ 'Smalltalk/X'
 ! !
 
 !stx_libbasic class methodsFor:'description - svn'!
@@ -537,11 +588,11 @@
 !stx_libbasic class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/stx_libbasic.st,v 1.110 2013-03-04 12:43:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/stx_libbasic.st,v 1.111 2013-03-08 23:54:15 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/stx_libbasic.st,v 1.110 2013-03-04 12:43:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/stx_libbasic.st,v 1.111 2013-03-08 23:54:15 stefan Exp $'
 !
 
 version_SVN