X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FRecordTemplate.pm;h=1360c9576b728073739fb9ade8aaac152e7b96a7;hb=d7680dd2d045638fc4a1925406e0b7bc4cf1cdcf;hp=f7cad09ef9b4300e00f840515079800c91958e03;hpb=499a130a2dff9761167722b9f3b68a52343860a7;p=kivitendo-erp.git

diff --git a/SL/DB/RecordTemplate.pm b/SL/DB/RecordTemplate.pm
index f7cad09ef..1360c9576 100644
--- a/SL/DB/RecordTemplate.pm
+++ b/SL/DB/RecordTemplate.pm
@@ -3,6 +3,7 @@ package SL::DB::RecordTemplate;
 use strict;
 
 use DateTime::Format::Strptime;
+use List::Util qw(first);
 
 use SL::DB::MetaSetup::RecordTemplate;
 use SL::DB::Manager::RecordTemplate;
@@ -112,6 +113,12 @@ sub substitute_variables {
   }
 }
 
+sub template_name_to_use {
+  my ($self, @names) = @_;
+
+  return first { ($_ // '') ne '' } (@names, $self->template_name, $::locale->text('unnamed record template'));
+}
+
 1;
 __END__