Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
set real directory path
authortz
Thu, 05 Feb 1998 17:12:48 +0100
changeset 594 75baf3968708
parent 593 17f3d679fa72
child 595 1bec50c91fcd
set real directory path
FileSelectionBrowser.st file | annotate | diff | comparison | revisions 
--- a/FileSelectionBrowser.st	Thu Feb 05 17:02:55 1998 +0100
+++ b/FileSelectionBrowser.st	Thu Feb 05 17:12:48 1998 +0100
@@ -219,7 +219,7 @@
 
 directory: aDirectory
 
-    directory := (aDirectory ? Filename homeDirectory) asFilename asAbsoluteFilename name
+    directory := (aDirectory ? Filename homeDirectory) asFilename asAbsoluteFilename directoryName
 !
 
 directoryView
@@ -336,7 +336,7 @@
     directoryView fileFilterSelectAction: [:fileFilter|
     self valueOfFileName value: (
         ((self valueOfFileName value ? 'unknown') readStream upTo: $.), '.',
-        (fileFilter copy reverse readStream upTo: $.) reverse)].
+        (fileFilter copy reverse readStream upTo: $.) reverse)]. 
     self directoryTreeView selectPathname: directory ? self class lastSelection ? '/'.
 
     self directoryInputField entryCompletionBlock:
hg/stx-libtool2