2017-05-26 09:05:53 -04:00
|
|
|
! Copyright (C) 2014 John Benediktsson.
|
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
2014-12-15 18:16:41 -05:00
|
|
|
USING: accessors sequences system vocabs ;
|
|
|
|
|
IN: file-picker
|
|
|
|
|
|
|
|
|
|
HOOK: open-file-dialog os ( -- paths )
|
|
|
|
|
HOOK: save-file-dialog os ( path -- paths )
|
|
|
|
|
|
|
|
|
|
os name>> "file-picker." prepend require
|
