save-as in frame:editor<%>
Queries the use for a file name and saves the file with that name.
( -> boolean
send a-frame:editor save-as format)
format = : (union 'guess 'standard 'text 'text-force-cr 'same 'copy)'same
Returns #f if the user cancells the file-choosing
dialog and returns #t otherwise.