From d5045184c91f74067ad370b39250f2785f565da3 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sun, 17 Jul 2011 19:32:43 -0500 Subject: [PATCH] fix missing argument to format please merge to release branch (cherry picked from commit 2b99c863211b9093ef0307c590268e61ff380826) --- collects/racket/private/class-internal.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/racket/private/class-internal.rkt b/collects/racket/private/class-internal.rkt index 239d11374c..d466b4ce0a 100644 --- a/collects/racket/private/class-internal.rkt +++ b/collects/racket/private/class-internal.rkt @@ -2576,7 +2576,7 @@ (fail "no public method ~a" m))) (for ([m (class/c-absents ctc)]) (when (hash-ref method-ht m #f) - (fail "class already contains public method ~a"))) + (fail "class already contains public method ~a" m))) (for ([m (class/c-inherits ctc)]) (unless (hash-ref method-ht m #f) (fail "no public method ~a" m)))