Cairo__Surface.st
changeset 2 c2f163833877
parent 1 2439fb18f3dc
child 3 f4f599f2a1b5
--- a/Cairo__Surface.st	Thu Jul 10 09:30:44 2008 +0000
+++ b/Cairo__Surface.st	Thu Jul 10 20:58:32 2008 +0000
@@ -447,6 +447,25 @@
     ^self class primGetType: self
 
     "Created: / 10-07-2008 / 10:34:36 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+width: w height: h
+
+    self class primXlibSurfaceSetSize: self width: w height: h
+
+    "Created: / 10-07-2008 / 19:36:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
+! !
+
+!Surface methodsFor:'change & update'!
+
+update: aspect with: param from: sender
+
+    (aspect = #sizeOfView and:[self type = SurfaceType SURFACE_TYPE_XLIB])
+        ifTrue:[^self width: sender width height: sender height].
+
+    super update: aspect with: param from: sender
+
+    "Created: / 10-07-2008 / 19:33:39 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !Surface methodsFor:'initialization & release'!