--- a/DictionaryInspectorView.st	Tue Sep 18 11:39:12 2012 +0100
+++ b/DictionaryInspectorView.st	Thu Sep 27 21:08:20 2012 +0100
@@ -198,6 +198,7 @@
                           ).
     ].
 
+    items := items , (self sortOrderItems).
     items := items , #(
                    ('-')
                    ('Update'     doUpdate  )
@@ -232,7 +233,7 @@
 
     ^ m.
 
-    "Modified: / 01-07-2010 / 10:53:08 / cg"
+    "Modified: / 26-09-2012 / 13:20:59 / cg"
 ! !
 
 !DictionaryInspectorView methodsFor:'menu actions'!
@@ -528,13 +529,16 @@
                 ifFalse:[ k displayString]
         ].
 
+    sortOrder == #alphabetical ifTrue:[
+        keyList sort:[:a :b | a string < b string].
+    ].
     ^ keyList
         keysAndValuesCollect:[:idx :nm |
             self listEntryForName:nm value:(self indexedValueAtIndex:idx)
         ].
-    ^ keyList
+    "/ ^ keyList
 
-    "Modified: / 16-05-2012 / 19:07:57 / cg"
+    "Modified: / 26-09-2012 / 13:22:08 / cg"
     "Modified: / 06-07-2012 / 10:36:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
@@ -658,13 +662,13 @@
 !DictionaryInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Id: DictionaryInspectorView.st 8012 2012-07-06 11:44:18Z vranyj1 $'
+    ^ '$Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.77 2012/09/26 12:19:04 cg Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.76 2012/05/16 17:08:54 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.77 2012/09/26 12:19:04 cg Exp §'
 !
 
 version_SVN
-    ^ '$Id: DictionaryInspectorView.st 8012 2012-07-06 11:44:18Z vranyj1 $'
+    ^ '$Id: DictionaryInspectorView.st 8059 2012-09-27 20:08:20Z vranyj1 $'
 ! !