From 6bc79d03a467a832539eb9ced0210310f4fd3ea5 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Mon, 7 Jan 2002 23:32:55 +0000 Subject: [PATCH] ... original commit: ae4aad2305d2a6ac3d0d61c3ee50844c65d9cb15 --- collects/framework/private/editor.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/framework/private/editor.ss b/collects/framework/private/editor.ss index ee3e3c20..b3568ec6 100644 --- a/collects/framework/private/editor.ss +++ b/collects/framework/private/editor.ss @@ -117,7 +117,7 @@ (let* ([temp-b (box #f)] [filename (get-filename temp-b)]) (unless (unbox temp-b) - (unless (equal? filename (get-filename)) + (when filename (handler:add-to-recent filename)))) (super-on-save-file filename format))