reverted r7440 since what Daisuke meant to test was utf-8 bytes, not

unicode strings. "use utf8" will turn all literals to Unicode string,
which is not what we want to test against uri_for here.

diff --git a/t/unit_core_uri_for_multibytechar.t b/t/unit_core_uri_for_multibytechar.t
index 72e9813..b0ccdc5 100644 (file)
--- a/t/unit_core_uri_for_multibytechar.t
+++ b/t/unit_core_uri_for_multibytechar.t
@@ -5,9 +5,6 @@ use FindBin;
 use File::Spec;
 use lib File::Spec->catfile($FindBin::Bin, 'lib');
 
-use utf8; # for literal below
-use Encode; # URI.pm is braindead wrt unicode-flagged characters
-
 use Test::More tests => 5;
 
 use_ok('TestApp');
@@ -27,7 +24,7 @@ my $context = TestApp->new({
 my $uri_with_multibyte = URI->new($base);
 $uri_with_multibyte->path('/');
 $uri_with_multibyte->query_form(
-    name => Encode::encode('utf8', '村瀬大輔'),
+    name => '村瀬大輔',
 );
 
 # multibyte with utf8 bytes