marei: remove Briefkopf.png

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index f57163178186575e4f313e96255a4556bbfbde2f..636eacd9801f0dadfdb5126ec5c09804c7a7a611 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1270,6 +1270,20 @@ sub get_formname_translation {
   return $formname_translations{$formname};
 }
 
   return $formname_translations{$formname};
 }
 

+sub get_cusordnumber_translation {
+  $main::lxdebug->enter_sub();
+  my ($self, $formname) = @_;
+
+  $formname ||= $self->{formname};
+
+  $self->{recipient_locale} ||=  Locale->lang_to_locale($self->{language});
+  local $::locale = Locale->new($self->{recipient_locale});
+
+
+  $main::lxdebug->leave_sub();
+  return $main::locale->text('Your Order');
+}
+

 sub get_number_prefix_for_type {
   $main::lxdebug->enter_sub();
   my ($self) = @_;
 sub get_number_prefix_for_type {
   $main::lxdebug->enter_sub();
   my ($self) = @_;


@@ -1345,6 +1359,10 @@ sub generate_email_subject {
     $subject .= " " . $self->{"${prefix}number"}
   }
 
     $subject .= " " . $self->{"${prefix}number"}
   }
 

+  if ($self->{cusordnumber}) {
+    $subject = $self->get_cusordnumber_translation() . ' ' . $self->{cusordnumber} . ' / ' . $subject;
+  }
+

   $main::lxdebug->leave_sub();
   return $subject;
 }
   $main::lxdebug->leave_sub();
   return $subject;
 }