steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

undo inline

db4
Doug Coleman 2009-04-17 15:10:50 -05:00
parent 364ea217ef
commit 3fc7b22284
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/4DNav/file-chooser/file-chooser.factor
View File

@ -111,7 +111,7 @@ file-chooser H{
: line-selected-action ( file-chooser -- ) : line-selected-action ( file-chooser -- )
dup list>> list-value dup list>> list-value
dup directory? dup directory?
[ fc-change-directory ] [ fc-load-file ] if ; inline [ fc-change-directory ] [ fc-load-file ] if ;
: present-dir-element ( element -- string ) : present-dir-element ( element -- string )
[ name>> ] [ directory? ] bi [ "-> " prepend ] when ; [ name>> ] [ directory? ] bi [ "-> " prepend ] when ;