r25349 - in /branches/upstream/libemail-filter-perl/current: Changes META.yml lib/Email/Filter.pm
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Fri Sep 19 12:13:19 UTC 2008
Author: ansgar-guest
Date: Fri Sep 19 12:13:15 2008
New Revision: 25349
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=25349
Log:
[svn-upgrade] Integrating new upstream version, libemail-filter-perl (1.032)
Modified:
branches/upstream/libemail-filter-perl/current/Changes
branches/upstream/libemail-filter-perl/current/META.yml
branches/upstream/libemail-filter-perl/current/lib/Email/Filter.pm
Modified: branches/upstream/libemail-filter-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-filter-perl/current/Changes?rev=25349&op=diff
==============================================================================
--- branches/upstream/libemail-filter-perl/current/Changes (original)
+++ branches/upstream/libemail-filter-perl/current/Changes Fri Sep 19 12:13:15 2008
@@ -1,4 +1,7 @@
Changes file for Email::Filter
+
+1.032 2008-09-14
+ attempt to address https://rt.cpan.org/Ticket/Display.html?id=31018
1.031 2007-03-22
packaging improvements
Modified: branches/upstream/libemail-filter-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-filter-perl/current/META.yml?rev=25349&op=diff
==============================================================================
--- branches/upstream/libemail-filter-perl/current/META.yml (original)
+++ branches/upstream/libemail-filter-perl/current/META.yml Fri Sep 19 12:13:15 2008
@@ -1,9 +1,10 @@
--- #YAML:1.0
name: Email-Filter
-version: 1.031
+version: 1.032
abstract: ~
license: perl
-generated_by: ExtUtils::MakeMaker version 6.32
+author: ~
+generated_by: ExtUtils::MakeMaker version 6.44
distribution_type: module
requires:
Class::Trigger: 0.08
@@ -12,5 +13,5 @@
IPC::Run: 0.77
Test::More: 0.47
meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.2.html
- version: 1.2
+ url: http://module-build.sourceforge.net/META-spec-v1.3.html
+ version: 1.3
Modified: branches/upstream/libemail-filter-perl/current/lib/Email/Filter.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libemail-filter-perl/current/lib/Email/Filter.pm?rev=25349&op=diff
==============================================================================
--- branches/upstream/libemail-filter-perl/current/lib/Email/Filter.pm (original)
+++ branches/upstream/libemail-filter-perl/current/lib/Email/Filter.pm Fri Sep 19 12:13:15 2008
@@ -10,7 +10,7 @@
use constant TEMPFAIL => 75;
use constant REJECTED => 100;
-$Email::Filter::VERSION = "1.031";
+$Email::Filter::VERSION = "1.032";
=head1 NAME
@@ -84,8 +84,10 @@
sub fail_gracefully {
my $self = shift;
- if ($self->{emergency} and $self->accept($self->{emergency})) {
- $self->done_ok; # That worked.
+ our $FAILING_GRACEFULLY;
+ if ($self->{emergency} and ! $FAILING_GRACEFULLY) {
+ local $FAILING_GRACEFULLY = 1;
+ $self->done_ok if $self->accept($self->{emergency});
}
$self->fail_badly;
}
More information about the Pkg-perl-cvs-commits
mailing list