#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Sun, 03 Mar 2019 22:58:43 +0100
changeset 18649 c725ba72d631
parent 18648 6aa4fd812786
child 18650 07708e74cf5c
#BUGFIX by cg class: Tools::MethodList changed: #sortEntries:showingClass: care for methods with nil category
Tools__MethodList.st
--- a/Tools__MethodList.st	Sun Mar 03 22:56:59 2019 +0100
+++ b/Tools__MethodList.st	Sun Mar 03 22:58:43 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2000 by eXept Software AG
 	      All Rights Reserved
@@ -1693,11 +1695,12 @@
     sortBy value == #category ifTrue:[
         entries
             sort:[:a :b |
-                |mthdA mthdB selA selB clsA clsB nmA nmB catA catB clsNmA clsNmB nsNmA nsNmB|
+                |mthdA mthdB selA selB clsA clsB 
+                 nmA nmB catA catB clsNmA clsNmB nsNmA nsNmB|
 
                 mthdA := a at:3. mthdB := b at:3.
-                catA := mthdA category.
-                catB := mthdB category.
+                catA := mthdA category ? '* no category *'.
+                catB := mthdB category ? '* no category *'.
                 catA = catB ifTrue:[
                     selA := a at:2. selB := b at:2.
                     nmA := selA asSymbol selectorWithoutNameSpace.
@@ -1738,6 +1741,8 @@
                 ]
             ] ifFalse:[ nmA < nmB ]
         ].
+
+    "Modified (format): / 03-03-2019 / 22:58:17 / Claus Gittinger"
 !
 
 updateList