From 0ab1f3f4234bd8fa9c33a7175eb0024bdee61071 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 13 May 1999 02:55:09 +0000
Subject: [PATCH] no debug-info

original commit: 74b12f28106ce7c76a4d7a9af81a34113c683453
---
 collects/framework/prefs.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/framework/prefs.ss b/collects/framework/prefs.ss
index 57359848..29300578 100644
--- a/collects/framework/prefs.ss
+++ b/collects/framework/prefs.ss
@@ -87,7 +87,7 @@
 				 (lambda () 
 				   (raise (exn:make-unknown-preference
 					   (format "attempted to get unknown preference: ~a" p)
-					   ((debug-info-handler))))))])
+					   (current-continuation-marks)))))])
 	(cond
 	  [(marshalled? ans)
 	   (let* ([default-s