--- a/SubclassResponsibilityError.st Tue Sep 01 09:58:45 2015 +0200
+++ b/SubclassResponsibilityError.st Tue Sep 01 11:11:59 2015 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2001 by eXept Software AG
All Rights Reserved
@@ -11,6 +13,8 @@
"
"{ Package: 'stx:libbasic' }"
+"{ NameSpace: Smalltalk }"
+
ProceedableError subclass:#SubclassResponsibilityError
instanceVariableNames:''
classVariableNames:''
@@ -52,8 +56,12 @@
!SubclassResponsibilityError methodsFor:'queries'!
description
- parameter isNil ifTrue:[^ super description].
- ^ '"',parameter , '" ', super description
+ |dscr|
+
+ dscr := super description.
+
+ parameter isNil ifTrue:[^ dscr].
+ ^ '"',parameter , '" ', dscr
"Modified: / 19-12-2010 / 08:50:13 / cg"
! !
@@ -61,11 +69,12 @@
!SubclassResponsibilityError class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/SubclassResponsibilityError.st,v 1.8 2010-12-19 11:59:59 cg Exp $'
+ ^ '$Header$'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/SubclassResponsibilityError.st,v 1.8 2010-12-19 11:59:59 cg Exp $'
+ ^ '$Header$'
! !
+
SubclassResponsibilityError initialize!