From d38af188f6ee5d52b442b14a572b7e579b417925 Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Fri, 27 Aug 2010 17:42:22 -0400 Subject: [PATCH] Use the correct name in the provide. --- collects/typed-scheme/typecheck/provide-handling.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-scheme/typecheck/provide-handling.rkt b/collects/typed-scheme/typecheck/provide-handling.rkt index 48734be049..970dc0f827 100644 --- a/collects/typed-scheme/typecheck/provide-handling.rkt +++ b/collects/typed-scheme/typecheck/provide-handling.rkt @@ -90,7 +90,7 @@ (make-provide/contract-transformer (quote-syntax the-contract) (quote-syntax id) - (quote-syntax out-id) + (quote-syntax export-id) (quote-syntax module-source))) (def-export export-id id cnt-id))) new-id)]