Color.st
changeset 3240 c93e33069fb5
parent 3213 78add46c0f4b
child 3264 ab71c2bd250f
equal deleted inserted replaced
3239:a50a526d2396 3240:c93e33069fb5
   159     self allInstances do:[:aColor |
   159     self allInstances do:[:aColor |
   160         aColor restored
   160         aColor restored
   161     ].
   161     ].
   162 
   162 
   163     "Modified: 24.2.1997 / 18:27:06 / cg"
   163     "Modified: 24.2.1997 / 18:27:06 / cg"
       
   164 !
       
   165 
       
   166 flushDeviceColorsFor:aDevice
       
   167     self allInstancesDo:[:aColor |
       
   168         aColor device == aDevice ifTrue:[
       
   169             aColor restored
       
   170         ]
       
   171     ]
   164 !
   172 !
   165 
   173 
   166 getColors6x6x4
   174 getColors6x6x4
   167     "{ Pragma: +optSpace }"
   175     "{ Pragma: +optSpace }"
   168 
   176 
  5103 ! !
  5111 ! !
  5104 
  5112 
  5105 !Color class methodsFor:'documentation'!
  5113 !Color class methodsFor:'documentation'!
  5106 
  5114 
  5107 version
  5115 version
  5108     ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.156 2000-07-02 12:54:33 cg Exp $'
  5116     ^ '$Header: /cvs/stx/stx/libview/Color.st,v 1.157 2000-07-24 14:31:40 cg Exp $'
  5109 ! !
  5117 ! !
  5110 Color initialize!
  5118 Color initialize!