DisplayObjectView.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 14 Jun 2018 22:19:39 +0100
branchjv
changeset 18227 d25a407ba86d
parent 16781 0d8b05ac5efd
permissions -rw-r--r--
Mini testrunner: show "green" if there's at least one pass and rest is pass or skip This is more meaningfull result then showing "gray" if there's at least one skip.

"{ Package: 'stx:libtool' }"

"{ NameSpace: Smalltalk }"

View subclass:#DisplayObjectView
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Views-Misc'
!


!DisplayObjectView methodsFor:'drawing'!

redraw
    model displayOn:self x:0 y:(model ascentOn:self)
! !

!DisplayObjectView class methodsFor:'documentation'!

version
    ^ '$Header$'
!

version_CVS
    ^ '$Header$'
! !