X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Parameters.xs;h=282bb03d257ee36c7fecdbe058833b43c37136b5;hb=c90fb97af3831f27bbaa7aa99895902d1fc64838;hp=ec46ef337a6eaa6841c0f2709db57f4a0b9e6b5b;hpb=82bcf8b5f451acf6489b20680a268b6a95b63252;p=p5sagit%2FFunction-Parameters.git

diff --git a/Parameters.xs b/Parameters.xs
index ec46ef3..282bb03 100644
--- a/Parameters.xs
+++ b/Parameters.xs
@@ -774,9 +774,11 @@ static size_t count_named_params(const ParamSpec *ps) {
 }
 
 static void my_require(pTHX_ const char *file) {
+	SV *err;
 	require_pv(file);
-	if (SvTRUE(ERRSV)) {
-		croak_sv(ERRSV);
+	err = ERRSV;
+	if (SvTRUE(err)) {
+		croak_sv(err);
 	}
 }