summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorNiko Tyni <ntyni@debian.org>2013-05-09 21:49:16 +0300
committerRicardo Signes <rjbs@cpan.org>2013-05-10 21:41:45 -0400
commit0157ef98f2758c1571b03548125e2b193caff16d (patch)
treeda14c183d3b92a5b48b6d953e43e1210e0422821 /doio.c
parent237b9c6d16c0bc18807193662438b0c12788f79a (diff)
downloadperl-0157ef98f2758c1571b03548125e2b193caff16d.tar.gz
Fix -Wformat-security issues
Building with -Accflags="-Wformat -Werror=format-security" triggers format string warnings from gcc. As gcc can't tell that all the strings are constant here, explicitly pass separate format strings to make it happy.
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/doio.c b/doio.c
index 2d65d547a0..aa87c81b03 100644
--- a/doio.c
+++ b/doio.c
@@ -1340,7 +1340,7 @@ Perl_my_lstat_flags(pTHX_ const U32 flags)
if (PL_op->op_flags & OPf_REF) {
if (cGVOP_gv == PL_defgv) {
if (PL_laststype != OP_LSTAT)
- Perl_croak(aTHX_ no_prev_lstat);
+ Perl_croak(aTHX_ "%s", no_prev_lstat);
return PL_laststatval;
}
PL_laststatval = -1;
@@ -1354,7 +1354,7 @@ Perl_my_lstat_flags(pTHX_ const U32 flags)
if ((PL_op->op_private & (OPpFT_STACKED|OPpFT_AFTER_t))
== OPpFT_STACKED) {
if (PL_laststype != OP_LSTAT)
- Perl_croak(aTHX_ no_prev_lstat);
+ Perl_croak(aTHX_ "%s", no_prev_lstat);
return PL_laststatval;
}