X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/83c97773d846f04f47d62b532e3e44b7917f9f96..d1f44c84d990f57982854c6a4716c0f233f45bca:/t/file/filesystem.t?ds=sidebyside diff --git a/t/file/filesystem.t b/t/file/filesystem.t index fd648e84e..d35a95faf 100644 --- a/t/file/filesystem.t +++ b/t/file/filesystem.t @@ -15,10 +15,10 @@ my $temp_dir = File::Temp::tempdir("kivi-t-file-filesystem.XXXXXX", TMPDIR => my $storage_dir = "$temp_dir/storage"; mkdir($storage_dir) || die $!; - -my $db = SL::DB::Object->new->db; -$db->dbh->do("UPDATE defaults SET doc_files = 't'"); -$db->dbh->do("UPDATE defaults SET doc_files_rootpath = ?", undef, $storage_dir); +{ +local $::lx_office_conf{paths}->{document_path} = $storage_dir; +$::instance_conf->data; +local $::instance_conf->{data}{doc_files} = 1; my $scannerfile = "${temp_dir}/f2"; @@ -85,7 +85,7 @@ eval { $result=$@; }; $result = substr($result,0,14); -print $result."\n"; +#print $result."\n"; ok($result eq "No object type","correct error 'No object type'"); $::form->{object_type} ='sales_order'; @@ -99,7 +99,7 @@ eval { $result=$@; }; $result = substr($result,0,12); -print $result."\n"; +#print $result."\n"; ok($result eq "No file type","correct error 'No file type'"); clear_up(); @@ -113,6 +113,8 @@ sub clear_up { }; } +} + sub reset_state { my %params = @_;