diff options
-rw-r--r-- | lib/Sietima/Role/Headers.pm | 2 | ||||
-rw-r--r-- | t/tests/sietima/role/headers.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/Sietima/Role/Headers.pm b/lib/Sietima/Role/Headers.pm index 92a24f7..a1aa566 100644 --- a/lib/Sietima/Role/Headers.pm +++ b/lib/Sietima/Role/Headers.pm @@ -80,7 +80,7 @@ sub _add_headers_to($self,$message) { $mail->header_str_set( $header_name => try { sprintf '<mailto:%s>',$address->address - } catch { "$address" }, + } catch { "<$address>" }, ); } return; diff --git a/t/tests/sietima/role/headers.t b/t/tests/sietima/role/headers.t index 3052781..9f3e664 100644 --- a/t/tests/sietima/role/headers.t +++ b/t/tests/sietima/role/headers.t @@ -36,7 +36,7 @@ subtest 'list headers should be added' => sub { field 'List-Owner' => '<mailto:owner@example.com>'; field 'List-Post' => '<mailto:sietima-test@list.example.com>'; field 'List-Test1' => '<mailto:someone@example.com>'; - field 'List-Test-2' => 'http://test.example.com'; + field 'List-Test-2' => '<http://test.example.com>'; field 'Date' => D(); field 'MIME-Version' => D(); |