--- a/VariablePanel.st	Wed Oct 28 14:32:52 2009 +0100
+++ b/VariablePanel.st	Wed Oct 28 18:02:39 2009 +0100
@@ -565,6 +565,33 @@
         top open
                                                                         [exEnd]
 
+   example with redefined handle-image:
+                                                                        [exBegin]
+        |top p v1 v2 v3|
+
+        top := StandardSystemView new.
+        top extent:300@300.
+
+        p := VariablePanel 
+                 origin:0.0 @ 0.0
+                 corner:1.0 @ 1.0
+                 in:top.
+        p orientation:#vertical.
+        p handleImage:(ToolbarIconLibrary barResizeVerticalIcon).
+        p showHandle:true.
+
+        v1 := View origin:0.0@0.0 corner:1.0@(1/2) in:p.
+        v2 := View origin:0.0@(1/2) corner:1.0@(2/3) in:p.
+        v3 := View origin:0.0@(2/3) corner:1.0@1.0 in:p.
+
+        v1 viewBackground:(Color red).
+        v2 viewBackground:(Color green).
+        v3 viewBackground:(Color yellow).
+
+        top open
+                                                                        [exEnd]
+
+
 "
 ! !
 
@@ -2350,5 +2377,9 @@
 !VariablePanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.89 2009-05-13 16:40:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.90 2009-10-28 17:02:39 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libwidg/VariablePanel.st,v 1.90 2009-10-28 17:02:39 cg Exp $'
 ! !