mred:common-put-file

   

• (mred:common-put-file name directory replace? prompt filter filter-msg) -> string
      name = "Untitled" : string
      directory = null : null or a string
      replace? = #f : boolean
      prompt = "Select File" : string
      filter = #f : #f or a regular expression
      filter-msg = "That filename does not have the right form." : string