Author: turnstep
Date: Thu Sep 18 18:56:14 2008
New Revision: 11824
Modified:
DBD-Pg/trunk/t/03dbmethod.t
Log:
Minor tweaks
Modified: DBD-Pg/trunk/t/03dbmethod.t
==============================================================================
--- DBD-Pg/trunk/t/03dbmethod.t (original)
+++ DBD-Pg/trunk/t/03dbmethod.t Thu Sep 18 18:56:14 2008
@@ -1124,13 +1124,13 @@
$result = $dbh->quote($byte, { pg_type => PG_BYTEA });
if ($byteval < 32 or $byteval >= 127) {
$expected = $scs
- ? sprintf qq{E'\\\\%03o'}, $byteval
- : sprintf qq{'\\\\%03o'}, $byteval;
+ ? sprintf q{E'\\\\%03o'}, $byteval
+ : sprintf q{'\\\\%03o'}, $byteval;
}
else {
$expected = $scs
- ? sprintf qq{E'%s'}, $byte
- : sprintf qq{'%s'}, $byte;
+ ? sprintf q{E'%s'}, $byte
+ : sprintf q{'%s'}, $byte;
}
if ($byte eq '\\') {
$expected =~ s{\\}{\\\\\\\\};