diff options
Diffstat (limited to 'rt/t/web/offline_utf8.t')
-rw-r--r-- | rt/t/web/offline_utf8.t | 54 |
1 files changed, 0 insertions, 54 deletions
diff --git a/rt/t/web/offline_utf8.t b/rt/t/web/offline_utf8.t deleted file mode 100644 index 2a3e64d3c..000000000 --- a/rt/t/web/offline_utf8.t +++ /dev/null @@ -1,54 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; - -use RT::Test tests => 8; -use File::Temp qw/tempfile/; -use Encode; -use RT::Ticket; -my ( $fh, $file ) = tempfile; -my $template = <<EOF; -===Create-Ticket: ticket1 -Queue: General -Subject: 标题 -Status: new -Content: -这是正文 -ENDOFCONTENT -EOF - -print $fh $template; -close $fh; - -my ( $url, $m ) = RT::Test->started_ok; -ok( $m->login, 'logged in' ); - -$m->get_ok( $url . '/Tools/Offline.html' ); - -$m->submit_form( - form_name => 'TicketUpdate', - fields => { Template => $file, }, - button => 'Parse', -); - -$m->content_contains( '这是正文', 'content is parsed right' ); - -$m->submit_form( - form_name => 'TicketUpdate', - button => 'UpdateTickets', - - # mimic what browsers do: they seems decoded $template - fields => { string => decode( 'utf8', $template ), }, -); - -$m->content_like( qr/Ticket \d+ created/, 'found ticket created message' ); -my ( $ticket_id ) = $m->content =~ /Ticket (\d+) created/; - -my $ticket = RT::Ticket->new( $RT::SystemUser ); -$ticket->Load( $ticket_id ); -is( $ticket->Subject, '标题', 'subject in $ticket is right' ); - -$m->get_ok( $url . "/Ticket/Display.html?id=$ticket_id" ); -$m->content_contains( '这是正文', - 'content is right in ticket display page' ); - |