--- a/AbstractFileBrowser.st	Thu Oct 15 15:29:58 2009 +0200
+++ b/AbstractFileBrowser.st	Fri Oct 16 11:11:26 2009 +0200
@@ -720,7 +720,37 @@
 )
 ! !
 
-!AbstractFileBrowser class methodsFor:'image'!
+!AbstractFileBrowser class methodsFor:'image specs'!
+
+clearHistoryIcon
+    <resource: #programImage>
+
+    ^ Icon deleteIcon
+!
+
+copyIcon
+    <resource: #programImage>
+
+    ^ ToolbarIconLibrary copyIcon
+!
+
+cutIcon
+    <resource: #programImage>
+
+    ^ ToolbarIconLibrary cut20x20Icon2 "cut28x28Icon"
+!
+
+deleteIcon
+    <resource: #programImage>
+
+    ^ ToolbarIconLibrary erase20x20Icon "/ delete28x28Icon
+!
+
+directoryUpIcon
+    <resource: #programImage>
+
+    ^ ToolbarIconLibrary directoryUpIcon
+!
 
 disabledCursorIcon
     "This resource specification was automatically generated
@@ -782,38 +812,6 @@
 "/        EnabledCursorImage := self enabledCursorIcon. "/ Image fromFile:'xpmBitmaps/cursors/double_crossHair.xpm'
 "/    ].
     ^ EnabledCursorImage
-! !
-
-!AbstractFileBrowser class methodsFor:'image specs'!
-
-clearHistoryIcon
-    <resource: #programImage>
-
-    ^ Icon deleteIcon
-!
-
-copyIcon
-    <resource: #programImage>
-
-    ^ ToolbarIconLibrary copyIcon
-!
-
-cutIcon
-    <resource: #programImage>
-
-    ^ ToolbarIconLibrary cut20x20Icon2 "cut28x28Icon"
-!
-
-deleteIcon
-    <resource: #programImage>
-
-    ^ ToolbarIconLibrary erase20x20Icon "/ delete28x28Icon
-!
-
-directoryUpIcon
-    <resource: #programImage>
-
-    ^ ToolbarIconLibrary directoryUpIcon
 !
 
 fileInIcon
@@ -7404,7 +7402,7 @@
 
 sortFileListsBy:instanceName withReverse:aBoolean
 
-    | aSymbol sortCaselessLocal currentSortOrder sorter|
+    | aSymbol sortCaselessLocal currentSortOrder sorter isReverse|
 
     aSymbol := instanceName asSymbol.
     self sortBlockProperty setValue:instanceName asSymbol.
@@ -7423,7 +7421,6 @@
             (currentSortOrder at:#column) = aSymbol ifTrue:[
                 "/ same column like before - change sort order ifReverse is true
                 aBoolean ifTrue:[
-                    | isReverse |
                     isReverse := currentSortOrder at:#reverse.
                     currentSortOrder at:#reverse put:(isReverse not).
                 ].
@@ -7850,9 +7847,9 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.417 2009-10-12 07:48:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.418 2009-10-16 09:11:26 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.417 2009-10-12 07:48:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.418 2009-10-16 09:11:26 cg Exp $'
 ! !