Merge branch 'jk/send-email-ssl-errors' into maint

Improve error reporting when SMTP TLS fails. * jk/send-email-ssl-errors: send-email: enable SSL level 1 debug output
git-mirror · Jan 4, 2016 · 06b5c93 · 06b5c93
2 parents 34872f0 + 9d60524
commit 06b5c93
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/git-send-email.perl b/git-send-email.perl
@@ -1318,6 +1318,13 @@ sub send_message {
 			require Net::SMTP::SSL;
 			$smtp_domain ||= maildomain();
 			require IO::Socket::SSL;
+
+			# Suppress "variable accessed once" warning.
+			{
+				no warnings 'once';
+				$IO::Socket::SSL::DEBUG = 1;
+			}
+
 			# Net::SMTP::SSL->new() does not forward any SSL options
 			IO::Socket::SSL::set_client_defaults(
 				ssl_verify_params());