--- a/VariablePanelController.st	Sat Jan 12 15:24:51 2019 +0100
+++ b/VariablePanelController.st	Fri Feb 01 20:52:35 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
               All Rights Reserved
@@ -465,6 +463,10 @@
         ].
 
         newRelPos := (prevPos / view height) asFloat.
+        aboveView relativeCorner isNil ifTrue:[
+            view setupSubviewOrigins.
+            thisContext restart.
+        ].    
         newCorner := aboveView relativeCorner x @ newRelPos.
         newOrigin := belowView relativeOrigin x @ newRelPos.
     ] ifFalse:[
@@ -498,6 +500,8 @@
 
     prevPos := isVertical ifTrue:[aboveView bottom] ifFalse:[aboveView right].
     prevPos := prevPos + halfBarHg.
+
+    "Modified: / 01-02-2019 / 20:51:56 / Claus Gittinger"
 !
 
 doSnapPressedX:x y:y