diff -r f861c61ca047 -r 77c59731e289 STXInstaller.st
--- a/STXInstaller.st	Mon May 31 17:35:59 1999 +0200
+++ b/STXInstaller.st	Mon May 31 17:49:16 1999 +0200
@@ -155,23 +155,25 @@
         dirsToMake add:stxLibBinDir.
         dirsToMake add:(stxLibDir asFilename constructString:'configurations').
         dirsToMake add:(stxLibDir asFilename constructString:'doc').
-        dirsToMake add:(stxLibDir asFilename constructString:'doc/online').
-        dirsToMake add:(stxLibDir asFilename constructString:'doc/online/english').
-        dirsToMake add:(stxLibDir asFilename constructString:'doc/online/german').
-        dirsToMake add:(stxLibDir asFilename constructString:'doc/online/french').
-        dirsToMake add:(stxLibDir asFilename constructString:'doc/online/italian').
+        dirsToMake add:((stxLibDir asFilename construct:'doc') constructString:'online').
+        dirsToMake add:(((stxLibDir asFilename construct:'doc') construct:'online') constructString:'english').
+        dirsToMake add:(((stxLibDir asFilename construct:'doc') construct:'online') constructString:'german').
+        dirsToMake add:(((stxLibDir asFilename construct:'doc') construct:'online') constructString:'french').
+        dirsToMake add:(((stxLibDir asFilename construct:'doc') construct:'online') constructString:'italian').
         dirsToMake add:(stxLibDir asFilename constructString:'include').
         dirsToMake add:(stxLibDir asFilename constructString:'resources').
         dirsToMake add:(stxLibDir asFilename constructString:'binary').
         dirsToMake add:(stxLibDir asFilename constructString:'bitmaps').
-        dirsToMake add:(stxLibDir asFilename constructString:'goodies').
+        installGoodyFiles ifTrue:[
+            dirsToMake add:(stxLibDir asFilename constructString:'goodies').
+        ].
         installSourceFiles ifTrue:[
             dirsToMake add:(stxLibDir asFilename constructString:'source').
         ]
     ].
     ^ dirsToMake
 
-    "Modified: / 31.5.1999 / 15:20:45 / cg"
+    "Modified: / 31.5.1999 / 17:42:19 / cg"
 !
 
 listOfOptionalPackages
@@ -339,22 +341,22 @@
 
     installSourceFiles ifTrue:[
         fileSpec := fileSpec , #(
-                ( 'projects\smalltalk\source'           #lib     nil                    false  )
-                ( 'libbasic\*.st'    #lib     'source\libbasic'      false  )
-                ( 'libbasic2\*.st'   #lib     'source\libbasic2'     false  )
-                ( 'libbasic3\*.st'   #lib     'source\libbasic3'     false  )
-                ( 'libcomp\*.st'     #lib     'source\libcomp'       false  )
-                ( 'libview\*.st'     #lib     'source\libview'       false  )
-                ( 'libview2\*.st'    #lib     'source\libview2'      false  )
-                ( 'libwidg\*.st'     #lib     'source\libwidg'       false  )
-                ( 'libwidg2\*.st'    #lib     'source\libwidg2'      false  )
-                ( 'libwidg3\*.st'    #lib     'source\libwidg3'      false  )
-                ( 'libtool\*.st'     #lib     'source\libtool'       false  )
-                ( 'libtool2\*.st'    #lib     'source\libtool2'      false  )
-                ( 'libui\*.st'       #lib     'source\libui'         false  )
-                ( 'libhtml\*.st'     #lib     'source\libhtml'       false  )
-                ( 'libodbc\*.st'     #lib     'source\libodbc'       false  )
-                ( 'libopengl\*.st'   #lib     'source\libopengl'     false  )
+                ( 'projects\smalltalk\source'   #lib     nil                    false  )
+                ( 'libbasic\*.st'               #lib     'source\libbasic'      false  )
+                ( 'libbasic2\*.st'              #lib     'source\libbasic2'     false  )
+                ( 'libbasic3\*.st'              #lib     'source\libbasic3'     false  )
+                ( 'libcomp\*.st'                #lib     'source\libcomp'       false  )
+                ( 'libview\*.st'                #lib     'source\libview'       false  )
+                ( 'libview2\*.st'               #lib     'source\libview2'      false  )
+                ( 'libwidg\*.st'                #lib     'source\libwidg'       false  )
+                ( 'libwidg2\*.st'               #lib     'source\libwidg2'      false  )
+                ( 'libwidg3\*.st'               #lib     'source\libwidg3'      false  )
+                ( 'libtool\*.st'                #lib     'source\libtool'       false  )
+                ( 'libtool2\*.st'               #lib     'source\libtool2'      false  )
+                ( 'libui\*.st'                  #lib     'source\libui'         false  )
+                ( 'libhtml\*.st'                #lib     'source\libhtml'       false  )
+                ( 'libodbc\*.st'                #lib     'source\libodbc'       false  )
+                ( 'libopengl\*.st'              #lib     'source\libopengl'     false  )
         ).
     ].
 
@@ -370,6 +372,7 @@
         fileSpec := fileSpec , #(
                 ( 'goodies\*.st'                             #lib     'goodies'  false  )
                 ( 'goodies\*.chg'                            #lib     'goodies'  false  )
+                ( 'clients\*'                                #lib     'clients'  false  )
         ).
     ].
 
@@ -377,7 +380,7 @@
     ^ fileSpec
 
     "Created: / 2.5.1999 / 13:23:06 / cg"
-    "Modified: / 31.5.1999 / 16:40:18 / cg"
+    "Modified: / 31.5.1999 / 17:39:58 / cg"
 !
 
 xxspecOfFilesToCopy