--- a/FileOperation.st Mon Mar 22 18:09:29 2004 +0100
+++ b/FileOperation.st Mon Mar 22 20:33:54 2004 +0100
@@ -202,7 +202,7 @@
!FileOperation::Copy class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !
!FileOperation::Copy methodsFor:'accessing'!
@@ -409,7 +409,7 @@
!FileOperation::Create class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !
!FileOperation::Create methodsFor:'accessing'!
@@ -682,7 +682,7 @@
!FileOperation::Delete class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !
!FileOperation::Delete methodsFor:'actions'!
@@ -876,7 +876,7 @@
!FileOperation::Move class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !
!FileOperation::Move methodsFor:'accessing'!
@@ -966,12 +966,12 @@
|newFile suffix fileString askResult|
- (aDirectory exists not) ifTrue:[
+ (aDirectory exists) ifFalse:[
Dialog warn:('Cannot move to non-existing directory %1.' bindWith:aDirectory asString allBold).
result := false.
^ self
].
- (aDirectory isDirectory not) ifTrue:[
+ (aDirectory isDirectory) ifFalse:[
Dialog warn:('Destination %1 is not a directory.' bindWith:aDirectory asString allBold).
result := false.
^ self
@@ -1046,7 +1046,7 @@
!FileOperation::Rename class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !
!FileOperation::Rename methodsFor:'accessing'!
@@ -1152,5 +1152,5 @@
!FileOperation class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.44 2004-03-17 11:21:34 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.45 2004-03-22 19:33:54 cg Exp $'
! !