File: werror-forat-security.patch

package info (click to toggle)
libdata-swap-perl 0.08-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 188 kB
  • sloc: perl: 1,074; makefile: 3
file content (18 lines) | stat: -rw-r--r-- 607 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Description: add formatting string to fix failures with -Werror=format-security
Origin: vendor
Bug: https://rt.cpan.org/Ticket/Display.html?id=91708
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=91708
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2013-12-28

--- a/Swap.xs
+++ b/Swap.xs
@@ -219,7 +219,7 @@
 		Perl_croak(aTHX_ "Not a reference");
 	if ((SvREADONLY(r1) && SvIMMORTAL(r1))
 			|| (SvREADONLY(r2) && SvIMMORTAL(r2)))
-		Perl_croak(aTHX_ PL_no_modify);
+		Perl_croak(aTHX_ "%s", PL_no_modify);
 	br = NULL;
 	br = sv_move(aTHX_ &t, r1, br);
 	br = sv_move(aTHX_ r1, r2, br);