Files
pkgsrc-ng/www/wml/patches/patch-wml__backend_p3__eperl_eperl__perl5.c
T
2013-09-26 17:14:40 +02:00

14 lines
570 B
C

$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);
}