X-Git-Url: https://git.distorted.org.uk/~mdw/catacomb-perl/blobdiff_plain/fcd15e0b7a3d0f0ca2f30953573f8d1f6b8e8bd2..bcd9210309ee4d9fc2afc281d188326071425a58:/keystuff.c diff --git a/keystuff.c b/keystuff.c index beb9a74..b22f4eb 100644 --- a/keystuff.c +++ b/keystuff.c @@ -64,7 +64,7 @@ SV *keyerr(int rc) SV *sv; if (!rc) return (&PL_sv_yes); - sv = perl_get_sv("Catacomb::Key::error", TRUE); + sv = perl_get_sv("Catacomb::keyerror", TRUE); sv_setiv(sv, rc); sv_setpv(sv, key_strerror(rc)); SvIOK_on(sv); @@ -80,6 +80,4 @@ void keyfile_dec(Key_File *kf) } } - - /*----- That's all, folks -------------------------------------------------*/