--- a/PanelView.st	Wed Feb 25 18:48:21 2009 +0100
+++ b/PanelView.st	Thu Feb 26 17:48:59 2009 +0100
@@ -184,6 +184,10 @@
     ].
 !
 
+hierarchicalIndexOfChild:aView
+    ^ aView hierarchicalIndexInList:subViews
+!
+
 horizontalLayout
     "not supported by this view"
 
@@ -561,5 +565,5 @@
 !PanelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.40 2008-11-17 17:33:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.41 2009-02-26 16:48:59 fm Exp $'
 ! !