--- a/Filename.st Sun Apr 02 13:07:58 1995 +0200
+++ b/Filename.st Tue Apr 11 16:52:00 1995 +0200
@@ -20,7 +20,7 @@
COPYRIGHT (c) 1992 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.23 1995-04-02 11:06:37 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.24 1995-04-11 14:49:31 claus Exp $
'!
!Filename class methodsFor:'documentation'!
@@ -41,7 +41,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.23 1995-04-02 11:06:37 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Filename.st,v 1.24 1995-04-11 14:49:31 claus Exp $
"
!
@@ -165,6 +165,15 @@
We ask the OS about this, to be independent here."
^ OperatingSystem caseSensitiveFilenames
+!
+
+defaultClass
+ "ST-80 compatibility:
+ in ST-80, different subclasses of FIlename are used for different
+ OperatingSYstems; defaultClass is supposed to return an appropriate class.
+ Since in ST/X, there is (currently) only one Filename class, return it here."
+
+ ^ self
! !
!Filename methodsFor:'instance creation'!