} elsif ( $::form->{object_type} ) {
$type = $::form->{object_type};
}
- die "No object type" unless $type;
- die "No file type" unless $::form->{file_type};
- die "Unkown object type" unless $file_types{$type};
+ die "No object type" unless $type;
+ die "No file type" unless $::form->{file_type};
+ die "Unknown object type" unless $file_types{$type};
$self->is_global($gldoc);
$self->file_type($::form->{file_type});
=item C<ignore_unknown_columns>
-If set, the import will ignore unkown header columns. Useful for lazy imports,
+If set, the import will ignore unknown header columns. Useful for lazy imports,
but deactivated by default.
=item C<case_insensitive_header>
sekf
seperat
sucess
+unkown
varsion
wether
);
profile => [{class => 'SL::DB::Part'}],
);
$csv->parse;
-is $csv->get_objects->[0]->lastcost, '1221.52', 'ignore_unkown_columns works';
+is $csv->get_objects->[0]->lastcost, '1221.52', 'ignore_unknown_columns works';
#####
$dies = 0;
1;
};
-ok $dies, 'unkown parameter dies';
+ok $dies, 'unknown parameter dies';
1;