DO: get_shipped_qty entfernt

[mfinanz.git] / t / file / filesystem.t

diff --git a/t/file/filesystem.t b/t/file/filesystem.t
index cd033a7fcb7f6627346d3e65398f84071abf9125..d35a95faf00a6c6c7e2e140395898b5c99316d2f 100644 (file)
--- 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 $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";
 
 
 my $scannerfile = "${temp_dir}/f2";
 


@@ -84,7 +84,9 @@ eval {
 } or do {
   $result=$@;
 };
 } or do {
   $result=$@;
 };

-ok($result eq "No object type at SL/Controller/File.pm line 327.\n","correct error 'No object type'");
+$result = substr($result,0,14);
+#print $result."\n";
+ok($result eq "No object type","correct error 'No object type'");

 
 $::form->{object_type} ='sales_order';
 $::form->{file_type} ='';
 
 $::form->{object_type} ='sales_order';
 $::form->{file_type} ='';


@@ -96,7 +98,9 @@ eval {
 } or do {
   $result=$@;
 };
 } or do {
   $result=$@;
 };

-ok($result eq "No file type at SL/Controller/File.pm line 328.\n","correct error 'No file type'");
+$result = substr($result,0,12);
+#print $result."\n";
+ok($result eq "No file type","correct error 'No file type'");

 
 clear_up();
 done_testing;
 
 clear_up();
 done_testing;


@@ -109,6 +113,8 @@ sub clear_up {
   };
 }
 
   };
 }
 

+}
+

 sub reset_state {
   my %params = @_;
 
 sub reset_state {
   my %params = @_;