← Back to branch summary

~ubuntu-branches/ubuntu/precise/libdbd-pg-perl/precise

« back to all changes in this revision

Viewing changes to Pg.xs

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann
  • Date: 2008-05-11 14:32:37 UTC
  • mfrom: (1.1.8 upstream)
  • Revision ID: james.westby@ubuntu.com-20080511143237-knulflfju6qi2s0p
Tags: 2.7.0-1
* New upstream release.
* Refresh lintian override.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Pg.xs
1
1
/*
2
 
  $Id: Pg.xs 11187 2008-05-02 17:11:54Z turnstep $
 
2
  $Id: Pg.xs 11220 2008-05-09 02:14:39Z turnstep $
3
3
 
4
4
  Copyright (c) 2000-2008 Greg Sabino Mullane and others: see the Changes file
5
5
  Portions Copyright (c) 1997-2000 Edmund Mergl
248
248
                                
249
249
                        to_quote = SvPV(to_quote_sv, len);
250
250
                        /* Need good debugging here */
251
 
                        quoted = type_info->quote(to_quote, len, &retlen, 0);
 
251
                        quoted = type_info->quote(to_quote, len, &retlen, imp_dbh->pg_server_version >= 80100 ? 1 : 0);
252
252
                        RETVAL = newSVpvn(quoted, retlen);
253
253
                        if (SvUTF8(to_quote_sv)) /* What about overloaded objects? */
254
254
                                SvUTF8_on(RETVAL);