From 973e0256dd95fe31db5af0ec81b3b24cefb25803 Mon Sep 17 00:00:00 2001 From: bayashi Date: Wed, 18 Jun 2014 23:43:26 +0900 Subject: [PATCH] revert pragma test --- t/05_showpragma.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/05_showpragma.t b/t/05_showpragma.t index 9e80cdb..8c665bc 100644 --- a/t/05_showpragma.t +++ b/t/05_showpragma.t @@ -4,7 +4,7 @@ use Devel::ModuleDumper qw/showpragma/; use Test::More; use Capture::Tiny qw/capture_stdout/; -use threads; +use utf8; my $stdout = capture_stdout { print Devel::ModuleDumper->show(); }; @@ -12,7 +12,7 @@ like $stdout, qr/^Perl\t\d+/; like $stdout, qr/Test::More\t\d+/; like $stdout, qr/Capture::Tiny\t\d+/; -like $stdout, qr/threads\t\d+/; +like $stdout, qr/utf8\t\d+/; if ($ENV{AUTHOR_TEST}) { note $stdout;