Author: turnstep
Date: Tue Feb  5 06:11:29 2008
New Revision: 10694

Modified:
   DBD-Pg/trunk/Pg.xs

Log:
Should allow overloaded objects to be stringified per bug 32868.


Modified: DBD-Pg/trunk/Pg.xs
==============================================================================
--- DBD-Pg/trunk/Pg.xs  (original)
+++ DBD-Pg/trunk/Pg.xs  Tue Feb  5 06:11:29 2008
@@ -203,7 +203,7 @@
                if (!SvOK(to_quote_sv)) {
                        RETVAL = newSVpvn("NULL", 4);
                }
-               else if (SvROK(to_quote_sv)) {
+               else if (SvROK(to_quote_sv) && !SvAMAGIC(to_quote_sv)) {
                        if (SvTYPE(SvRV(to_quote_sv)) != SVt_PVAV)
                                croak("Cannot quote a reference");
                        RETVAL = pg_stringify_array(to_quote_sv, ",", 
imp_dbh->pg_server_version);
@@ -252,7 +252,7 @@
                        /* Need good debugging here */
                        quoted = type_info->quote(to_quote, len, &retlen);
                        RETVAL = newSVpvn(quoted, retlen);
-                       if (SvUTF8(to_quote_sv))
+                       if (SvUTF8(to_quote_sv)) /* What about overloaded 
objects? */
                                SvUTF8_on(RETVAL);
                        Safefree (quoted);
                }

Reply via email to