STXInstaller.st
changeset 1503 fc8bbc760d17
parent 1369 2e0f974abecc
child 1508 ee75546c6820
equal deleted inserted replaced
1502:f5baa791b8cb 1503:fc8bbc760d17
       
     1 "{ Package: 'stx:libtool2' }"
       
     2 
     1 Object subclass:#STXInstaller
     3 Object subclass:#STXInstaller
     2 	instanceVariableNames:'stxLibDir stxLibBinDir stxBinDir stxPkgDir stxDocDir stxTopDir
     4 	instanceVariableNames:'stxLibDir stxLibBinDir stxBinDir stxPkgDir stxDocDir stxTopDir
     3 		installDocFiles installSourceFiles installSTCFiles
     5 		installDocFiles installSourceFiles installSTCFiles
     4 		installGoodyFiles fullDir actionPercentageHolder actionTextHolder
     6 		installGoodyFiles fullDir actionPercentageHolder actionTextHolder
     5 		commandTraceView resources dfHolder copyProcess installWhat'
     7 		commandTraceView resources dfHolder copyProcess installWhat'
   337 
   339 
   338     fileSpec := fileSpec , #(
   340     fileSpec := fileSpec , #(
   339                 "/ name                             destination  subDir             required       
   341                 "/ name                             destination  subDir             required       
   340                 ( 'projects\smalltalk\smalltalk.bat'    #bin     nil                  true   )
   342                 ( 'projects\smalltalk\smalltalk.bat'    #bin     nil                  true   )
   341                 ( 'projects\smalltalk\stx.exe'          #bin     nil                  true   )
   343                 ( 'projects\smalltalk\stx.exe'          #bin     nil                  true   )
       
   344                 ( 'projects\smalltalk\winstx.exe'       #bin     nil                  true   )
   342                 ( 'projects\smalltalk\stxspawn.exe'     #bin     nil                  true   )
   345                 ( 'projects\smalltalk\stxspawn.exe'     #bin     nil                  true   )
   343                 ( 'projects\smalltalk\*.dll'            #bin     nil                  true   )
   346                 ( 'projects\smalltalk\*.dll'            #bin     nil                  true   )
   344     ).
   347     ).
   345 
   348 
   346     installSTCFiles ifTrue:[
   349     installSTCFiles ifTrue:[
   358     ].
   361     ].
   359 
   362 
   360     ^ fileSpec
   363     ^ fileSpec
   361 
   364 
   362     "Created: / 2.5.1999 / 13:23:06 / cg"
   365     "Created: / 2.5.1999 / 13:23:06 / cg"
   363     "Modified: / 31.5.1999 / 17:39:58 / cg"
   366     "Modified: / 16.10.2001 / 12:25:58 / cg"
   364 ! !
   367 ! !
   365 
   368 
   366 !STXInstaller methodsFor:'installing'!
   369 !STXInstaller methodsFor:'installing'!
   367 
   370 
   368 addFilesToSpec:fileSpec relativeTo:rel fromINSTALLSpec:f
   371 addFilesToSpec:fileSpec relativeTo:rel fromINSTALLSpec:f