From f248b16d80412396cd777c47b8a54524c102be5f Mon Sep 17 00:00:00 2001
From: Felix Janda <felix.janda@posteo.de>
Date: Sun, 9 Oct 2016 10:37:04 -0400
Subject: [PATCH] perl: fix -Wformat-security warning in ENDMESSAGE()

Signed-off-by: Felix Janda <felix.janda@posteo.de>
Signed-off-by: Sven Verdoolaege <skimo@kotnet.org>
---
 perl_api/perl.xs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl_api/perl.xs b/perl_api/perl.xs
index 076a61ed..ab393584 100644
--- a/perl_api/perl.xs
+++ b/perl_api/perl.xs
@@ -84,7 +84,7 @@ typedef struct _perl_data {
 	sp->wp->scr_msg = msghandler;
 #define	ENDMESSAGE(sp)							\
 	sp->wp->scr_msg = scr_msg;					\
-	if (rval) croak(PERLP(sp)->errmsg);
+	if (rval) croak("%s", PERLP(sp)->errmsg);
 
 void xs_init __P((pTHXo));
 
-- 
2.11.4.GIT