| 1 | diff --git a/Flowd-perl/Flowd.xs b/Flowd-perl/Flowd.xs |
| 2 | index 3b72d9b..1f0a5c0 100644 |
| 3 | |
| 4 | |
| 5 | void deserialise(...) |
| 6 | buf = (char *)SvPV(ST(0), len); |
| 7 | r = store_flow_deserialise(buf, len, &flow, ebuf, sizeof(ebuf)); |
| 8 | if (r != STORE_ERR_OK) |
| 9 | - croak(ebuf); |
| 10 | + croak("%s", ebuf); |
| 11 | |
| 12 | fields = ntohl(flow.hdr.fields); |
| 13 |