# HG changeset patch # User Claus Gittinger # Date 925230741 -7200 # Node ID dfff36f688d2d44db0b594fcc6301c74442737c2 # Parent 67083916cc02152f4ad0f0f4c0d87cc259c2f70a care for windows filenames (dont expand \'s in filename) diff -r 67083916cc02 -r dfff36f688d2 FBrowser.st --- a/FBrowser.st Tue Apr 27 18:31:17 1999 +0200 +++ b/FBrowser.st Tue Apr 27 18:32:21 1999 +0200 @@ -4805,11 +4805,11 @@ msg := '''%1'' is not a directory !!' ] ]. - self showAlert:(resources string:msg with:fileName) with:nil + Dialog warn:(resources string:msg withCRs with:fileName). ] "Modified: / 18.9.1997 / 18:22:30 / stefan" - "Modified: / 4.2.1999 / 17:48:59 / cg" + "Modified: / 27.4.1999 / 17:10:14 / cg" ! doChangeToDefaultDirectory @@ -6576,5 +6576,5 @@ !FileBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.310 1999-04-27 07:44:04 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.311 1999-04-27 16:32:21 cg Exp $' ! ! diff -r 67083916cc02 -r dfff36f688d2 FileBrowser.st --- a/FileBrowser.st Tue Apr 27 18:31:17 1999 +0200 +++ b/FileBrowser.st Tue Apr 27 18:32:21 1999 +0200 @@ -4805,11 +4805,11 @@ msg := '''%1'' is not a directory !!' ] ]. - self showAlert:(resources string:msg with:fileName) with:nil + Dialog warn:(resources string:msg withCRs with:fileName). ] "Modified: / 18.9.1997 / 18:22:30 / stefan" - "Modified: / 4.2.1999 / 17:48:59 / cg" + "Modified: / 27.4.1999 / 17:10:14 / cg" ! doChangeToDefaultDirectory @@ -6576,5 +6576,5 @@ !FileBrowser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.310 1999-04-27 07:44:04 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.311 1999-04-27 16:32:21 cg Exp $' ! !