--- a/Number.st	Wed May 29 11:40:02 2019 +0200
+++ b/Number.st	Wed May 29 15:23:05 2019 +0200
@@ -1252,7 +1252,6 @@
 	^(self - aNumber) abs < accuracy
 ! !
 
-
 !Number methodsFor:'converting'!
 
 % aNumber
@@ -1603,6 +1602,15 @@
     "
 ! !
 
+!Number methodsFor:'inspecting'!
+
+inspectorValueStringInListFor:anInspector
+    "returns a string to be shown in the inspector's list"
+
+    ^ self printString contractTo:30
+
+    "Created: / 29-05-2019 / 15:01:19 / Claus Gittinger"
+! !
 
 !Number methodsFor:'intervals'!