# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1464701052 -7200
# Node ID 3e0634b25d8eb944e0ec5b4e42af42cc795308ee
# Parent  629bf5cdd089c80ba5eff6b39ef2bad3f4ea4b6e
#REFACTORING by cg
class: InspectorView
changed: #stringWithMessages:

diff -r 629bf5cdd089 -r 3e0634b25d8e InspectorView.st
--- a/InspectorView.st	Tue May 31 11:28:11 2016 +0200
+++ b/InspectorView.st	Tue May 31 15:24:12 2016 +0200
@@ -3136,20 +3136,21 @@
 !
 
 stringWithMessages:which
-    |cls s messages |
-
-    s := CharacterWriteStream on:''.
+    |cls s messages allSelectors|
+
     cls := object class.
     which == #local ifTrue:[
         messages := cls selectors.
     ] ifFalse:[
+        allSelectors := cls allSelectors.
         which == #all ifTrue:[
-            messages := cls allSelectors.
+            messages := allSelectors.
         ] ifFalse:[
-            messages := cls allSelectors asNewSet removeAll:cls selectors; yourself.
+            messages := allSelectors asNewSet removeAll:cls selectors; yourself.
         ].
     ].
 
+    s := CharacterWriteStream on:''.
     messages asOrderedCollection sort do:[:eachSelector |
         s nextPutAll:eachSelector.
         s cr.