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";
$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';
$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();
};
}
+}
+
sub reset_state {
my %params = @_;