Author: turnstep
Date: Thu Jan 17 19:57:49 2008
New Revision: 10599
Modified:
DBD-Pg/trunk/dbdimp.c
Log:
SvPV_const way too new to meet out Perl requirements.
Modified: DBD-Pg/trunk/dbdimp.c
==============================================================================
--- DBD-Pg/trunk/dbdimp.c (original)
+++ DBD-Pg/trunk/dbdimp.c Thu Jan 17 19:57:49 2008
@@ -3051,7 +3051,7 @@
sv_copypv(currph->inout, AvARRAY(av)[i]);
*/
STRLEN len;
- const char * const s =
SvPV_const(AvARRAY(av)[i],len);
+ const char * const s = SvPV(AvARRAY(av)[i],len);
sv_setpvn(currph->inout, s, len);
if (SvUTF8(AvARRAY(av)[i]))
SvUTF8_on(currph->inout);