Fix a message
gfx [Mon, 11 Jan 2010 05:40:02 +0000 (14:40 +0900)]
xs-src/Mouse.xs

index a7d8dec..7800a86 100644 (file)
@@ -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)){