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

(-)a/tools/letter.pl (-4 / +9 lines)
Lines 227-236 sub add_form { Link Here
227
                tt_error   => $letter->{tt_error},
227
                tt_error   => $letter->{tt_error},
228
            };
228
            };
229
            $letters{ $lang }{params} = $letter;
229
            $letters{ $lang }{params} = $letter;
230
        }
230
231
231
            my $object = Koha::Notice::Templates->find( { id => $letter->{id} } );
232
        # Fetch sample notices
232
            $letters{ $lang }{templates}{$mtt}{sample} = $object->get_default;
233
        while (my ($lang_key, $lang_value) = each %letters) {
233
            $letters{ $lang }{templates}{$mtt}{id} = $letter->{id};
234
            while (my ($mtt_key, $mtt_value) = each %{ $lang_value->{templates} }) {
235
                my $object = Koha::Notice::Template->new(
236
                    { module => $module, code => $code, message_transport_type => $mtt_key, lang => $lang_key } );
237
                $mtt_value->{sample} = $object->get_default;
238
                $mtt_value->{id} = lc("$module" . "_" . $code . "_" . $mtt_key . "_" . $lang_key);
239
            }
234
        }
240
        }
235
    }
241
    }
236
    else {
242
    else {
237
- 

Return to bug 36815