From 7ef5770e510065175cccd1a1b12a158c16a84347 Mon Sep 17 00:00:00 2001 From: Stevie Strickland Date: Fri, 6 Feb 2009 02:33:57 +0000 Subject: [PATCH] file -> filename svn: r13461 --- collects/redex/private/pict.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/redex/private/pict.ss b/collects/redex/private/pict.ss index 27b35bd36c..07a46343aa 100644 --- a/collects/redex/private/pict.ss +++ b/collects/redex/private/pict.ss @@ -654,7 +654,7 @@ [(_ name1 name2 ... #:file filename) (and (identifier? #'name1) (andmap identifier? (syntax->list #'(name2 ...)))) - #'(render-metafunction/proc (list (metafunction name1) (metafunction name2) ...) file 'render-metafunctions)])) + #'(render-metafunction/proc (list (metafunction name1) (metafunction name2) ...) filename 'render-metafunctions)])) (define-syntax (render-metafunction stx) (syntax-case stx ()