--- a/SharedPool.st	Wed May 17 16:50:25 2017 +0200
+++ b/SharedPool.st	Wed May 17 16:50:29 2017 +0200
@@ -236,7 +236,7 @@
 
 displayOn:aGCOrStream
     "Compatibility
-     append a printed desription on some stream (Dolphin,  Squeak)
+     append a printed description on some stream (Dolphin, Squeak)
      OR:
      display the receiver in a graphicsContext at 0@0 (ST80).
      This method allows for any object to be displayed in some view
@@ -248,16 +248,18 @@
         ^ super displayOn:aGCOrStream.
     ].
 
-    "return a printed represenation - here, a reminder is appended,
+    "return a printed representation - here, a reminder is appended,
      that this is not a regular class"
 
     self == NameSpace ifTrue:[
         super displayOn:aGCOrStream.
     ] ifFalse:[
-        aGCOrStream 
+        aGCOrStream
             nextPutAll:self name;
             nextPutAll:' (* SharedPool *)'.
     ].
+
+    "Modified (comment): / 17-05-2017 / 16:48:54 / mawalch"
 ! !
 
 !SharedPool class methodsFor:'queries'!