X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a87694dc525b4eabff11029f1e5401621e2bd3bc..35cf7c7029b4aa69eb9d02c7533d1a15aafb118b:/SL/DB/Helper/Mappings.pm

diff --git a/SL/DB/Helper/Mappings.pm b/SL/DB/Helper/Mappings.pm
index 31ae7b699..709e881ef 100644
--- a/SL/DB/Helper/Mappings.pm
+++ b/SL/DB/Helper/Mappings.pm
@@ -207,6 +207,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;