X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=opac%2Fopac-tags.pl;h=2b9dfd7955337577299a670908af7e47e57b9cd5;hb=fd3666e77d0920b52f9b3e249e8e318915f3e881;hp=2bd9354bc5986f3ca7bc5f7ef13f762caf62117e;hpb=4b47782b6e41cf4c9db3f35c16e296f5733f93ef;p=koha.git diff --git a/opac/opac-tags.pl b/opac/opac-tags.pl index 2bd9354bc5..2b9dfd7955 100755 --- a/opac/opac-tags.pl +++ b/opac/opac-tags.pl @@ -138,7 +138,7 @@ if (scalar @newtags_keys) { $counts{$biblionumber}++; } else { push @errors, {failed_add_tag=>$clean_tag}; - warn "add_tag($biblionumber,$clean_tag,$loggedinuser...) returned bad result (" . (defined $result ? $result : 'UNDEF') .")"; + $debug and warn "add_tag($biblionumber,$clean_tag,$loggedinuser...) returned bad result (" . (defined $result ? $result : 'UNDEF') .")"; } } } @@ -155,15 +155,18 @@ foreach (@deltags) { if ($is_ajax) { my $sum = 0; foreach (values %counts) {$sum += $_;} - my $js_reply = sprintf("response = {\n\tadded: %d,\n\tdeleted: %d,\n\terrors: %d,",$sum,$dels,scalar @errors); + my $js_reply = sprintf("response = {\n\tadded: %d,\n\tdeleted: %d,\n\terrors: %d",$sum,$dels,scalar @errors); my $err_string = ''; if (scalar @errors) { - $err_string = "\n\talerts: ["; # open response_function + $err_string = ",\n\talerts: ["; # open response_function + my $i = 1; foreach (@errors) { my $key = (keys %$_)[0]; - $err_string .= "\n\t\t KOHA.Tags.tag_message.$key(\"" . $_->{$key} . '"),'; + $err_string .= "\n\t\t KOHA.Tags.tag_message.$key(\"" . $_->{$key} . '")'; + if($i < scalar @errors){ $err_string .= ","; } + $i++; } - $err_string .= "\n\t],\n"; # close response_function + $err_string .= "\n\t]\n"; # close response_function } output_ajax_with_http_headers($query, "$js_reply\n$err_string};"); exit; @@ -184,7 +187,10 @@ if ($loggedinuser and not $query->param('hidemytags')) { $_->{date_created_display} = format_date($_->{date_created}); } } -$template->param(tagsview => 1,); + +$template->param(tagsview => 1, +dateformat => C4::Context->preference("dateformat")); + if ($add_op) { my $adds = 0; for (values %counts) {$adds += $_;}