Mailing List Archive

commit ca8f368a07fe2d219ec2d90b8ab67f3fc84d9ad4
Author: David Christensen <david@endpoint.com>
Date: Thu Jun 22 12:56:25 2017 -0500

Remove long-dead filehandle

lib/Vend/Interpolate.pm | 1 -
1 files changed, 0 insertions(+), 1 deletions(-)
---
diff --git a/lib/Vend/Interpolate.pm b/lib/Vend/Interpolate.pm
index 9e36da1..2b89b4e 100644
--- a/lib/Vend/Interpolate.pm
+++ b/lib/Vend/Interpolate.pm
@@ -2544,7 +2544,6 @@ sub tag_mail {
}

if (!$ok) {
- close MAIL;
$body = substr($body, 0, 2000) if length($body) > 2000;
return error_opt(
"Unable to send mail using %s\n%s",

_______________________________________________
interchange-cvs mailing list
interchange-cvs@icdevgroup.org
http://www.icdevgroup.org/mailman/listinfo/interchange-cvs