r39794 - in /branches/upstream/libemail-send-perl/current: Changes META.yml README lib/Email/Send.pm lib/Email/Send/NNTP.pm lib/Email/Send/Qmail.pm lib/Email/Send/SMTP.pm lib/Email/Send/Sendmail.pm lib/Email/Send/Test.pm t/sendmail.t

ansgar-guest at users.alioth.debian.org ansgar-guest at users.alioth.debian.org
Sun Jul 12 20:36:37 UTC 2009


Author: ansgar-guest
Date: Sun Jul 12 20:36:28 2009
New Revision: 39794

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39794
Log:
[svn-upgrade] Integrating new upstream version, libemail-send-perl (2.198)

Modified:
    branches/upstream/libemail-send-perl/current/Changes
    branches/upstream/libemail-send-perl/current/META.yml
    branches/upstream/libemail-send-perl/current/README
    branches/upstream/libemail-send-perl/current/lib/Email/Send.pm
    branches/upstream/libemail-send-perl/current/lib/Email/Send/NNTP.pm
    branches/upstream/libemail-send-perl/current/lib/Email/Send/Qmail.pm
    branches/upstream/libemail-send-perl/current/lib/Email/Send/SMTP.pm
    branches/upstream/libemail-send-perl/current/lib/Email/Send/Sendmail.pm
    branches/upstream/libemail-send-perl/current/lib/Email/Send/Test.pm
    branches/upstream/libemail-send-perl/current/t/sendmail.t

Modified: branches/upstream/libemail-send-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/Changes?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/Changes (original)
+++ branches/upstream/libemail-send-perl/current/Changes Sun Jul 12 20:36:28 2009
@@ -1,4 +1,8 @@
 Revision history for Email-Send
+
+2.198     2009-07-12
+          ** PLEASE CONSIDER USING EMAIL-SENDER INSTEAD **
+          fix the paths added in 2.195; thanks, ansgar from uni-heidelberg
 
 2.197     2009-06-13
           ** PLEASE CONSIDER USING EMAIL-SENDER INSTEAD **

Modified: branches/upstream/libemail-send-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/META.yml?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/META.yml (original)
+++ branches/upstream/libemail-send-perl/current/META.yml Sun Jul 12 20:36:28 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Email-Send
-version:            2.197
+version:            2.198
 abstract:           Simply Sending Email
 author:
     - Casey West <casey at geeknest.com>

Modified: branches/upstream/libemail-send-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/README?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/README (original)
+++ branches/upstream/libemail-send-perl/current/README Sun Jul 12 20:36:28 2009
@@ -2,7 +2,7 @@
     Email::Send - Simply Sending Email
 
 VERSION
-    2.197
+    2.198
 
 SYNOPSIS
       use Email::Send;

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send.pm Sun Jul 12 20:36:28 2009
@@ -2,7 +2,7 @@
 use strict;
 
 use vars qw[$VERSION];
-$VERSION   = '2.197';
+$VERSION   = '2.198';
 
 use Email::Simple;
 use Module::Pluggable

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send/NNTP.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send/NNTP.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send/NNTP.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send/NNTP.pm Sun Jul 12 20:36:28 2009
@@ -5,7 +5,7 @@
 use Net::NNTP;
 use Return::Value;
 
-$VERSION   = '2.197';
+$VERSION   = '2.198';
 
 sub is_available {
     return   eval { require Net::NNTP }

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send/Qmail.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send/Qmail.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send/Qmail.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send/Qmail.pm Sun Jul 12 20:36:28 2009
@@ -7,7 +7,7 @@
 
 use vars qw[$QMAIL $VERSION];
 $QMAIL   ||= q[qmail-inject];
-$VERSION   = '2.197';
+$VERSION   = '2.198';
 
 sub is_available {
     my $class = shift;

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send/SMTP.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send/SMTP.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send/SMTP.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send/SMTP.pm Sun Jul 12 20:36:28 2009
@@ -5,7 +5,7 @@
 use Email::Address;
 use Return::Value;
 
-$VERSION = '2.197';
+$VERSION = '2.198';
 
 sub is_available {
     my ($class, %args) = @_;

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send/Sendmail.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send/Sendmail.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send/Sendmail.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send/Sendmail.pm Sun Jul 12 20:36:28 2009
@@ -7,7 +7,7 @@
 
 use vars qw[$SENDMAIL $VERSION];
 
-$VERSION   = '2.197';
+$VERSION   = '2.198';
 
 sub is_available {
     my $class = shift;
@@ -25,8 +25,10 @@
     my $sendmail;
     for my $dir (
       File::Spec->path,
-      File::Spec->catfile('', qw(usr sbin sendmail)),
-      File::Spec->catfile('', qw(usr lib sendmail)),
+      ($ENV{PERL_EMAIL_SEND_SENDMAIL_NO_EXTRA_PATHS} ? () : (
+        File::Spec->catfile('', qw(usr sbin)),
+        File::Spec->catfile('', qw(usr lib)),
+      ))
     ) {
         if ( -x "$dir/sendmail" ) {
             $sendmail = "$dir/sendmail";

Modified: branches/upstream/libemail-send-perl/current/lib/Email/Send/Test.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/lib/Email/Send/Test.pm?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/lib/Email/Send/Test.pm (original)
+++ branches/upstream/libemail-send-perl/current/lib/Email/Send/Test.pm Sun Jul 12 20:36:28 2009
@@ -70,7 +70,7 @@
 
 use vars qw{$VERSION};
 BEGIN {
-	$VERSION = '2.197';
+	$VERSION = '2.198';
 }
 
 # No longer allow direct access to the array

Modified: branches/upstream/libemail-send-perl/current/t/sendmail.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-send-perl/current/t/sendmail.t?rev=39794&op=diff
==============================================================================
--- branches/upstream/libemail-send-perl/current/t/sendmail.t (original)
+++ branches/upstream/libemail-send-perl/current/t/sendmail.t Sun Jul 12 20:36:28 2009
@@ -15,6 +15,8 @@
 EOF
 
 {
+  undef $Email::Send::Sendmail::SENDMAIL;
+  local $ENV{PERL_EMAIL_SEND_SENDMAIL_NO_EXTRA_PATHS} = 1;
   local $ENV{PATH} = '';
   ok( Email::Send::Sendmail->is_available, 'Email::Send always is available' );
   my $msg = Email::Send::Sendmail->is_available;




More information about the Pkg-perl-cvs-commits mailing list