|
Lines 84-90
if ( $op eq 'add_form' ) {
Link Here
|
| 84 |
my $field_separator = $input->param("field_separator"); |
84 |
my $field_separator = $input->param("field_separator"); |
| 85 |
my $subfield_separator = $input->param("subfield_separator"); |
85 |
my $subfield_separator = $input->param("subfield_separator"); |
| 86 |
my $encoding = $input->param("encoding"); |
86 |
my $encoding = $input->param("encoding"); |
| 87 |
my $opac_option = $input->param("opac_option"); |
87 |
my $staff_only = $input->param("staff_only") ? 1 : 0; |
| 88 |
|
88 |
|
| 89 |
if ($export_format_id) { |
89 |
if ($export_format_id) { |
| 90 |
my $csv_profile = Koha::CsvProfiles->find($export_format_id) |
90 |
my $csv_profile = Koha::CsvProfiles->find($export_format_id) |
|
Lines 98-104
if ( $op eq 'add_form' ) {
Link Here
|
| 98 |
$csv_profile->encoding($encoding); |
98 |
$csv_profile->encoding($encoding); |
| 99 |
$csv_profile->type($type); |
99 |
$csv_profile->type($type); |
| 100 |
$csv_profile->used_for($used_for); |
100 |
$csv_profile->used_for($used_for); |
| 101 |
$csv_profile->opac_option($opac_option); |
101 |
$csv_profile->staff_only($staff_only); |
| 102 |
eval { $csv_profile->store; }; |
102 |
eval { $csv_profile->store; }; |
| 103 |
|
103 |
|
| 104 |
if ($@) { |
104 |
if ($@) { |
|
Lines 117-123
if ( $op eq 'add_form' ) {
Link Here
|
| 117 |
encoding => $encoding, |
117 |
encoding => $encoding, |
| 118 |
type => $type, |
118 |
type => $type, |
| 119 |
used_for => $used_for, |
119 |
used_for => $used_for, |
| 120 |
opac_option => $opac_option |
120 |
staff_only => $staff_only |
| 121 |
} |
121 |
} |
| 122 |
); |
122 |
); |
| 123 |
eval { $csv_profile->store; }; |
123 |
eval { $csv_profile->store; }; |
| 124 |
- |
|
|