--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/DisplayObjectView.st	Mon Aug 08 18:32:58 2016 +0200
@@ -0,0 +1,28 @@
+"{ 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$'
+! !
+