Skip to content

Commit

Permalink
* Add an order check which always passes -- used to update value of v…
Browse files Browse the repository at this point in the history
…ariables

  no matter what they are when &update=yes in force.

* Updated xmldocs/glossary/profile to add.
  • Loading branch information
perusionmike committed Sep 16, 2005
1 parent 0d0df65 commit 0e98e1c
Showing 1 changed file with 7 additions and 2 deletions.
9 changes: 7 additions & 2 deletions lib/Vend/Order.pm
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
# Vend::Order - Interchange order routing routines
#
# $Id: Order.pm,v 2.72 2005-09-14 13:18:42 mheins Exp $
# $Id: Order.pm,v 2.73 2005-09-16 18:55:19 mheins Exp $
#
# Copyright (C) 2002-2003 Interchange Development Group
# Copyright (C) 1996-2002 Red Hat, Inc.
Expand Down Expand Up @@ -29,7 +29,7 @@
package Vend::Order;
require Exporter;

$VERSION = substr(q$Revision: 2.72 $, 10);
$VERSION = substr(q$Revision: 2.73 $, 10);

@ISA = qw(Exporter);

Expand Down Expand Up @@ -420,6 +420,11 @@ sub _and_check {
return chain_checks(0, @_);
}

sub _always_pass {
my($ref,$var,$val) = @_;
return (1, $var, '')
}

sub _or_check {
if(! length($_[1]) ) {
$And = 0;
Expand Down

0 comments on commit 0e98e1c

Please sign in to comment.