[interchange-cvs] interchange - racke modified lib/Vend/Server.pm
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Tue May 10 05:13:15 EDT 2005
User: racke
Date: 2005-05-10 09:13:15 GMT
Modified: lib/Vend Server.pm
Log:
use status 404 if no corresponding catalog has been found for SOAP access
Revision Changes Path
2.62 +4 -2 interchange/lib/Vend/Server.pm
rev 2.62, prev_rev 2.61
Index: Server.pm
===================================================================
RCS file: /anon_cvs/repository/interchange/lib/Vend/Server.pm,v
retrieving revision 2.61
retrieving revision 2.62
diff -u -r2.61 -r2.62
--- Server.pm 3 May 2005 06:03:26 -0000 2.61
+++ Server.pm 10 May 2005 09:13:14 -0000 2.62
@@ -1,6 +1,6 @@
# Vend::Server - Listen for Interchange CGI requests as a background server
#
-# $Id: Server.pm,v 2.61 2005/05/03 06:03:26 mheins Exp $
+# $Id: Server.pm,v 2.62 2005/05/10 09:13:14 racke Exp $
#
# Copyright (C) 2002-2003 Interchange Development Group
# Copyright (C) 1996-2002 Red Hat, Inc.
@@ -26,7 +26,7 @@
package Vend::Server;
use vars qw($VERSION);
-$VERSION = substr(q$Revision: 2.61 $, 10);
+$VERSION = substr(q$Revision: 2.62 $, 10);
use POSIX qw(setsid strftime);
use Vend::Util;
@@ -807,6 +807,8 @@
if($ref = $Global::Selector{$catname} || $Global::SelectorAlias{$catname}) {
#::logDebug("found catalog $catname");
$$env{SCRIPT_NAME} = $catname;
+ } else {
+ $status = 404;
}
logData("$Global::VendRoot/etc/access_log",
More information about the interchange-cvs
mailing list