View | Details | Raw Unified | Return to bug 15451
Collapse All | Expand All

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/csv-profiles.tt (-9 / +13 lines)
Lines 199-213 function reloadPage(p) { Link Here
199
199
200
[% IF op == 'delete_confirm' %]
200
[% IF op == 'delete_confirm' %]
201
    <div class="dialog alert">
201
    <div class="dialog alert">
202
        <h3>Delete CSV Profile "[% csv_profile.profile %]?"</h3>
202
        [% IF csv_profile %]
203
        <form action="/cgi-bin/koha/tools/csv-profiles.pl" method="post">
203
            <h3>Delete CSV Profile "[% csv_profile.profile %]?"</h3>
204
            <input type="hidden" name="op" value="delete_confirmed" />
204
            <form action="/cgi-bin/koha/tools/csv-profiles.pl" method="post">
205
            <input type="hidden" name="export_format_id" value="[% csv_profile.export_format_id %]" />
205
                <input type="hidden" name="op" value="delete_confirmed" />
206
            <input type="submit" class="approve" value="Yes, delete" />
206
                <input type="hidden" name="export_format_id" value="[% csv_profile.export_format_id %]" />
207
        </form>
207
                <input type="submit" class="approve" value="Yes, delete" />
208
        <form action="/cgi-bin/koha/tools/csv-profiles.pl" method="get">
208
            </form>
209
            <input type="submit" class="deny" value="No, do not Delete" />
209
            <form action="/cgi-bin/koha/tools/csv-profiles.pl" method="get">
210
        </form>
210
                <input type="submit" class="deny" value="No, do not Delete" />
211
            </form>
212
        [% ELSE %]
213
            This CSV Profile does not exist.
214
        [% END %]
211
    </div>
215
    </div>
212
[% END %]
216
[% END %]
213
217
(-)a/tools/csv-profiles.pl (-2 / +2 lines)
Lines 82-88 if ( $op eq 'add_form' ) { Link Here
82
    my $encoding           = $input->param("encoding");
82
    my $encoding           = $input->param("encoding");
83
83
84
    if ($export_format_id) {
84
    if ($export_format_id) {
85
        my $csv_profile = Koha::CsvProfiles->find($export_format_id);
85
        my $csv_profile = Koha::CsvProfiles->find($export_format_id)
86
            or die "Something went wrong! This export_format_id does not match any existing CSV profile.";
86
        $csv_profile->profile($profile);
87
        $csv_profile->profile($profile);
87
        $csv_profile->description($description);
88
        $csv_profile->description($description);
88
        $csv_profile->content($content);
89
        $csv_profile->content($content);
89
- 

Return to bug 15451