--- a/PCFilename.st Fri Oct 09 16:19:06 1998 +0200
+++ b/PCFilename.st Tue Oct 13 14:31:53 1998 +0200
@@ -213,9 +213,9 @@
"/ replace colons by underscore
"/ may need more to convert - time will show
- (nameString indexOfAny:#($:) startingAt:srchStart) ~~ 0 ifTrue:[
+ (nameString indexOfAny:#($: $ ) startingAt:srchStart) ~~ 0 ifTrue:[
nameString := nameString copy.
- nameString replaceAny:#($:) with:$_ from:srchStart to:(nameString size).
+ nameString replaceAny:#($: $ ) with:$_ from:srchStart to:(nameString size).
].
^ self
@@ -228,7 +228,7 @@
'\\idefix\' asFilename makeLegalFilename
"
- "Modified: / 24.9.1998 / 12:56:53 / cg"
+ "Modified: / 11.10.1998 / 01:40:47 / cg"
! !
!PCFilename methodsFor:'file operations'!
@@ -594,5 +594,5 @@
!PCFilename class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.19 1998-09-24 18:49:48 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/PCFilename.st,v 1.20 1998-10-13 12:31:53 cg Exp $'
! !