diff --git a/collects/framework/private/frame.ss b/collects/framework/private/frame.ss
index 28652af25a..5d77a9aac2 100644
--- a/collects/framework/private/frame.ss
+++ b/collects/framework/private/frame.ss
@@ -2285,11 +2285,13 @@
         (or (with-handlers ([exn:fail:filesystem?
                              (λ (x) #f)])
               (directory-exists? (collection-path "repos-time-stamp")))
-            (let ([fw (collection-path "framework")])
-              (with-handlers ([exn:fail:filesystem?
-                               (λ (x) #f)])
-                (or (directory-exists? (build-path fw ".svn"))
-                    (directory-exists? (build-path fw "CVS")))))))
+            (with-handlers ([exn:fail:filesystem?
+                             (λ (x) #f)])
+              (let ([fw (collection-path "framework")])
+                (with-handlers ([exn:fail:filesystem?
+                                 (λ (x) #f)])
+                  (or (directory-exists? (build-path fw ".svn"))
+                      (directory-exists? (build-path fw "CVS"))))))))
       
       (define bday-click-canvas%
         (class canvas%