From 2f41bca4e8ef591f5fa5c9ee620c7aacc9409f71 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@ens-lyon.org>
Date: Fri, 2 Mar 2012 11:53:49 +0100
Subject: cleaner way to set restore the UTF-8 flag for the output of SELECT
 queries

---
 videomv.pl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'videomv.pl')

diff --git a/videomv.pl b/videomv.pl
index 2bc3313..dd66375 100755
--- a/videomv.pl
+++ b/videomv.pl
@@ -390,6 +390,7 @@ unless (defined $ignoredb_flag) {
     }
     $dbh = DBI->connect($dsn, $config{user}, $config{password})
                or die "Can't connect do database";
+    $dbh->do( "SET NAMES UTF8" ) or die "Error: Can't set names to UTF-8.\n";
 
     # Lookup for the file in the videodb database
     $RES =
-- 
cgit v1.2.3