www/wml/patches/patch-wml__backend_p3__eperl_eperl__perl5.c


1
2
3
4
5
6
7
8
9
10
11
12
13

$NetBSD: patch-wml__backend_p3__eperl_eperl__perl5.c,v 1.1 2013/03/02 17:53:37 joerg Exp $

--- wml_backend/p3_eperl/eperl_perl5.c.orig	2013-03-01 14:59:14.000000000 +0000
+++ wml_backend/p3_eperl/eperl_perl5.c
@@ -212,7 +212,7 @@ int Perl5_Run(int myargc, char **myargv,
             IO_restore_stdout();
             IO_restore_stderr();
             if ((cpBuf = ePerl_ReadErrorFile(perlstderr, perlscript, source)) != NULL) {
-                fprintf(stderr, cpBuf);
+                fprintf(stderr, "%s", cpBuf);
             }
             CU(EX_FAIL);
         }