X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_engine_request_headers.t;h=fc328749cb6c0d055df8894f9aa0fde02952fc90;hb=b2ddf6d7e1ea8f9b281ce5da27ecadf3152e151d;hp=c68d58561dd32c2a246e4a1a1e0a589af469d214;hpb=ace55b0721e7026a837606c5ce14f1f8782dc3a8;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/live_engine_request_headers.t b/t/live_engine_request_headers.t
index c68d585..fc32874 100644
--- a/t/live_engine_request_headers.t
+++ b/t/live_engine_request_headers.t
@@ -37,8 +37,9 @@ use URI;
     { # Test that multiple headers are joined as per RFC 2616 4.2 and RFC 3875 4.1.18
 
         my $excpected = '1, 2, 3, 4, 5';
-        
-        is( $creq->header('X-Multiple'), $request->header('X-Multiple'), 'Multiple message-headers are joined as a comma-separated list' );
+        my $got       = $creq->header('X-Multiple'); # HTTP::Headers is context sensitive, "force" scalar context
+
+        is( $got, $excpected, 'Multiple message-headers are joined as a comma-separated list' );
     }
 
     is( $creq->header('User-Agent'), $request->header('User-Agent'), 'Catalyst::Request->header User-Agent' );