[interchange-cvs] interchange - racke modified lib/Vend/Server.pm
interchange-core@icdevgroup.org
interchange-core@icdevgroup.org
Fri Mar 7 19:15:01 2003
User: racke
Date: 2003-03-08 00:14:58 GMT
Modified: lib/Vend Server.pm
Log:
ensure that SOAP server adds a blank line between HTTP header
and HTTP body
Revision Changes Path
2.28 +3 -2 interchange/lib/Vend/Server.pm
rev 2.28, prev_rev 2.27
Index: Server.pm
===================================================================
RCS file: /anon_cvs/repository/interchange/lib/Vend/Server.pm,v
retrieving revision 2.27
retrieving revision 2.28
diff -u -r2.27 -r2.28
--- Server.pm 6 Feb 2003 20:26:29 -0000 2.27
+++ Server.pm 8 Mar 2003 00:14:58 -0000 2.28
@@ -1,6 +1,6 @@
# Vend::Server - Listen for Interchange CGI requests as a background server
#
-# $Id: Server.pm,v 2.27 2003/02/06 20:26:29 mheins Exp $
+# $Id: Server.pm,v 2.28 2003/03/08 00:14:58 racke Exp $
#
# Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
#
@@ -25,7 +25,7 @@
package Vend::Server;
use vars qw($VERSION);
-$VERSION = substr(q$Revision: 2.27 $, 10);
+$VERSION = substr(q$Revision: 2.28 $, 10);
use POSIX qw(setsid strftime);
use Vend::Util;
@@ -1769,6 +1769,7 @@
unless $Vend::StatusLine =~ /^Content-Type:/im;
print MESSAGE canon_status($Vend::StatusLine);
+ print MESSAGE "\r\n";
print MESSAGE $result;
undef $Vend::StatusLine;
$Vend::ResponseMade = 1;