From 07a4a55f515082b616a8070fd008b26b38f38ac8 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 18 Nov 2009 17:54:08 -0800
Subject: [PATCH] Add an explicit test for RTF files, due to cross platform
 issues.

---
 t/Macro/FetchMimeType.t | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/t/Macro/FetchMimeType.t b/t/Macro/FetchMimeType.t
index 83632e587..e0788c3ed 100644
--- a/t/Macro/FetchMimeType.t
+++ b/t/Macro/FetchMimeType.t
@@ -41,6 +41,11 @@ my @testSets = (
 		output => 'application/octet-stream',
 		comment => q|Null path returns application/octet-stream|,
 	},
+	{
+		input  => 'foo.rtf',
+		output => 'application/rtf',
+		comment => q|RTF file|, ##Added test due to a bug on some operating systems.
+	},
 	{
 		input  => undef,
 		output => undef,