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

Use set-file-contents

db4
Slava Pestov 2008-03-07 21:28:11 -06:00
parent 8c645f7a45
commit 7b0b174115
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/tools/browser/browser.factor
View File

@ -17,8 +17,7 @@ MEMO: (vocab-file-contents) ( path -- lines )
: set-vocab-file-contents ( seq vocab name -- ) : set-vocab-file-contents ( seq vocab name -- )
dupd vocab-path+ [ dupd vocab-path+ [
?resource-path ?resource-path utf8 set-file-lines
utf8 [ [ print ] each ] with-file-writer
] [ ] [
"The " swap vocab-name "The " swap vocab-name
" vocabulary was not loaded from the file system" " vocabulary was not loaded from the file system"