|
Lines 439-469
if ( $op eq 'do' ) {
Link Here
|
| 439 |
} |
439 |
} |
| 440 |
$i++; |
440 |
$i++; |
| 441 |
} |
441 |
} |
| 442 |
# Create a block to save in database the patron_messages update + security slice : "if" this field is filled-up then...etc |
442 |
|
| 443 |
my $patron_messages = Koha::Patron::Messages->search( |
443 |
# Handle patron messages |
|
|
444 |
my $message = $input->param('message'); |
| 445 |
my $branchcode = C4::Context::mybranch; |
| 446 |
my $message_type = $input->param('add_message_type'); |
| 447 |
|
| 448 |
Koha::Patron::Message->new( |
| 444 |
{ |
449 |
{ |
| 445 |
'me.borrowernumber' => $patron->borrowernumber, |
450 |
borrowernumber => $borrowernumber, |
| 446 |
} |
451 |
branchcode => $branchcode, |
| 447 |
); |
452 |
message_type => $message_type, |
| 448 |
if ( defined $patron_messages ) { |
453 |
message => $message, |
| 449 |
if ( defined $infos ) { |
|
|
| 450 |
my $message = $input->param('message'); |
| 451 |
my $borrowernumber = $patron->borrowernumber; |
| 452 |
my $branchcode = C4::Context::mybranch; |
| 453 |
my $message_type = $input->param('add_message_type'); |
| 454 |
|
| 455 |
Koha::Patron::Message->new( |
| 456 |
{ |
| 457 |
borrowernumber => $borrowernumber, |
| 458 |
branchcode => $branchcode, |
| 459 |
message_type => $message_type, |
| 460 |
message => $message, |
| 461 |
} |
| 462 |
)->store; |
| 463 |
$template->param( message_type => $message_type ); |
| 464 |
} |
454 |
} |
| 465 |
} |
455 |
)->store; |
| 466 |
} |
456 |
} |
|
|
457 |
|
| 467 |
$op = "show_results"; # We have process modifications, the user want to view its |
458 |
$op = "show_results"; # We have process modifications, the user want to view its |
| 468 |
|
459 |
|
| 469 |
# Construct the results list |
460 |
# Construct the results list |
| 470 |
- |
|
|