STXInstaller.st
changeset 9 9f31213107b8
parent 8 88df33224360
child 10 c9574685e157
equal deleted inserted replaced
8:88df33224360 9:9f31213107b8
    88     ).
    88     ).
    89 
    89 
    90     installDocFiles ifTrue:[
    90     installDocFiles ifTrue:[
    91         fileSpec := fileSpec , #(
    91         fileSpec := fileSpec , #(
    92                 ( 'doc'                              #lib     nil        false '644' )
    92                 ( 'doc'                              #lib     nil        false '644' )
       
    93         ).
       
    94     ].
       
    95 
       
    96     installSourceFiles ifTrue:[
       
    97         fileSpec := fileSpec , #(
       
    98                 ( 'projects/smalltalk/source'                #lib     nil        false '644' )
    93         ).
    99         ).
    94     ].
   100     ].
    95 
   101 
    96     installSTCFiles ifTrue:[
   102     installSTCFiles ifTrue:[
    97         fileSpec := fileSpec , #(
   103         fileSpec := fileSpec , #(
   130     installGoodyFiles ifTrue:[
   136     installGoodyFiles ifTrue:[
   131         fileSpec := fileSpec , #(
   137         fileSpec := fileSpec , #(
   132                 ( 'goodies/*.st'                             #lib     'goodies'  false '644' )
   138                 ( 'goodies/*.st'                             #lib     'goodies'  false '644' )
   133                 ( 'goodies/*.chg'                            #lib     'goodies'  false '644' )
   139                 ( 'goodies/*.chg'                            #lib     'goodies'  false '644' )
   134                 ( 'goodies/rdoit/rdoit'                      #bin     nil        false '755' )
   140                 ( 'goodies/rdoit/rdoit'                      #bin     nil        false '755' )
   135         ).
       
   136     ].
       
   137 
       
   138     installSourceFiles ifTrue:[
       
   139         fileSpec := fileSpec , #(
       
   140                 ( 'projects/smalltalk/source'                #lib     nil        false '644' )
       
   141         ).
   141         ).
   142     ].
   142     ].
   143 
   143 
   144     filesToCopy := OrderedCollection new.
   144     filesToCopy := OrderedCollection new.
   145 
   145