From: gfx <gfuji@cpan.org>
Date: Mon, 11 Jan 2010 05:40:02 +0000 (+0900)
Subject: Fix a message
X-Git-Tag: 0.47~13
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=commitdiff_plain;h=31113a4a9ce776118909d8a019af3e784d21d909;hp=6ad77996af3989f512a308404b2593c369d18e14

Fix a message
---

diff --git a/xs-src/Mouse.xs b/xs-src/Mouse.xs
index a7d8dec..7800a86 100644
--- a/xs-src/Mouse.xs
+++ b/xs-src/Mouse.xs
@@ -590,10 +590,9 @@ CODE:
     AV* demolishall;
     I32 len, i;
 
-    PERL_UNUSED_VAR(ix);
-
     if(!IsObject(object)){
-        croak("You must not call DESTROY as a class method");
+        croak("You must not call %s as a class method",
+            ix == 0 ? "DESTROY" : "DEMOLISHALL");
     }
 
     if(SvOK(meta)){