diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tmpl
index 5efdfb59d2..b0904a1563 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tmpl
@@ -198,7 +198,7 @@ h4.collapse a { font-size : 80%; text-decoration: none; } fieldset.brief ol { di
Suggestion |
Suggested by /on |
Managed by /on |
- For |
+ Library |
Budget |
Status |
@@ -229,7 +229,7 @@ h4.collapse a { font-size : 80%; text-decoration: none; } fieldset.brief ol { di
-
+
|
Requested Accepted Ordered Rejected Checked ()
diff --git a/suggestion/suggestion.pl b/suggestion/suggestion.pl
index 9811cc8604..96b2869b0f 100755
--- a/suggestion/suggestion.pl
+++ b/suggestion/suggestion.pl
@@ -166,12 +166,13 @@ if ($op=~/else/) {
# warn $$suggestion_ref{$displayby}."=$criteriumvalue; $displayby";
my $suggestions = &SearchSuggestion($suggestion_ref);
- foreach (@$suggestions){
+ foreach my $suggestion (@$suggestions){
+ $suggestion->{budget_name}=GetBudget($suggestion->{budgetid})->{budget_name};
foreach my $date qw(suggesteddate manageddate accepteddate){
- if ($_->{$date} ne "0000-00-00" && $_->{$date} ne "" ){
- $_->{$date}=format_date($_->{$date}) ;
+ if ($suggestion->{$date} ne "0000-00-00" && $suggestion->{$date} ne "" ){
+ $suggestion->{$date}=format_date($suggestion->{$date}) ;
} else {
- $_->{$date}="" ;
+ $suggestion->{$date}="" ;
}
}
}
@@ -257,8 +258,8 @@ $template->param(itemtypeloop=>$supportlist);
my $searchbudgets={ budget_branchcode=>$branchfilter} if $branchfilter;
my $budgets = GetBudgets($searchbudgets);
-foreach (@$budgets){
- $_->{'selected'}=1 if ($$suggestion_ref{'budget_id'} && $_{'budget_id'} eq $$suggestion_ref{'budget_id'})
+foreach my $budget (@$budgets){
+ $budget->{'selected'}=1 if ($$suggestion_ref{'budgetid'} && $budget->{'budget_id'} eq $$suggestion_ref{'budgetid'})
};
$template->param( budgetsloop => $budgets);
|