--- a/FileBrowserV2UISpecifications.st	Mon May 19 11:24:39 2003 +0200
+++ b/FileBrowserV2UISpecifications.st	Mon May 19 11:31:19 2003 +0200
@@ -266,23 +266,6 @@
                 label:'C-Others'.
 ! !
 
-!FileBrowserV2UISpecifications::PanelSpec class methodsFor:'interface - painter'!
-
-addBindingsTo:env for:anInstance channel:aChannel 
-    "add bindings as required to allow the GUI Painter to operate on an instance of me"
-
-    super addBindingsTo:env for:anInstance channel:aChannel.
-
-    self adaptApects:#( visibility ) to:env for:anInstance channel:aChannel converter:#symbolOrNil.
-    self adaptApects:#( whichView orientation ) to:env for:anInstance channel:aChannel.
-
-    env at:#whichViewList put:#( #first #last ) asValue.
-    env at:#orientationList put:#( #horizontal #vertical ) asValue.
-
-
-
-! !
-
 !FileBrowserV2UISpecifications::PanelSpec class methodsFor:'interface specs'!
 
 detailsEditSpec
@@ -493,6 +476,23 @@
       )
 ! !
 
+!FileBrowserV2UISpecifications::PanelSpec class methodsFor:'interface-painter'!
+
+addBindingsTo:env for:anInstance channel:aChannel 
+    "add bindings as required to allow the GUI Painter to operate on an instance of me"
+
+    super addBindingsTo:env for:anInstance channel:aChannel.
+
+    self adaptApects:#( visibility ) to:env for:anInstance channel:aChannel converter:#symbolOrNil.
+    self adaptApects:#( whichView orientation ) to:env for:anInstance channel:aChannel.
+
+    env at:#whichViewList put:#( #first #last ) asValue.
+    env at:#orientationList put:#( #horizontal #vertical ) asValue.
+
+
+
+! !
+
 !FileBrowserV2UISpecifications::PanelSpec methodsFor:'accessing'!
 
 orientation
@@ -652,5 +652,5 @@
 !FileBrowserV2UISpecifications class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2UISpecifications.st,v 1.3 2003-02-21 21:02:02 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2UISpecifications.st,v 1.4 2003-05-19 09:31:19 cg Exp $'
 ! !