@@ -, +, @@ and documentation --- admin/aqbudgets.pl | 6 +++--- admin/aqplan.pl | 2 +- admin/check_parent_total.pl | 2 +- admin/env_tz_test.pl | 2 +- 4 files changed, 6 insertions(+), 6 deletions(-) --- a/admin/aqbudgets.pl +++ a/admin/aqbudgets.pl @@ -60,7 +60,7 @@ my $op = $input->param('op') || 'list'; # see if the user want to see all budgets or only owned ones by default my $show_mine = $input->param('show_mine') // 0; -# IF USER DOESNT HAVE PERM FOR AN 'ADD', THEN REDIRECT TO THE DEFAULT VIEW... +# IF USER DOESN'T HAVE PERM FOR AN 'ADD', THEN REDIRECT TO THE DEFAULT VIEW... if (not defined $template->{VARS}->{'CAN_user_acquisition_budget_add_del'} and $op eq 'add_form') { @@ -282,7 +282,7 @@ if ( $op eq 'list' ) { $budget->{'budget_lock'} = 1; } - # if a budget search doesnt match, next + # if a budget search doesn't match, next if ($filter_budgetname) { next unless $budget->{budget_code} =~ m/$filter_budgetname/i @@ -303,7 +303,7 @@ if ( $op eq 'list' ) { $available_total += $budget->{total_remaining}; } -# if amount == 0 dont display... +# if amount == 0 don't display... delete $budget->{'budget_unalloc_sublevel'} if (!defined $budget->{'budget_unalloc_sublevel'} or $budget->{'budget_unalloc_sublevel'} == 0); --- a/admin/aqplan.pl +++ a/admin/aqplan.pl @@ -330,7 +330,7 @@ foreach my $budget (@budgets) { or $authcat eq 'BRANCHES' or $authcat eq 'MONTHS' ) { - # but skip budgets that dont match the current auth-category + # but skip budgets that don't match the current auth-category next if ( $budget->{'sort1_authcat'} ne $authcat && $budget->{'sort2_authcat'} ne $authcat ); } --- a/admin/check_parent_total.pl +++ a/admin/check_parent_total.pl @@ -67,7 +67,7 @@ if ($parent) { my $sum = $sth->fetchrow_hashref; $sth->finish; $sub_unalloc = $parent->{'budget_amount'} - $sum->{sum}; -# TRICKY.. , IF THE PARENT IS THE CURRENT PARENT - THEN SUBSTRACT CURRENT BUDGET FROM TOTAL +# TRICKY.. , IF THE PARENT IS THE CURRENT PARENT - THEN SUBTRACT CURRENT BUDGET FROM TOTAL $sub_unalloc += $budget->{'budget_amount'} if ( $budget->{'budget_parent_id'} == $parent_id ) ; } --- a/admin/env_tz_test.pl +++ a/admin/env_tz_test.pl @@ -86,7 +86,7 @@ See http://dev.mysql.com/doc/refman/5.0/en/time-zone-support.html =head2 cron/crontab -Current versions of cron in debian allow ENV variables to be set in the lines preceeding +Current versions of cron in debian allow ENV variables to be set in the lines preceding scheduled commands. They will be exported to the environment of the scheduled job. This is an example for crontab: --