--- PApp-SQL/SQL.xs	2002/08/02 03:30:01	1.14
+++ PApp-SQL/SQL.xs	2002/11/07 01:57:58	1.15
@@ -303,7 +303,11 @@
             PUSHs (sth);
             while (items > arg)
               {
-                PUSHs (maybe_upgrade_utf8 (ix & 1, ST(arg)));
+                SV *sv = ST(arg);
+                /* we sv_mortalcopy magical values since DBI seems to have a memory
+                 * leak when magical values are passed into execute().
+                 */
+                PUSHs (maybe_upgrade_utf8 (ix & 1, SvMAGICAL(sv) ? sv_mortalcopy(sv) : sv));
                 arg++;
               }