View | Details | Raw Unified | Return to bug 38969
Collapse All | Expand All

(-)a/opac/opac-tags.pl (-4 / +5 lines)
Lines 200-206 if ($is_ajax) { Link Here
200
		my $i = 1;
200
		my $i = 1;
201
		foreach (@errors) {
201
		foreach (@errors) {
202
			my $key = (keys %$_)[0];
202
			my $key = (keys %$_)[0];
203
			$err_string .= "\n\t\t KOHA.Tags.tag_message.$key(\"" . $_->{$key} . '")';
203
            ( my $quote_escaped = $_->{$key} ) =~ s|"|\\"|g;
204
            $err_string .= sprintf qq{\n\t\t KOHA.Tags.tag_message.%s("%s")}, $key, $quote_escaped;
204
			if($i < scalar @errors){ $err_string .= ","; }
205
			if($i < scalar @errors){ $err_string .= ","; }
205
			$i++;
206
			$i++;
206
		}
207
		}
Lines 216-223 if ($is_ajax) { Link Here
216
        my $i = 0;
217
        my $i = 0;
217
        foreach (@{$bibResult->{errors}}) {
218
        foreach (@{$bibResult->{errors}}) {
218
            $js_bibres .= "," if ($i);
219
            $js_bibres .= "," if ($i);
219
			my $key = (keys %$_)[0];
220
            my $key = (keys %$_)[0];
220
			$js_bibres .= "\n\t\t\t KOHA.Tags.tag_message.$key(\"" . $_->{$key} . '")';
221
            ( my $quote_escaped = $_->{$key} ) =~ s|"|\\"|g;
222
            $js_bibres .= sprintf qq{\n\t\t\t KOHA.Tags.tag_message.%s("%s")}, $key, $quote_escaped;
221
            $i++;
223
            $i++;
222
        }
224
        }
223
        $js_bibres .= "\n\t\t]\n\t}";
225
        $js_bibres .= "\n\t\t]\n\t}";
224
- 

Return to bug 38969