...

original commit: ae4aad2305d2a6ac3d0d61c3ee50844c65d9cb15
2002-01-07 23:32:55 +00:00 · 2002-01-07 23:32:55 +00:00 · 6bc79d03a4
commit 6bc79d03a4
parent efa9c79110
1 changed files with 1 additions and 1 deletions
--- 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))