[open-ils-commits] r10192 -
branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Circ
svn at svn.open-ils.org
svn at svn.open-ils.org
Wed Jul 30 14:01:07 EDT 2008
Author: erickson
Date: 2008-07-30 14:00:57 -0400 (Wed, 30 Jul 2008)
New Revision: 10192
Modified:
branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
Log:
falling back to existing is_true method
Modified: branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm
===================================================================
--- branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm 2008-07-30 17:37:44 UTC (rev 10191)
+++ branches/rel_1_2/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm 2008-07-30 18:00:57 UTC (rev 10192)
@@ -11,14 +11,6 @@
my %scripts;
my $script_libs;
-sub isTrue {
- my $v = shift;
- return 1 if ($v == 1);
- return 1 if ($v =~ /^t/io);
- return 1 if ($v =~ /^y/io);
- return 0;
-}
-
sub initialize {
my $self = shift;
@@ -1072,7 +1064,7 @@
# if is_percent is true then the max->amount is
# use as a percentage of the copy price
- if (isTrue($max->is_percent)) {
+ if ($U->is_true($max->is_percent)) {
my $cn = $self->editor->retrieve_asset_call_number($copy->call_number);
More information about the open-ils-commits
mailing list