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

file-picker.operations: use set-file-contents.

char-rename
John Benediktsson 2017-05-29 08:07:12 -07:00
parent b000f124a0
commit c8e02d880e
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/file-picker/operations/operations.factor
View File

@ -5,7 +5,7 @@ kernel locals ui.commands ui.operations ;
IN: file-picker.operations
:: save-as ( data -- )
"" save-file-dialog [ binary [ data write ] with-file-writer ] when* ;
"" save-file-dialog [ data binary set-file-contents ] when* ;
! Right-click a byte-array presentation to open the Save As window.
[ byte-array? ] \ save-as H{