--- a/SimpleView.st	Tue Jan 08 10:33:28 2019 +0100
+++ b/SimpleView.st	Thu Jan 10 14:11:54 2019 +0100
@@ -2829,6 +2829,7 @@
         ((w isInteger not) or:[h isInteger not]) ifTrue:[
             "/ w > 1 ifTrue:[self halt].
             relativeExtent := e.
+            relativeCorner := nil.
             pixelExtent := self extentFromRelativeExtent.
             pixelExtent isNil ifTrue:[
                 self extentChangedFlag:true
@@ -2843,7 +2844,7 @@
     ]
 
     "Modified: / 07-07-2010 / 16:44:57 / cg"
-    "Modified (comment): / 14-06-2018 / 10:19:44 / Claus Gittinger"
+    "Modified: / 10-01-2019 / 14:11:10 / Claus Gittinger"
 !
 
 extentRule