]> gitweb.factorcode.org Git - factor.git/blob - extra/file-picker/file-picker.factor
factor: more top level forms.
[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 vocabs.platforms ;
4 IN: file-picker
5
6 HOOK: open-file-dialog os ( -- paths )
7 HOOK: save-file-dialog os ( path -- paths )
8
9 USE-OS-SUFFIX: file-picker