Author: turnstep
Date: Wed Sep 17 15:19:48 2008
New Revision: 11804
Modified:
DBD-Pg/trunk/t/09arrays.t
Log:
More LATIN1 workarounds.
Modified: DBD-Pg/trunk/t/09arrays.t
==============================================================================
--- DBD-Pg/trunk/t/09arrays.t (original)
+++ DBD-Pg/trunk/t/09arrays.t Wed Sep 17 15:19:48 2008
@@ -499,6 +499,10 @@
eval { require Encode; };
skip ('Encode module is needed for unicode tests', 14) if $@;
+ my $server_encoding = $dbh->selectall_arrayref('SHOW
server_encoding')->[0][0];
+ skip ('Cannot test unicode with a LATIN1 database', 14)
+ if $server_encoding eq 'LATIN1';
+
$t='String should be UTF-8';
local $dbh->{pg_enable_utf8} = 1;
my $utf8_str = chr(0x100).'dam'; # LATIN CAPITAL LETTER A WITH MACRON
