[Rt-commit] r14924 - rt/3.8/trunk/t/i18n

[clkao at bestpractical.com]

Author: clkao
Date: Fri Aug  8 13:29:28 2008
New Revision: 14924

Added:
   rt/3.8/trunk/t/i18n/
   rt/3.8/trunk/t/i18n/default.t

Log:
default homepage i18n test.

Added: rt/3.8/trunk/t/i18n/default.t
==============================================================================
--- (empty file)
+++ rt/3.8/trunk/t/i18n/default.t	Fri Aug  8 13:29:28 2008
@@ -0,0 +1,24 @@
+#!/usr/bin/perl -w
+use strict;
+use warnings;
+
+use Test::More tests => 7;
+use RT::Test;
+
+my ($baseurl, $m) = RT::Test->started_ok;
+$m->get_ok('/');
+$m->title_is('Login');
+
+$m->get_ok('/', { 'Accept-Language' => 'x-klingon' });
+$m->title_is('Login', 'unavailable language fallback to en');
+
+$m->add_header('Accept-Language' => 'zh-tw,zh;q=0.8,en-gb;q=0.5,en;q=0.3');
+$m->get_ok('/');
+use utf8;
+use Devel::Peek;
+Encode::_utf8_on($m->{content});
+TODO: {
+    local $TODO = 'login page should be l10n';
+    $m->title_is('登入');
+};
+