From 14da87c491cf6881b42975d37fe52b2e873adc85 Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Thu, 27 May 2010 05:38:30 +0000
Subject: [PATCH] icu installs its own collation, so should not die here

---
 lib/DBD/SQLite.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/lib/DBD/SQLite.pm b/lib/DBD/SQLite.pm
index cf01d1c..a932b43 100644
--- a/lib/DBD/SQLite.pm
+++ b/lib/DBD/SQLite.pm
@@ -141,8 +141,11 @@ sub connect {
 sub install_collation {
     my $dbh       = shift;
     my $name      = shift;
-    my $collation = $DBD::SQLite::COLLATION{$name}
-        or die "can't install, unknown collation : $name";
+    my $collation = $DBD::SQLite::COLLATION{$name};
+    unless ($collation) {
+        warn "Can't install unknown collation: $name" if $dbh->{PrintWarn};
+        return;
+    }
     if ( DBD::SQLite::NEWAPI ) {
         $dbh->sqlite_create_collation( $name => $collation );
     } else {