summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
Diffstat (limited to 'XSUB.h')
-rw-r--r--XSUB.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/XSUB.h b/XSUB.h
index e4cc8167ed..1bf88d5f6a 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -295,7 +295,7 @@ Rethrows a previously caught exception. See L<perlguts/"Exception Handling">.
vn = "VERSION"), FALSE); \
} \
if (_sv) { \
- SV *xssv = Perl_newSVpvf(aTHX_ "%s",XS_VERSION); \
+ SV *xssv = Perl_newSVpv(aTHX_ XS_VERSION, 0); \
xssv = new_version(xssv); \
if ( !sv_derived_from(_sv, "version") ) \
_sv = new_version(_sv); \