From d6a2324215615bf8c9742a82380af101be561d85 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 5 Jan 2001 22:53:45 +0000 Subject: [PATCH] f original commit: 90a50390458637063f12a807b6adab7fec617d5d --- collects/framework/editor.ss | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/collects/framework/editor.ss b/collects/framework/editor.ss index e1da2470..da808308 100644 --- a/collects/framework/editor.ss +++ b/collects/framework/editor.ss @@ -22,7 +22,8 @@ run-after-edit-sequence get-top-level-window locked? - on-close)) + on-close + save-file-out-of-date?)) (define basic-mixin (mixin (editor<%>) (basic<%>) args @@ -440,4 +441,4 @@ (when (is-a? frame frame:info<%>) (send frame lock-status-changed))))) 'framework:update-lock-icon))]) - (sequence (apply super-init args))))) \ No newline at end of file + (sequence (apply super-init args)))))