#QUALITY by stefan
authorStefan Vogel <sv@exept.de>
Thu, 08 Aug 2019 16:17:09 +0200
changeset 24509 30658b2817ac
parent 24508 0b2cc77b316f
child 24510 e309e5fdf190
#QUALITY by stefan class: StreamNotOpenError changed: #description
StreamNotOpenError.st
--- a/StreamNotOpenError.st	Mon Aug 05 21:14:19 2019 +0200
+++ b/StreamNotOpenError.st	Thu Aug 08 16:17:09 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2004 by eXept Software AG
               All Rights Reserved
@@ -9,8 +11,9 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
+"{ Package: 'stx:libbasic' }"
 
-"{ Package: 'stx:libbasic' }"
+"{ NameSpace: Smalltalk }"
 
 StreamError subclass:#StreamNotOpenError
 	instanceVariableNames:''
@@ -38,11 +41,17 @@
 !StreamNotOpenError methodsFor:'printing & storing'!
 
 description
-    ^ super description, ': ', parameter classNameWithArticle
+    parameter notEmptyOrNil ifTrue:[
+        ^ super description, ': ', parameter classNameWithArticle.
+    ].
+    ^ super description.
+
+    "Modified: / 08-08-2019 / 16:15:17 / Stefan Vogel"
 ! !
 
 !StreamNotOpenError class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/StreamNotOpenError.st,v 1.3 2005-02-02 10:59:49 cg Exp $'
+    ^ '$Header$'
 ! !
+