ImageEditor.st
changeset 1843 771731481a20
parent 1842 f04fe34d10ac
child 1847 d7e8ec4f3696
equal deleted inserted replaced
1842:f04fe34d10ac 1843:771731481a20
  1341             )
  1341             )
  1342            (VariableHorizontalPanelSpec
  1342            (VariableHorizontalPanelSpec
  1343               name: 'horizontalPanel'
  1343               name: 'horizontalPanel'
  1344               layout: (LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
  1344               layout: (LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
  1345               snapMode: both
  1345               snapMode: both
  1346               barLevel: 1
  1346               barLevel: 0
  1347               component: 
  1347               component: 
  1348              (SpecCollection
  1348              (SpecCollection
  1349                 collection: (
  1349                 collection: (
  1350                  (ViewSpec
  1350                  (ViewSpec
  1351                     name: 'leftView'
  1351                     name: 'leftView'
  1535                     )
  1535                     )
  1536                   )
  1536                   )
  1537                  )
  1537                  )
  1538                
  1538                
  1539               )
  1539               )
  1540               handles: (Any 0.3 1.0)
  1540               handles: (Any 0.288889 1.0)
  1541             )
  1541             )
  1542            (UISubSpecification
  1542            (UISubSpecification
  1543               name: 'infoBarSubSpec'
  1543               name: 'infoBarSubSpec'
  1544               layout: (LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
  1544               layout: (LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
  1545               majorKey: ToolApplicationModel
  1545               majorKey: ToolApplicationModel
  4020     cMap at:selectedColorIndex put:(aBlock value:clr).
  4020     cMap at:selectedColorIndex put:(aBlock value:clr).
  4021 
  4021 
  4022     newImage := img species new
  4022     newImage := img species new
  4023                     width:img width
  4023                     width:img width
  4024                     height:img height
  4024                     height:img height
  4025                     depth:nil
  4025                     depth:img depth
  4026                     fromArray:img bits.
  4026                     fromArray:img bits.
  4027 
  4027 
  4028     newImage colorMap:cMap.  
  4028     newImage colorMap:cMap.  
  4029     newImage fileName:img fileName.
  4029     newImage fileName:img fileName.
  4030     newImage mask:(img mask copy).
  4030     newImage mask:(img mask copy).