From: erickson Date: Wed, 30 Jul 2008 18:00:57 +0000 (+0000) Subject: falling back to existing is_true method X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=902446d91eb710678d6486d17dbade445bc228ff;p=Evergreen.git falling back to existing is_true method git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_2@10192 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm index cb2cf9c41e..031f0d78c2 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Circulate.pm @@ -11,14 +11,6 @@ my $U = "OpenILS::Application::AppUtils"; 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 @@ sub build_checkout_circ_object { # 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);