[interchange-cvs] interchange - heins modified lib/Vend/Server.pm

[interchange-core@icdevgroup.org]

User:      heins
Date:      2002-11-22 21:34:20 GMT
Modified:  lib/Vend Server.pm
Log:
	* Never want to send a cookie if temporary session.

Revision  Changes    Path
2.22      +3 -2      interchange/lib/Vend/Server.pm


rev 2.22, prev_rev 2.21
Index: Server.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Server.pm,v
retrieving revision 2.21
retrieving revision 2.22
diff -u -r2.21 -r2.22
--- Server.pm	21 Nov 2002 22:24:16 -0000	2.21
+++ Server.pm	22 Nov 2002 21:34:19 -0000	2.22
@@ -1,6 +1,6 @@
 # Vend::Server - Listen for Interchange CGI requests as a background server
 #
-# $Id: Server.pm,v 2.21 2002/11/21 22:24:16 jon Exp $
+# $Id: Server.pm,v 2.22 2002/11/22 21:34:19 mheins 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.21 $, 10);
+$VERSION = substr(q$Revision: 2.22 $, 10);
 
 use POSIX qw(setsid strftime);
 use Vend::Util;
@@ -380,6 +380,7 @@
 sub create_cookie {
 	my($domain,$path) = @_;
 	my  $out;
+	return '' if $Vend::tmp_session;
 	my @jar;
 	push @jar, [
 				($::Instance->{CookieName} || 'MV_SESSION_ID'),