File: remove_extra_newline.patch

package info (click to toggle)
libmime-lite-perl 3.033-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 660 kB
  • sloc: perl: 1,848; makefile: 9
file content (26 lines) | stat: -rw-r--r-- 687 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Description: remove extra newline in MIME structure
 MUA from MS will barf at the signature when wrapped in SMIME
Origin: https://rt.cpan.org/Public/Bug/Display.html?id=63253
Last-Update: 2019-12-04
---
--- a/lib/MIME/Lite.pm
+++ b/lib/MIME/Lite.pm
@@ -2194,7 +2194,7 @@
         }
 
         ### Epilogue:
-        $out->print("\n--$boundary--\n\n");
+        $out->print("\n--$boundary--\n");
     } elsif ( $type =~ m{^message/} ) {
         my @parts = @{ $self->{Parts} };
 
--- a/t/types.t
+++ b/t/types.t
@@ -65,7 +65,6 @@
 
 This isn't really html. We are only checking the filename silly.
 --_----------=_0--
-
 EOFEXPECT
 
 is($ret, $expect, "we got the message we expected");