--- Compress-LZF/LZF.xs 2008/09/22 03:29:56 1.27 +++ Compress-LZF/LZF.xs 2008/12/17 00:04:56 1.28 @@ -302,7 +302,7 @@ PUTBACK; if (1 != call_sv ((SV *)storable_mstore, G_SCALAR)) - croak ("Storable::mstore didn't return a single scalar"); + croak ("%s didn't return a single scalar", SvPVbyte_nolen (serializer_mstore)); SPAGAIN; @@ -382,7 +382,7 @@ PUTBACK; if (1 != call_sv ((SV *)storable_mretrieve, G_SCALAR)) - croak ("Storable::mstore didn't return a single scalar"); + croak ("%s didn't return a single scalar", SvPVbyte_nolen (serializer_mretrieve)); SPAGAIN; @@ -430,7 +430,7 @@ PUTBACK; if (1 != call_sv ((SV *)storable_mretrieve, G_SCALAR)) - croak ("Storable::mstore didn't return a single scalar"); + croak ("%s didn't return a single scalar", SvPVbyte_nolen (serializer_mretrieve)); SPAGAIN;