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))