use strict;
+use List::Util qw(first);
use Rose::DB::Object::Helpers qw(as_tree);
use SL::Locale::String qw(t8);
return $self->create_zugferd_invoices;
}
+sub default_billing_address {
+ my $self = shift;
+
+ die 'not an accessor' if @_ > 1;
+ return first { $_->default_address } @{ $self->additional_billing_addresses };
+}
+
1;