X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3624b119556731da41e4ad395491ebb067f26565..24ab7ec0bfb052edce7a3c7a6e37c151f9cd6a04:/SL/DB/Helper/Mappings.pm diff --git a/SL/DB/Helper/Mappings.pm b/SL/DB/Helper/Mappings.pm index 31ae7b699..aa25bd449 100644 --- a/SL/DB/Helper/Mappings.pm +++ b/SL/DB/Helper/Mappings.pm @@ -126,6 +126,8 @@ my %kivitendo_package_names = ( drafts => 'draft', dunning => 'dunning', dunning_config => 'dunning_config', + email_journal => 'EmailJournal', + email_journal_attachments => 'EmailJournalAttachment', employee => 'employee', exchangerate => 'exchangerate', finanzamt => 'finanzamt', @@ -207,6 +209,10 @@ sub get_package_names { return KIVITENDO => \%kivitendo_package_names; } +sub get_name_for_table { + return $kivitendo_package_names{ $_[0] }; +} + sub get_package_for_table { %kivitendo_tables_to_packages = map { ($_ => "SL::DB::" . camelify($kivitendo_package_names{$_})) } keys %kivitendo_package_names unless %kivitendo_tables_to_packages;