X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/841d44c00aae1166a0721e40dc2f9ffb7b9ac5b5..d32410ac096b:/SL/DB/Manager/AuthClient.pm?ds=inline

diff --git a/SL/DB/Manager/AuthClient.pm b/SL/DB/Manager/AuthClient.pm
index ccfb97eff..c5b45de95 100644
--- a/SL/DB/Manager/AuthClient.pm
+++ b/SL/DB/Manager/AuthClient.pm
@@ -17,4 +17,8 @@ sub _sort_spec {
            columns => { SIMPLE => 'ALL' } );
 }
 
+sub get_default {
+  return $_[0]->get_first(where => [ is_default => 1 ]);
+}
+
 1;