Dzil-build release 1.0.5 (from ad3b210 on master)v1.0.5

1 files changed, 44 insertions, 16 deletions

diff --git a/lib/Sietima/Role/WithPostAddress.pm b/lib/Sietima/Role/WithPostAddress.pm
index 333c5e3..0e22e52 100644
--- a/lib/Sietima/Role/WithPostAddress.pm
+++ b/lib/Sietima/Role/WithPostAddress.pm
@@ -4,9 +4,40 @@ use Sietima::Policy;
 use Sietima::Types qw(Address AddressFromStr);
 use namespace::clean;
 
-# VERSION
+our $VERSION = '1.0.5'; # VERSION
 # ABSTRACT: role for lists with a posting address
 
+
+has post_address => (
+    is => 'lazy',
+    isa => Address,
+    coerce => AddressFromStr,
+);
+sub _build_post_address($self) { $self->return_path }
+
+around list_addresses => sub($orig,$self) {
+    return +{
+        $self->$orig->%*,
+        post => $self->post_address,
+    };
+};
+
+1;
+
+__END__
+
+=pod
+
+=encoding UTF-8
+
+=head1 NAME
+
+Sietima::Role::WithPostAddress - role for lists with a posting address
+
+=head1 VERSION
+
+version 1.0.5
+
 =head1 SYNOPSIS
 
   my $sietima = Sietima->with_traits('WithPostAddress')->new({
@@ -24,26 +55,23 @@ On its own, this role is not very useful, but other roles (like L<<
 C<ReplyTo>|Sietima::Role::ReplyTo >>) can have uses for a post
 address.
 
-=attr C<post_address>
+=head1 ATTRIBUTES
+
+=head2 C<post_address>
 
 An L<< C<Email::Address> >> object, defaults to the value of the L<<
 C<return_path>|Sietima/return_path >> attribute. This is the address
 that the mailing list receives messages at.
 
-=cut
+=head1 AUTHOR
 
-has post_address => (
-    is => 'lazy',
-    isa => Address,
-    coerce => AddressFromStr,
-);
-sub _build_post_address($self) { $self->return_path }
+Gianni Ceccarelli <dakkar@thenautilus.net>
 
-around list_addresses => sub($orig,$self) {
-    return +{
-        $self->$orig->%*,
-        post => $self->post_address,
-    };
-};
+=head1 COPYRIGHT AND LICENSE
 
-1;
+This software is copyright (c) 2017 by Gianni Ceccarelli <dakkar@thenautilus.net>.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+=cut