Skip to content

Commit

Permalink
Add always_fail order check from Mark Johnson <mark@endpoint.com>, with
Browse files Browse the repository at this point in the history
Kevin Walsh's default error message addition. Sync the manifest.
  • Loading branch information
jonjensen committed Jan 30, 2006
1 parent 27b1585 commit d67e388
Show file tree
Hide file tree
Showing 2 changed files with 17 additions and 1 deletion.
6 changes: 5 additions & 1 deletion MANIFEST
Original file line number Diff line number Diff line change
Expand Up @@ -83,6 +83,7 @@ code/Filter/word.filter
code/Filter/yesno.filter
code/Filter/zerofix.filter
code/JavaScriptCheck/required.jsc
code/OrderCheck/always_fail.oc
code/OrderCheck/email_only.oc
code/OrderCheck/exists.oc
code/OrderCheck/filter.oc
Expand Down Expand Up @@ -250,6 +251,7 @@ code/UI_Tag/uneval.coretag
code/UI_Tag/uninstall_feature.tag
code/UI_Tag/unlink_file.coretag
code/UI_Tag/update_order_status.tag
code/UI_Tag/user_merge.tag
code/UI_Tag/version.coretag
code/UI_Tag/widget.coretag
code/UI_Tag/widget_meta.coretag
Expand Down Expand Up @@ -371,6 +373,7 @@ dist/catalog_after.cfg
dist/catalog_before.cfg
dist/error.log
dist/etc/.empty
dist/etc/jobs/db/export
dist/etc/jobs/merchandising/topsellers
dist/features/quickpoll/doc/quickpoll/README
dist/features/quickpoll/quickpoll.catalog.cfg
Expand Down Expand Up @@ -924,6 +927,7 @@ dist/standard/products/ship/450ps.csv
dist/standard/products/ship/Accessorials.csv
dist/standard/products/ship/air_pp.txt
dist/standard/products/ship/Book.txt
dist/standard/products/ship/ems.txt
dist/standard/products/ship/Expedited.csv
dist/standard/products/ship/Express.csv
dist/standard/products/ship/Ground.csv
Expand Down Expand Up @@ -1237,4 +1241,4 @@ WHATSNEW-4.7
WHATSNEW-4.9
WHATSNEW-5.1
WHATSNEW-5.3
META.yml Module meta-data (added by MakeMaker)
WHATSNEW-5.5
12 changes: 12 additions & 0 deletions code/OrderCheck/always_fail.oc
Original file line number Diff line number Diff line change
@@ -0,0 +1,12 @@
# Copyright 2006 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: always_fail.oc,v 1.1 2006-01-30 22:36:32 jon Exp $

CodeDef always_fail OrderCheck 1
CodeDef always_fail Description Always fails
CodeDef always_fail Routine <<EOR
sub {
my ($ref, $name, $value, $msg) = @_;
return (0, $name, $msg || errmsg('failed'));
}
EOR

0 comments on commit d67e388

Please sign in to comment.