Called when the user must be queried for a filename to save a
buffer. Starting directory and default name strings are passed in, but
either may be null to indicate that any directory is fine
or there is no default name.
(send a-mred:pasteboard put-file directoryname)-> directory : string name : string