]> wagnertech.de Git - mfinanz.git/blobdiff - t/file/filesystem.t
DO: get_shipped_qty entfernt
[mfinanz.git] / t / file / filesystem.t
index fd648e84ecef2a29581c1a52e664cc84faf4bb5b..d35a95faf00a6c6c7e2e140395898b5c99316d2f 100644 (file)
@@ -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 = @_;