smeserver-vacation/contribs9/smeserver-vacation-1.1-bz6614-autodetect.html.patch

diff -Nur smeserver-vacation-1.1.old/root/usr/local/bin/vacation smeserver-vacation-1.1/root/usr/local/bin/vacation
--- smeserver-vacation-1.1.old/root/usr/local/bin/vacation      2017-01-16 16:44:03.999000000 -0500
+++ smeserver-vacation-1.1/root/usr/local/bin/vacation  2017-01-16 16:48:09.939000000 -0500
@@ -493,6 +493,8 @@
        exit(0) if ($no_msg_no_reply);
     }
 
+    my $type = ($vacation_msg =~ m/^<html/ && $vacation_msg =~ m/<\/html>/  ) ? 'html':'plain';
+
     $vacation_msg =~ s/\$SUBJECT/$subject/g;
 
     open(MAILPROG, "| $mailprog");
@@ -500,7 +502,7 @@
     print MAILPROG << "EOF";
 To: $sender
 Precedence: junk
-Content-Type: text/plain; charset="UTF-8"
+Content-Type: text/$type; charset="UTF-8"
 EOF
 
     print MAILPROG $vacation_msg;
1	unnilennium	1.1	diff -Nur smeserver-vacation-1.1.old/root/usr/local/bin/vacation smeserver-vacation-1.1/root/usr/local/bin/vacation
2			--- smeserver-vacation-1.1.old/root/usr/local/bin/vacation 2017-01-16 16:44:03.999000000 -0500
3			+++ smeserver-vacation-1.1/root/usr/local/bin/vacation 2017-01-16 16:48:09.939000000 -0500
4			@@ -493,6 +493,8 @@
5			exit(0) if ($no_msg_no_reply);
6			}
7
8			+ my $type = ($vacation_msg =~ m/^<html/ && $vacation_msg =~ m/<\/html>/ ) ? 'html':'plain';
9			+
10			$vacation_msg =~ s/\$SUBJECT/$subject/g;
11
12			open(MAILPROG, "\| $mailprog");
13			@@ -500,7 +502,7 @@
14			print MAILPROG << "EOF";
15			To: $sender
16			Precedence: junk
17			-Content-Type: text/plain; charset="UTF-8"
18			+Content-Type: text/$type; charset="UTF-8"
19			EOF
20
21			print MAILPROG $vacation_msg;