--- a/OSErrorHolder.st	Mon Jul 01 22:14:20 2013 +0100
+++ b/OSErrorHolder.st	Tue Jul 09 22:51:30 2013 +0100
@@ -361,6 +361,14 @@
 
 !OSErrorHolder methodsFor:'accessing'!
 
+errorCategory
+    ^ errorCategory
+!
+
+errorSymbol 
+    ^ errorSymbol
+!
+
 errorSymbol:sym errorCategory:typ
     errorSymbol := sym.
     errorCategory := typ.
@@ -403,20 +411,28 @@
     ^ s
 
     "Modified: / 12-02-2007 / 12:29:07 / cg"
-!
+! !
+
+!OSErrorHolder methodsFor:'printing'!
 
-errorSymbol 
-    ^ errorSymbol
+printOn:aStream
+    aStream 
+        nextPutAll:self className;
+        nextPut:$(;
+        nextPutAll:errorSymbol;
+        nextPutAll:', ';
+        nextPutAll:errorCategory;
+        nextPut:$).
 ! !
 
 !OSErrorHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.20 2013-04-27 12:43:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.21 2013-07-04 19:27:31 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.20 2013-04-27 12:43:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.21 2013-07-04 19:27:31 stefan Exp $'
 ! !