equal
deleted
inserted
replaced
3715 dropObject isFileObject ifTrue:[ |
3715 dropObject isFileObject ifTrue:[ |
3716 fn := dropObject theObject asFilename. |
3716 fn := dropObject theObject asFilename. |
3717 dropObject isDirectory ifTrue:[ |
3717 dropObject isDirectory ifTrue:[ |
3718 fn recursiveCopyTo:destDir |
3718 fn recursiveCopyTo:destDir |
3719 ] ifFalse:[ |
3719 ] ifFalse:[ |
3720 fn copyTo:destDir |
3720 fn copyTo:(destDir / fn baseName ) |
3721 ] |
3721 ] |
3722 ] |
3722 ] |
3723 ]. |
3723 ]. |
3724 ]. |
3724 ]. |
3725 |
3725 |
7848 ! ! |
7848 ! ! |
7849 |
7849 |
7850 !AbstractFileBrowser class methodsFor:'documentation'! |
7850 !AbstractFileBrowser class methodsFor:'documentation'! |
7851 |
7851 |
7852 version |
7852 version |
7853 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.416 2009-10-06 10:49:04 cg Exp $' |
7853 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.417 2009-10-12 07:48:23 cg Exp $' |
7854 ! |
7854 ! |
7855 |
7855 |
7856 version_CVS |
7856 version_CVS |
7857 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.416 2009-10-06 10:49:04 cg Exp $' |
7857 ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.417 2009-10-12 07:48:23 cg Exp $' |
7858 ! ! |
7858 ! ! |