X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/d8ac08282dad52789b8bea785e8cddae44085483..ada964d139eb652502bbdec96adf8634e49d8872:/SL/DB/Manager/AuthClient.pm

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;