]> gitweb.factorcode.org Git - factor.git/blob - extra/file-picker/file-picker.factor
Reformat
[factor.git] / extra / file-picker / file-picker.factor
1 ! Copyright (C) 2014 John Benediktsson.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: accessors sequences system vocabs ;
4 IN: file-picker
5
6 HOOK: open-file-dialog os ( -- paths )
7 HOOK: save-file-dialog os ( path -- paths )
8
9 os name>> "file-picker." prepend require