|
Lines 55-83
my $schema = Koha::Database->new()->schema();
Link Here
|
| 55 |
# First process a confirmed delete, or save a validated record |
55 |
# First process a confirmed delete, or save a validated record |
| 56 |
|
56 |
|
| 57 |
if( $op eq 'delete_confirmed' && $id ) { |
57 |
if( $op eq 'delete_confirmed' && $id ) { |
| 58 |
my $server=$schema->resultset('Z3950server')->find( { id => $id } ); |
58 |
my $server = $schema->resultset('Z3950server')->find($id); |
| 59 |
if( $server ) { |
59 |
if ( $server ) { |
| 60 |
$server->delete; |
60 |
$server->delete; |
| 61 |
$template->param( msg_deleted => 1, msg_add => $server->name ); |
61 |
$template->param( msg_deleted => 1, msg_add => $server->name ); |
| 62 |
} else { |
62 |
} else { |
| 63 |
$template->param( msg_notfound => 1, msg_add => $id ); |
63 |
$template->param( msg_notfound => 1, msg_add => $id ); |
| 64 |
} |
64 |
} |
| 65 |
$id=0; |
65 |
$id = 0; |
| 66 |
} elsif( $op eq 'add_validated' ) { |
66 |
} elsif ( $op eq 'add_validated' ) { |
| 67 |
my @fields=qw/host port db userid password rank syntax encoding timeout |
67 |
my @fields=qw/host port db userid password rank syntax encoding timeout |
| 68 |
recordtype checked/; |
68 |
recordtype checked/; |
| 69 |
my $formdata = _form_data_hashref( $input, \@fields ); |
69 |
my $formdata = _form_data_hashref( $input, \@fields ); |
| 70 |
#add name from servername (an input with name="name" gave problems) |
70 |
#add name from servername (an input with name="name" gave problems) |
| 71 |
$formdata->{name} = $input->param('servername'); |
71 |
$formdata->{name} = $input->param('servername'); |
| 72 |
if( $id ) { |
72 |
if( $id ) { |
| 73 |
my $server= $schema->resultset('Z3950server')->find( { id => $id } ); |
73 |
my $server = $schema->resultset('Z3950server')->find($id); |
| 74 |
if( $server ) { |
74 |
if ( $server ) { |
| 75 |
$server->update( $formdata ); |
75 |
$server->update( $formdata ); |
| 76 |
$template->param( msg_updated => 1, msg_add => $formdata->{name} ); |
76 |
$template->param( msg_updated => 1, msg_add => $formdata->{name} ); |
| 77 |
} else { |
77 |
} else { |
| 78 |
$template->param( msg_notfound => 1, msg_add => $id ); |
78 |
$template->param( msg_notfound => 1, msg_add => $id ); |
| 79 |
} |
79 |
} |
| 80 |
$id=0; |
80 |
$id = 0; |
| 81 |
} else { |
81 |
} else { |
| 82 |
$schema->resultset('Z3950server')->create( $formdata ); |
82 |
$schema->resultset('Z3950server')->create( $formdata ); |
| 83 |
$template->param( msg_added => 1, msg_add => $formdata->{name} ); |
83 |
$template->param( msg_added => 1, msg_add => $formdata->{name} ); |
| 84 |
- |
|
|