blob: 4c3e6aeb35fe8a5e494170d2c5e6b8349bac29a6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
--- bind/pdflib/perl/pdflib_pl.c
+++ bind/pdflib/perl/pdflib_pl.c
@@ -375,7 +375,7 @@ SWIGEXPORT(void,boot_pdflib_pl)(CV *cv,
#include "pdflib.h"
/* Exception handling */
-#define SWIG_exception(msg) croak(msg)
+#define SWIG_exception(msg) croak("%s", msg)
#define try PDF_TRY(p)
#define catch PDF_CATCH(p) { \
char errmsg[1024];\
|