StreamError.st
changeset 16562 de9b98f4a494
parent 15843 94dce19d82df
child 18120 e3a375d5f6a8
--- a/StreamError.st	Tue Jun 10 12:15:44 2014 +0200
+++ b/StreamError.st	Tue Jun 10 12:20:23 2014 +0200
@@ -1,6 +1,6 @@
 "
  COPYRIGHT (c) 2001 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -23,7 +23,7 @@
 copyright
 "
  COPYRIGHT (c) 2001 by eXept Software AG
-              All Rights Reserved
+	      All Rights Reserved
 
  This software is furnished under a license and may be used
  only in accordance with the terms of that license and with the
@@ -50,7 +50,7 @@
 
     holder := self osErrorHolder.
     holder isNil ifTrue:[
-        ^ #unknown
+	^ #unknown
     ].
     ^ holder errorCategory.
 !
@@ -68,7 +68,7 @@
      return nil, if this is not an OS error"
 
     (osErrorHolder isNil and:[errorCode isInteger]) ifTrue:[
-        osErrorHolder := OperatingSystem errorHolderForNumber:errorCode.
+	osErrorHolder := OperatingSystem errorHolderForNumber:errorCode.
     ].
     ^ osErrorHolder.
 !
@@ -80,27 +80,27 @@
 !StreamError methodsFor:'printing & storing'!
 
 description
-    "lazy initialization - the text is not needed for cought exceptions"
+    "lazy initialization - the text is not needed for caught exceptions"
 
     messageText isNil ifTrue:[
-        self initializeMessageText
+	self initializeMessageText
     ].
     ^ super description
 !
 
 initializeMessageText
-    "for lazy initialization - the text is not needed for cought exceptions"
+    "for lazy initialization - the text is not needed for caught exceptions"
 
     osErrorHolder notNil ifTrue:[
-        messageText := (' : ' , osErrorHolder errorString)
+	messageText := (' : ' , osErrorHolder errorString)
     ].
 !
 
 messageText
-    "lazy initialization - the text is not needed for cought exceptions"
+    "lazy initialization - the text is not needed for caught exceptions"
 
     messageText isNil ifTrue:[
-        self initializeMessageText
+	self initializeMessageText
     ].
     ^ messageText
 ! !
@@ -108,10 +108,9 @@
 !StreamError class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/StreamError.st,v 1.10 2013-12-04 11:23:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StreamError.st,v 1.11 2014-06-10 10:20:23 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/StreamError.st,v 1.10 2013-12-04 11:23:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StreamError.st,v 1.11 2014-06-10 10:20:23 cg Exp $'
 ! !
-