SL::DB::Contact->formal_greeting: Feld cp_greeting gibt es nicht

Bei der Umstellung der Brieffunktion auf Template Toolkit wurde alter
Code, der $::form->{cp_greeting} verwendet hat, 1:1 umgesetzt. Aufgrund
eines Schreibfehlers in dem zum Testen verwendeten letter.tex wurde die
Funktion »formal_greeting« nie aufgerufen und daher nicht getestet.

diff --git a/SL/DB/Contact.pm b/SL/DB/Contact.pm
index 395fe2651111b097a9cadca6cc88e069ba98ed05..bed7e9cd6f4f0d7090fe2cb237c6b1f6bbadbcdb 100644 (file)
--- a/SL/DB/Contact.pm
+++ b/SL/DB/Contact.pm
@@ -48,7 +48,7 @@ sub full_name_dep {
 sub formal_greeting {
   my ($self) = @_;
   die 'not an accessor' if @_ > 1;
-  join ' ', grep $_, $self->cp_greeting, $self->cp_givenname, $self->cp_name;
+  join ' ', grep $_, $self->cp_title, $self->cp_givenname, $self->cp_name;
 }
 
 1;

diff --git a/templates/print/RB/letter.tex b/templates/print/RB/letter.tex
index bf1eab5697575cb3c34b34e1c120b2726b0d51a9..9657f0cce6e923f2cd723df72d047327fe63967a 100644 (file)
--- a/templates/print/RB/letter.tex
+++ b/templates/print/RB/letter.tex
@@ -29,7 +29,7 @@ $( KiviLatex.required_packages_for_html )$
 
   $( KiviLatex.filter(customer.name) )$
 
-  $( KiviLatex.filter(letter.contact.formar_greeting) )$
+  $( KiviLatex.filter(letter.contact.formal_greeting) )$
 
   $( KiviLatex.filter(customer.street) )$