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 |
- |
|
|