more MIME type detection tests

mojolicious · Apr 4, 2012 · 91d684a · 91d684a
1 parent b5697ec
commit 91d684a
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 2 deletions.
diff --git a/lib/Mojolicious/Types.pm b/lib/Mojolicious/Types.pm
@@ -111,7 +111,7 @@ the following ones.
 =head2 C<detect>
 
   my $first = $types->detect('application/json;q=9');
-  my $all   = $types->detect('application/json;q=9', 1);
+  my $all   = $types->detect('application/json;q=9,text/plain', 1);
 
 Detect file extensions from C<Accept> header value, detection of more than
 one MIME type is disabled by default.

diff --git a/t/mojolicious/types.t b/t/mojolicious/types.t
@@ -1,6 +1,6 @@
 use Mojo::Base -strict;
 
-use Test::More tests => 32;
+use Test::More tests => 34;
 
 # "Your mistletoe is no match for my *tow* missile."
 use Mojolicious::Types;
@@ -44,6 +44,11 @@ is_deeply $t->detect('text/html;q=0.8,*/*;q=0.9'), [], 'no formats';
 # Multiple MIME types
 is_deeply $t->detect('text/html;q=0.9,text/plain', 1), ['txt', 'htm', 'html'],
   'right formats';
+is_deeply $t->detect('Text/Html;q=0.9,Text/Plain', 1), ['txt', 'htm', 'html'],
+  'right formats';
+is_deeply $t->detect('TEXT/HTML;v=9;q=0.9,TEXT/PLAIN', 1),
+  ['txt', 'htm', 'html'],
+  'right formats';
 is_deeply $t->detect('application/json, text/javascript, */*; q=0.01', 1),
   ['json'], 'right formats';
 is_deeply $t->detect('application/json , image/svg+xml ; q=10, image/png', 1),