| Subject: | PATCH for MIME::Types 1.20 test 20types.t on VMS |
| Date: | Mon, 9 Jul 2007 18:59:37 -0400 |
| To: | bug-MIME-Types [...] rt.cpan.org |
| From: | Stig <thatsafunnyname [...] gmail.com> |
Thanks for Mime::Types.
Version 1.20
MIME::Types has an OS Exception for the extension ".doc" on VMS so the test
for "windows.doc" fails on VMS.
line 936 of lib/MIME/Types.pm
vms:text/plain doc 8bit
Here is a patch that fixes this test case failure on VMS.
mime-types-1_20/t/20types.t
************
50 is($q->type, 'application/x-msword');
51 is($a->mimeTypeOf('my.lzh')->type, 'application/octet-stream');
******
50 if($^O eq 'VMS'){
51 # See MIME::Types, OS Exceptions
52 is($q->type, 'text/plain');
53 } else {
54 is($q->type, 'application/x-msword');
55 }
56 is($a->mimeTypeOf('my.lzh')->type, 'application/octet-stream');
************
Cheers,
Peter (Stig) Edwards