original commit: 52512f202aa6f6c44a1b023b2ddc43ddb1934a71
This commit is contained in:
Robby Findler 2002-11-14 22:36:55 +00:00
parent d28c89f50e
commit dcaa72ae26

View File

@ -1000,7 +1000,7 @@
this)]) this)])
(case save (case save
[(continue) #f] [(continue) #f]
[(save) (not (send editor save-file/gui-errors))] [(save) (not (send editor save-file/gui-error))]
[(cancel) #t])))) [(cancel) #t]))))
;; ask-about-new-here : -> (union 'cancel boolean?) ;; ask-about-new-here : -> (union 'cancel boolean?)