my ($self, %params) = @_;
die "no dbfile" unless $params{dbfile};
my ($path, undef, undef) = $self->webdav_path($params{dbfile});
- die "no file" if !-f $path;
+ die "Path not found: " . $path unless -f $path;
return $path;
}
}
sub enabled {
- return 0 unless $::instance_conf->get_doc_webdav;
- return 1;
+ return $::instance_conf->get_doc_webdav;
}
#
gl_transaction => 'dialogbuchungen',
accounts_payable => 'kreditorenbuchungen',
shop_image => 'shopbilder',
+ customer => 'kunden',
+ vendor => 'lieferanten',
);
my %type_to_model = (
gl_transaction => 'GLTransaction',
accounts_payable => 'GLTransaction',
shop_image => 'Part',
+ customer => 'Customer',
+ vendor => 'Vendor',
);
my %model_to_number = (
Letter => 'letternumber',
GLTransaction => 'reference',
ShopImage => 'partnumber',
+ Customer => 'customernumber',
+ Vendor => 'vendornumber',
);
sub webdav_path {