--- deliantra/Deliantra-Client/DC/DB.pm 2007/04/06 23:00:52 1.4 +++ deliantra/Deliantra-Client/DC/DB.pm 2007/04/16 20:35:29 1.5 @@ -19,7 +19,7 @@ use Carp (); use AnyEvent (); -use Storable (); # finally +use Storable (); use CFPlus; @@ -181,6 +181,7 @@ sub do_get { my ($db, $key) = @_; + utf8::downgrade $key; my $data; (table $db)->db_get ($key, $data) == 0 ? $data @@ -190,6 +191,8 @@ sub do_put { my ($db, $key, $data) = @_; + utf8::downgrade $key; + utf8::downgrade $data; (table $db)->db_put ($key => $data) }