--- a/STXInstaller.st Mon May 31 17:49:16 1999 +0200
+++ b/STXInstaller.st Mon May 31 18:23:26 1999 +0200
@@ -144,7 +144,7 @@
!
directoriesToMake
- |dirsToMake|
+ |dirsToMake docDir docOnlineDir|
dirsToMake := OrderedCollection new.
installWhat == #full ifTrue:[
@@ -155,11 +155,11 @@
dirsToMake add:stxLibBinDir.
dirsToMake add:(stxLibDir asFilename constructString:'configurations').
dirsToMake add:(stxLibDir asFilename constructString:'doc').
- 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:((docDir := stxLibDir asFilename construct:'doc') constructString:'online').
+ dirsToMake add:((docOnlineDir := docDir construct:'online') constructString:'english').
+ dirsToMake add:(docOnlineDir constructString:'german').
+ dirsToMake add:(docOnlineDir constructString:'french').
+ dirsToMake add:(docOnlineDir constructString:'italian').
dirsToMake add:(stxLibDir asFilename constructString:'include').
dirsToMake add:(stxLibDir asFilename constructString:'resources').
dirsToMake add:(stxLibDir asFilename constructString:'binary').
@@ -173,7 +173,7 @@
].
^ dirsToMake
- "Modified: / 31.5.1999 / 17:42:19 / cg"
+ "Modified: / 31.5.1999 / 17:52:03 / cg"
!
listOfOptionalPackages
@@ -612,7 +612,7 @@
"
"Created: / 17.7.1996 / 15:16:20 / cg"
- "Modified: / 31.5.1999 / 17:29:19 / cg"
+ "Modified: / 31.5.1999 / 18:07:33 / cg"
!
createDirectories