From 45827be78ba255299f347fae9646e62f395f102c Mon Sep 17 00:00:00 2001 From: phasefx Date: Wed, 21 Dec 2005 15:46:34 +0000 Subject: [PATCH] perl syntax is not javascript syntax :) git-svn-id: svn://svn.open-ils.org/ILS/trunk@2502 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- .../src/perlmods/OpenILS/Application/Circ/Money.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm index 307b363011..c00adb8b59 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Money.pm @@ -92,13 +92,13 @@ sub make_payments { $payobj->accepting_usr($user->id); $payobj->xact($transid); $payobj->note($note); - if ($payobj->has_field('cash_drawer')) $payobj->cash_drawer($drawer); - if ($payobj->has_field('cc_type')) $payobj->cc_type($cc_type); - if ($payobj->has_field('cc_number')) $payobj->cc_number($cc_number); - if ($payobj->has_field('expire_month')) $payobj->expire_month($expire_month); - if ($payobj->has_field('expire_year')) $payobj->expire_year($expire_year); - if ($payobj->has_field('approval_code')) $payobj->approval_code($approval_code); - if ($payobj->has_field('check_number')) $payobj->check_number($check_number); + if ($payobj->has_field('cash_drawer')) { $payobj->cash_drawer($drawer); } + if ($payobj->has_field('cc_type')) { $payobj->cc_type($cc_type); } + if ($payobj->has_field('cc_number')) { $payobj->cc_number($cc_number); } + if ($payobj->has_field('expire_month')) { $payobj->expire_month($expire_month); } + if ($payobj->has_field('expire_year')) { $payobj->expire_year($expire_year); } + if ($payobj->has_field('approval_code')) { $payobj->approval_code($approval_code); } + if ($payobj->has_field('check_number')) { $payobj->check_number($check_number); } # update the transaction if it's done if( ($trans->balance_owed - $amount) <= 0 ) { -- 2.43.2