|
Lines 40-46
my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
Link Here
|
| 40 |
my $schema = Koha::Database->new()->schema(); |
40 |
my $schema = Koha::Database->new()->schema(); |
| 41 |
my $cmd = $q->param('op'); |
41 |
my $cmd = $q->param('op'); |
| 42 |
if ( $cmd && $cmd == 'delete' ) { |
42 |
if ( $cmd && $cmd == 'delete' ) { |
| 43 |
my $id = $q->param->('message_id'); |
43 |
my $id = $q->param('message_id'); |
| 44 |
my $msg = $schema->resultset('EdifactMessage')->find($id); |
44 |
my $msg = $schema->resultset('EdifactMessage')->find($id); |
| 45 |
$msg->deleted(1); |
45 |
$msg->deleted(1); |
| 46 |
$msg->update; |
46 |
$msg->update; |
| 47 |
- |
|
|