use Carp;
use CGI;
+use List::MoreUtils qw(uniq);
use List::Util qw(min max first);
use SL::CVar;
push @template_files, "$form->{formname}$form->{language}$printer_code.$extension";
push @template_files, "$form->{formname}.$extension";
push @template_files, "default.$extension";
+ @template_files = uniq @template_files;
$form->{IN} = undef;
for my $filename (@template_files) {