6 unshift @INC, 'modules/override';
9 use Support::TestSetup;
10 use Test::More tests => 2;
17 Support::TestSetup::login();
19 open my $fh, '<', 't/request/post_multipart_1' or die "can't load test";
20 my $data = do { $/ = undef; <$fh> };
25 local $ENV{CONTENT_TYPE} = 'multipart/form-data; boundary=---------------------------23281168279961';
26 SL::Request::_parse_multipart_formdata($t, $tt, $data);
29 my $blob = Encode::encode('utf-8', qq|\x{feff}Stunde;Montag;Dienstag;Mittwoch;Donnerstag;Freitag
30 1;Mathe;Deutsch;Englisch;Mathe;Kunst
31 2;Sport;Französisch;Geschichte;Sport;Geschichte
32 3;Sport;"Religion ev;kath";Kunst;;Kunst|);
39 'quote_char' => undef,
41 'custom_sep_char' => undef,
44 'article_number_policy' => undef,
45 'sellprice_places' => undef,
47 'apply_buchungsgruppe' => undef,
48 'full_preview' => undef,
50 'default_unit' => undef,
51 'default_buchungsgruppe' => undef,
52 'duplicates' => undef,
53 'numberformat' => undef,
54 'sellprice_adjustment_type' => undef,
55 'shoparticle_if_missing' => undef,
56 'sellprice_adjustment' => undef
58 'custom_escape_char' => undef,
59 'action_test' => undef,
60 'custom_quote_char' => undef,
61 'escape_char' => undef,
64 $t_cmp->{ATTACHMENTS}{file}{data} = \$t_cmp->{'file'};
76 'quote_char' => 'quote',
77 'custom_sep_char' => '',
78 'sep_char' => 'semicolon',
80 'article_number_policy' => 'update_prices',
81 'sellprice_places' => 2,
83 'apply_buchungsgruppe' => 'all',
84 'full_preview' => '0',
85 'part_type' => 'part',
86 'default_unit' => 'g',
87 'default_buchungsgruppe' => '815',
88 'duplicates' => 'no_check',
89 'numberformat' => '1.000,00',
90 'sellprice_adjustment_type' => 'percent',
91 'shoparticle_if_missing' => '0',
92 'sellprice_adjustment' =>'0'
94 'custom_escape_char' => '',
95 'action_test' => 'Test und Vorschau',
98 'filename' => 'from_wikipedia.csv'
101 'custom_quote_char' => '',
102 'escape_char' => 'quote',
103 'action' => 'CsvImport/dispatch',
104 'FILENAME' => 'from_wikipedia.csv'