--- a/DictionaryInspectorView.st	Wed May 11 10:47:29 2016 +0200
+++ b/DictionaryInspectorView.st	Wed May 11 10:47:39 2016 +0200
@@ -618,7 +618,7 @@
                 ]
         ].
 
-    sortOrder == #alphabetical ifTrue:[
+    sortOrder == SortOrderAlphabetical ifTrue:[
         keyList sort:[:a :b | a string < b string].
     ].
     ^ keyList