# HG changeset patch # User claus # Date 810780306 -7200 # Node ID 9f14534e3dd2b3f79f23ef58b495a80c812743d3 # Parent be92b4c8c1567c7d9ce975a51b8d2c389a2f7ade . diff -r be92b4c8c156 -r 9f14534e3dd2 FileDir.st --- a/FileDir.st Mon Sep 11 00:31:43 1995 +0200 +++ b/FileDir.st Mon Sep 11 02:45:06 1995 +0200 @@ -21,7 +21,7 @@ COPYRIGHT (c) 1989 by Claus Gittinger All Rights Reserved -$Header: /cvs/stx/stx/libbasic/Attic/FileDir.st,v 1.22 1995-08-11 03:00:35 claus Exp $ +$Header: /cvs/stx/stx/libbasic/Attic/FileDir.st,v 1.23 1995-09-11 00:45:06 claus Exp $ '! !FileDirectory class methodsFor:'documentation'! @@ -42,7 +42,7 @@ version " -$Header: /cvs/stx/stx/libbasic/Attic/FileDir.st,v 1.22 1995-08-11 03:00:35 claus Exp $ +$Header: /cvs/stx/stx/libbasic/Attic/FileDir.st,v 1.23 1995-09-11 00:45:06 claus Exp $ " ! @@ -306,8 +306,8 @@ |realName| - (newName = '.') ifFalse:[ - (newName = '..') ifFalse:[ + (newName notNil and:[newName notEmpty]) ifTrue:[ + (newName ~= '.' and:[newName ~= '..']) ifTrue:[ ((newName at:1) == OperatingSystem fileSeparator) ifTrue:[ realName := newName copyFrom:2 ] ifFalse:[ diff -r be92b4c8c156 -r 9f14534e3dd2 FileDirectory.st --- a/FileDirectory.st Mon Sep 11 00:31:43 1995 +0200 +++ b/FileDirectory.st Mon Sep 11 02:45:06 1995 +0200 @@ -21,7 +21,7 @@ COPYRIGHT (c) 1989 by Claus Gittinger All Rights Reserved -$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.22 1995-08-11 03:00:35 claus Exp $ +$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.23 1995-09-11 00:45:06 claus Exp $ '! !FileDirectory class methodsFor:'documentation'! @@ -42,7 +42,7 @@ version " -$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.22 1995-08-11 03:00:35 claus Exp $ +$Header: /cvs/stx/stx/libbasic/FileDirectory.st,v 1.23 1995-09-11 00:45:06 claus Exp $ " ! @@ -306,8 +306,8 @@ |realName| - (newName = '.') ifFalse:[ - (newName = '..') ifFalse:[ + (newName notNil and:[newName notEmpty]) ifTrue:[ + (newName ~= '.' and:[newName ~= '..']) ifTrue:[ ((newName at:1) == OperatingSystem fileSeparator) ifTrue:[ realName := newName copyFrom:2 ] ifFalse:[