--- trunk/irc-logger.pl	2006/02/27 12:10:07	5
+++ trunk/irc-logger.pl	2006/02/27 12:41:10	6
@@ -41,6 +41,7 @@
 
 use POE qw(Component::IRC Wheel::FollowTail);
 use DBI;
+use Encode qw/from_to/;
 
 
 my $dbh = DBI->connect($DSN,"","", { RaiseError => 1, AutoCommit => 1 }) || die $DBI::errstr;
@@ -95,6 +96,8 @@
 	  my $channel = $_[ARG1]->[0];
 	  my $msg = $_[ARG2];
 
+	  from_to($msg, 'UTF-8', 'ISO-8859-2');
+
 	  print "$channel: <$nick> $msg\n";
 	  $sth->execute($channel, $nick, $msg);
     },