[interchange-cvs] interchange - racke modified lib/Vend/Order.pm

interchange-core@interchange.redhat.com interchange-core@interchange.redhat.com
Tue Jun 4 14:34:01 2002


User:      racke
Date:      2002-06-04 18:33:01 GMT
Modified:  lib/Vend Tag: STABLE_4_8-branch Order.pm
Log:
fatal and final should never have an influence on the status of a order
check, which has been introduced by Jon's mischievous patch a while
ago

Revision  Changes    Path
No                   revision



No                   revision



2.6.2.8   +4 -2      interchange/lib/Vend/Order.pm


rev 2.6.2.8, prev_rev 2.6.2.7
Index: Order.pm
===================================================================
RCS file: /anon_cvs/repository/interchange/lib/Vend/Order.pm,v
retrieving revision 2.6.2.7
retrieving revision 2.6.2.8
diff -u -r2.6.2.7 -r2.6.2.8
--- Order.pm	16 May 2002 15:06:25 -0000	2.6.2.7
+++ Order.pm	4 Jun 2002 18:33:01 -0000	2.6.2.8
@@ -1,6 +1,6 @@
 # Vend::Order - Interchange order routing routines
 #
-# $Id: Order.pm,v 2.6.2.7 2002/05/16 15:06:25 jon Exp $
+# $Id: Order.pm,v 2.6.2.8 2002/06/04 18:33:01 racke Exp $
 #
 # Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -28,7 +28,7 @@
 package Vend::Order;
 require Exporter;
 
-$VERSION = substr(q$Revision: 2.6.2.7 $, 10);
+$VERSION = substr(q$Revision: 2.6.2.8 $, 10);
 
 @ISA = qw(Exporter);
 
@@ -212,10 +212,12 @@
 
 sub _fatal {
 	$Fatal = ( defined($_[1]) && ($_[1] =~ /^[yYtT1]/) ) ? 1 : 0;
+	return 1;
 }
 
 sub _final {
 	$Final = ( defined($_[1]) && ($_[1] =~ /^[yYtT1]/) ) ? 1 : 0;
+	return 1;
 }
 
 sub _return {