core/MetacelloProject.st
changeset 20 8caf2f257260
parent 16 25ac697dc747
child 22 e1678fee6b03
equal deleted inserted replaced
19:28c344380944 20:8caf2f257260
   151     ^ self map
   151     ^ self map
   152         at: aVersionString
   152         at: aVersionString
   153         ifAbsent: [ 
   153         ifAbsent: [ 
   154             (MetacelloVersionDefinitionError project: self project versionString: aVersionString)
   154             (MetacelloVersionDefinitionError project: self project versionString: aVersionString)
   155                 exception: (self errorMap at: aVersionString ifAbsent: [ ^ aBlock value ]);
   155                 exception: (self errorMap at: aVersionString ifAbsent: [ ^ aBlock value ]);
   156                 signal ]
   156                 raise ]
       
   157 
       
   158     "Modified: / 19-09-2012 / 02:14:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   157 !
   159 !
   158 
   160 
   159 platformAttributes
   161 platformAttributes
   160 
   162 
   161 	 ^self projectPlatformAttributes
   163 	 ^self projectPlatformAttributes