diff -r c27511f3028c -r f861c61ca047 STXInstaller.st --- a/STXInstaller.st Mon May 31 16:47:34 1999 +0200 +++ b/STXInstaller.st Mon May 31 17:35:59 1999 +0200 @@ -584,12 +584,17 @@ actionTextHolder value:msg. ((fileName includes:$*) not - and:[('../../' , fileName) asFilename exists not]) ifTrue:[ + and:[(topDirPrefix , fileName) asFilename exists not]) ifTrue:[ (self listOfOptionalPackages includes:fileName) ifFalse:[ commandTraceView showCR:('cannot copy ' , fileName , ' - not included in distribution'). commandTraceView endEntry. ] ] ifFalse:[ + destDir asFilename exists ifFalse:[ + commandTraceView showCR:(resources string:'creating %1 ...' with:destDir asFilename pathName). + commandTraceView endEntry. + OperatingSystem recursiveCreateDirectory:destDir asFilename pathName + ]. self recursiveCopy:(topDirPrefix , fileName) to:destDir. ] ]. @@ -604,7 +609,7 @@ " "Created: / 17.7.1996 / 15:16:20 / cg" - "Modified: / 31.5.1999 / 13:05:23 / cg" + "Modified: / 31.5.1999 / 17:29:19 / cg" ! createDirectories