From 5bdf71c2fe65cf1e397bf1ffa9b56eb124767b69 Mon Sep 17 00:00:00 2001
From: geistteufel <geistteufel@yahoo.fr>
Date: Tue, 1 Mar 2011 12:26:09 +0100
Subject: [PATCH] add test unit headers_to_array with multiple same headers

---
 t/12_response/09_headers_to_array.t | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 t/12_response/09_headers_to_array.t

diff --git a/t/12_response/09_headers_to_array.t b/t/12_response/09_headers_to_array.t
new file mode 100644
index 000000000..9d0efc5f4
--- /dev/null
+++ b/t/12_response/09_headers_to_array.t
@@ -0,0 +1,22 @@
+package main;
+use strict;
+use warnings;
+use Test::More tests => 1, import => ['!pass'];
+
+{
+
+    use Dancer;
+    get '/' => sub {
+        push_header A => 1;
+        push_header A => 2;
+        push_header B => 3;
+    };
+  
+}
+
+use Dancer::Test;
+
+response_headers_are_deeply [GET => '/'],
+  [ 'Content-Type' => 'text/html', 'A' => 1, 'A' => 2, 'B' => 3];
+
+1;