From 9702ceadcb6f913fa869683907896803b8747c17 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Mon, 22 Mar 2004 21:27:19 +0000 Subject: [PATCH] . original commit: e6614d7a1d6d2fc7980493e66ffe15120e8aa08c --- collects/framework/splash.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/framework/splash.ss b/collects/framework/splash.ss index c71b54a6..367d7c31 100644 --- a/collects/framework/splash.ss +++ b/collects/framework/splash.ss @@ -86,7 +86,7 @@ (define funny? (let ([date (seconds->date (current-seconds))]) - (and (with-handlers ([not-break-exn? (lambda (x) #f)]) + (and (with-handlers ([exn:fail:filesystem? (lambda (x) #f)]) (collection-path "icons") #t) (= (date-day date) 25)