equal
deleted
inserted
replaced
203 ! ! |
203 ! ! |
204 |
204 |
205 !FileOperation::Copy class methodsFor:'documentation'! |
205 !FileOperation::Copy class methodsFor:'documentation'! |
206 |
206 |
207 version |
207 version |
208 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
208 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
209 ! ! |
209 ! ! |
210 |
210 |
211 !FileOperation::Copy methodsFor:'accessing'! |
211 !FileOperation::Copy methodsFor:'accessing'! |
212 |
212 |
213 colOfCopiedFiles |
213 colOfCopiedFiles |
407 ! ! |
407 ! ! |
408 |
408 |
409 !FileOperation::Create class methodsFor:'documentation'! |
409 !FileOperation::Create class methodsFor:'documentation'! |
410 |
410 |
411 version |
411 version |
412 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
412 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
413 ! ! |
413 ! ! |
414 |
414 |
415 !FileOperation::Create methodsFor:'accessing'! |
415 !FileOperation::Create methodsFor:'accessing'! |
416 |
416 |
417 createdFile |
417 createdFile |
643 ! ! |
643 ! ! |
644 |
644 |
645 !FileOperation::Delete class methodsFor:'documentation'! |
645 !FileOperation::Delete class methodsFor:'documentation'! |
646 |
646 |
647 version |
647 version |
648 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
648 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
649 ! ! |
649 ! ! |
650 |
650 |
651 !FileOperation::Delete methodsFor:'actions'! |
651 !FileOperation::Delete methodsFor:'actions'! |
652 |
652 |
653 deleteFile:aFileOrDirectory |
653 deleteFile:aFileOrDirectory |
687 size := colOfFiles size. |
687 size := colOfFiles size. |
688 colOfFiles do:[:filenameOrString | |
688 colOfFiles do:[:filenameOrString | |
689 |filename answer doDelete| |
689 |filename answer doDelete| |
690 |
690 |
691 filename := filenameOrString asFilename. |
691 filename := filenameOrString asFilename. |
692 |
692 filename exists not ifTrue:[ |
|
693 self warn:('%1 do not exist' bindWith:filename asString allBold). |
|
694 ^ self. |
|
695 ]. |
693 ask ifTrue:[ |
696 ask ifTrue:[ |
694 size = 1 ifTrue:[ |
697 size = 1 ifTrue:[ |
695 labels := #('Yes' 'No' 'Cancel'). |
698 labels := #('Yes' 'No' 'Cancel'). |
696 values := #(#yes #no #cancel). |
699 values := #(#yes #no #cancel). |
697 ] ifFalse:[ |
700 ] ifFalse:[ |
804 ! ! |
807 ! ! |
805 |
808 |
806 !FileOperation::Move class methodsFor:'documentation'! |
809 !FileOperation::Move class methodsFor:'documentation'! |
807 |
810 |
808 version |
811 version |
809 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
812 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
810 ! ! |
813 ! ! |
811 |
814 |
812 !FileOperation::Move methodsFor:'accessing'! |
815 !FileOperation::Move methodsFor:'accessing'! |
813 |
816 |
814 colOfMovedFiles |
817 colOfMovedFiles |
973 ! ! |
976 ! ! |
974 |
977 |
975 !FileOperation::Rename class methodsFor:'documentation'! |
978 !FileOperation::Rename class methodsFor:'documentation'! |
976 |
979 |
977 version |
980 version |
978 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
981 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
979 ! ! |
982 ! ! |
980 |
983 |
981 !FileOperation::Rename methodsFor:'accessing'! |
984 !FileOperation::Rename methodsFor:'accessing'! |
982 |
985 |
983 renamedFiles |
986 renamedFiles |
1058 ! ! |
1061 ! ! |
1059 |
1062 |
1060 !FileOperation class methodsFor:'documentation'! |
1063 !FileOperation class methodsFor:'documentation'! |
1061 |
1064 |
1062 version |
1065 version |
1063 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.15 2002-12-28 14:53:20 cg Exp $' |
1066 ^ '$Header: /cvs/stx/stx/libtool/FileOperation.st,v 1.16 2003-01-09 14:42:45 penk Exp $' |
1064 ! ! |
1067 ! ! |