|
Lines 49-55
use C4::Context;
Link Here
|
| 49 |
use C4::Output qw( output_html_with_http_headers ); |
49 |
use C4::Output qw( output_html_with_http_headers ); |
| 50 |
use C4::Letters qw( GetMessageTransportTypes ); |
50 |
use C4::Letters qw( GetMessageTransportTypes ); |
| 51 |
use C4::Log qw( logaction ); |
51 |
use C4::Log qw( logaction ); |
| 52 |
|
52 |
use C4::Creators qw( |
|
|
53 |
get_text_justification_types |
| 54 |
get_unit_values |
| 55 |
); |
| 53 |
use Koha::Notice::Templates; |
56 |
use Koha::Notice::Templates; |
| 54 |
use Koha::Patron::Attribute::Types; |
57 |
use Koha::Patron::Attribute::Types; |
| 55 |
|
58 |
|
|
Lines 228-233
sub add_form {
Link Here
|
| 228 |
content => $letter->{content} // '', |
231 |
content => $letter->{content} // '', |
| 229 |
tt_error => $letter->{tt_error}, |
232 |
tt_error => $letter->{tt_error}, |
| 230 |
}; |
233 |
}; |
|
|
234 |
$letters{ $lang }{params} = $letter; |
| 231 |
} |
235 |
} |
| 232 |
} |
236 |
} |
| 233 |
else { |
237 |
else { |
|
Lines 299-304
sub add_form {
Link Here
|
| 299 |
SQLfieldnames => $field_selection, |
303 |
SQLfieldnames => $field_selection, |
| 300 |
branchcode => $branchcode, |
304 |
branchcode => $branchcode, |
| 301 |
preview_is_available => $preview_is_available, |
305 |
preview_is_available => $preview_is_available, |
|
|
306 |
text_justification_types => get_text_justification_types(), |
| 307 |
units => get_unit_values(), |
| 302 |
); |
308 |
); |
| 303 |
return; |
309 |
return; |
| 304 |
} |
310 |
} |
|
Lines 310-321
sub add_validate {
Link Here
|
| 310 |
my $oldmodule = $input->param('oldmodule'); |
316 |
my $oldmodule = $input->param('oldmodule'); |
| 311 |
my $code = $input->param('code'); |
317 |
my $code = $input->param('code'); |
| 312 |
my $name = $input->param('name'); |
318 |
my $name = $input->param('name'); |
|
|
319 |
my $text_justify = $input->param('text_justify'); |
| 320 |
my $font_size = $input->param('font_size'); |
| 321 |
my $units = $input->param('units'); |
| 322 |
my $notice_width = $input->param('notice_width'); |
| 323 |
my $top_margin = $input->param('top_margin'); |
| 324 |
my $left_margin = $input->param('left_margin'); |
| 325 |
my $format_all = $input->param('format_all'); |
| 313 |
my @mtt = $input->multi_param('message_transport_type'); |
326 |
my @mtt = $input->multi_param('message_transport_type'); |
| 314 |
my @title = $input->multi_param('title'); |
327 |
my @title = $input->multi_param('title'); |
| 315 |
my @content = $input->multi_param('content'); |
328 |
my @content = $input->multi_param('content'); |
| 316 |
my @lang = $input->multi_param('lang'); |
329 |
my @lang = $input->multi_param('lang'); |
| 317 |
for my $mtt ( @mtt ) { |
330 |
for my $mtt ( @mtt ) { |
| 318 |
my $lang = shift @lang; |
331 |
my $lang = shift @lang; |
|
|
332 |
if ( $format_all ) { |
| 333 |
my @letters = Koha::Notice::Templates->search({ lang => $lang })->as_list; |
| 334 |
foreach my $letter ( @letters ) { |
| 335 |
$letter->set( |
| 336 |
{ |
| 337 |
text_justify => $text_justify, |
| 338 |
font_size => $font_size, |
| 339 |
units => $units, |
| 340 |
notice_width => $notice_width, |
| 341 |
top_margin => $top_margin, |
| 342 |
left_margin => $left_margin, |
| 343 |
} |
| 344 |
)->store; |
| 345 |
} |
| 346 |
} |
| 319 |
my $is_html = $input->param("is_html_$mtt\_$lang"); |
347 |
my $is_html = $input->param("is_html_$mtt\_$lang"); |
| 320 |
my $title = shift @title; |
348 |
my $title = shift @title; |
| 321 |
my $content = shift @content; |
349 |
my $content = shift @content; |
|
Lines 348-354
sub add_validate {
Link Here
|
| 348 |
is_html => $is_html || 0, |
376 |
is_html => $is_html || 0, |
| 349 |
title => $title, |
377 |
title => $title, |
| 350 |
content => $content, |
378 |
content => $content, |
| 351 |
lang => $lang |
379 |
lang => $lang, |
|
|
380 |
text_justify => $text_justify, |
| 381 |
font_size => $font_size, |
| 382 |
units => $units, |
| 383 |
notice_width => $notice_width, |
| 384 |
top_margin => $top_margin, |
| 385 |
left_margin => $left_margin, |
| 352 |
} |
386 |
} |
| 353 |
)->store; |
387 |
)->store; |
| 354 |
|
388 |
|
|
Lines 363-369
sub add_validate {
Link Here
|
| 363 |
title => $title, |
397 |
title => $title, |
| 364 |
content => $content, |
398 |
content => $content, |
| 365 |
message_transport_type => $mtt, |
399 |
message_transport_type => $mtt, |
| 366 |
lang => $lang |
400 |
lang => $lang, |
|
|
401 |
text_justify => $text_justify, |
| 402 |
font_size => $font_size, |
| 403 |
units => $units, |
| 404 |
notice_width => $notice_width, |
| 405 |
top_margin => $top_margin, |
| 406 |
left_margin => $left_margin, |
| 367 |
} |
407 |
} |
| 368 |
)->store; |
408 |
)->store; |
| 369 |
logaction( 'NOTICES', 'CREATE', $letter->id, $letter->content, |
409 |
logaction( 'NOTICES', 'CREATE', $letter->id, $letter->content, |
| 370 |
- |
|
|