[Bps-public-commit] HTTP-Server-Simple branch, master, updated. ed89c0352aa0d9d948801a429f0e35ee73549917

[jesse]

The branch, master has been updated
       via  ed89c0352aa0d9d948801a429f0e35ee73549917 (commit)
       via  0e599264f99181417c91f927e8b48a4045025ae3 (commit)
       via  b505e06e2f00adf88feefecbc0cfa563aaa6713c (commit)
      from  76636cdf04bf57bcbd65b2a07cc234ba2cc41e23 (commit)

Summary of changes:
 Changes                                   |    5 +++++
 lib/HTTP/Server/Simple.pm                 |    2 +-
 lib/HTTP/Server/Simple/CGI/Environment.pm |    2 +-
 3 files changed, 7 insertions(+), 2 deletions(-)

- Log -----------------------------------------------------------------
commit b505e06e2f00adf88feefecbc0cfa563aaa6713c
Author: Tatsuhiko Miyagawa <miyagawa at bulknews.net>
Date:   Mon Sep 14 00:56:02 2009 +0900

    multiple header lines should be combined with , per RFC2616

diff --git a/lib/HTTP/Server/Simple/CGI/Environment.pm b/lib/HTTP/Server/Simple/CGI/Environment.pm
index 8a05c3f..3d3565c 100644
--- a/lib/HTTP/Server/Simple/CGI/Environment.pm
+++ b/lib/HTTP/Server/Simple/CGI/Environment.pm
@@ -105,7 +105,7 @@ sub header {
         unless $tag =~ m/^(?:CONTENT_(?:LENGTH|TYPE)|COOKIE)$/;
 
     if ( exists $ENV{$tag} ) {
-        $ENV{$tag} .= "; $value";
+        $ENV{$tag} .= ", $value";
     }
     else {
         $ENV{$tag} = $value;

commit 0e599264f99181417c91f927e8b48a4045025ae3
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Mon Sep 14 00:58:34 2009 +0900

    Changes update

diff --git a/Changes b/Changes
index 8dbbad5..74da90f 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,8 @@
+
+0.40_01
+
+* HTTP header concatenation fixes from miyagawa
+
 0.40 Mon Aug 17 22:01:07 EDT 2009
 
 * After a fork, we need to reset the random seed lest we have 

commit ed89c0352aa0d9d948801a429f0e35ee73549917
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Mon Sep 14 00:59:39 2009 +0900

    Checking in changes prior to tagging of version 0.40_01.  Changelog diff is:

diff --git a/lib/HTTP/Server/Simple.pm b/lib/HTTP/Server/Simple.pm
index eeac7a5..55ee87f 100644
--- a/lib/HTTP/Server/Simple.pm
+++ b/lib/HTTP/Server/Simple.pm
@@ -8,7 +8,7 @@ use Carp;
 use URI::Escape;
 
 use vars qw($VERSION $bad_request_doc);
-$VERSION = '0.40';
+$VERSION = '0.40_01';
 
 =head1 NAME
 

-----------------------------------------------------------------------