equal
deleted
inserted
replaced
4803 msg := '''%1'' is not a directory or unreadable !!' |
4803 msg := '''%1'' is not a directory or unreadable !!' |
4804 ] ifFalse:[ |
4804 ] ifFalse:[ |
4805 msg := '''%1'' is not a directory !!' |
4805 msg := '''%1'' is not a directory !!' |
4806 ] |
4806 ] |
4807 ]. |
4807 ]. |
4808 self showAlert:(resources string:msg with:fileName) with:nil |
4808 Dialog warn:(resources string:msg withCRs with:fileName). |
4809 ] |
4809 ] |
4810 |
4810 |
4811 "Modified: / 18.9.1997 / 18:22:30 / stefan" |
4811 "Modified: / 18.9.1997 / 18:22:30 / stefan" |
4812 "Modified: / 4.2.1999 / 17:48:59 / cg" |
4812 "Modified: / 27.4.1999 / 17:10:14 / cg" |
4813 ! |
4813 ! |
4814 |
4814 |
4815 doChangeToDefaultDirectory |
4815 doChangeToDefaultDirectory |
4816 "go to parent directory" |
4816 "go to parent directory" |
4817 |
4817 |
6574 ! ! |
6574 ! ! |
6575 |
6575 |
6576 !FileBrowser class methodsFor:'documentation'! |
6576 !FileBrowser class methodsFor:'documentation'! |
6577 |
6577 |
6578 version |
6578 version |
6579 ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.310 1999-04-27 07:44:04 cg Exp $' |
6579 ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.311 1999-04-27 16:32:21 cg Exp $' |
6580 ! ! |
6580 ! ! |