r3336 - in /packages/libemail-filter-perl/trunk: CHANGES MANIFEST META.yml README debian/changelog lib/Email/Filter.pm t/pod-coverage.t t/pod.t

ntyni-guest at users.alioth.debian.org ntyni-guest at users.alioth.debian.org
Thu Jul 27 19:54:22 UTC 2006


Author: ntyni-guest
Date: Thu Jul 27 19:54:21 2006
New Revision: 3336

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=3336
Log:
svn-upgrade to 1.03

Added:
    packages/libemail-filter-perl/trunk/t/pod-coverage.t
      - copied unchanged from r3335, packages/libemail-filter-perl/branches/upstream/current/t/pod-coverage.t
    packages/libemail-filter-perl/trunk/t/pod.t
      - copied unchanged from r3335, packages/libemail-filter-perl/branches/upstream/current/t/pod.t
Modified:
    packages/libemail-filter-perl/trunk/CHANGES
    packages/libemail-filter-perl/trunk/MANIFEST
    packages/libemail-filter-perl/trunk/META.yml
    packages/libemail-filter-perl/trunk/README
    packages/libemail-filter-perl/trunk/debian/changelog
    packages/libemail-filter-perl/trunk/lib/Email/Filter.pm

Modified: packages/libemail-filter-perl/trunk/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/CHANGES?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/CHANGES (original)
+++ packages/libemail-filter-perl/trunk/CHANGES Thu Jul 27 19:54:21 2006
@@ -1,4 +1,8 @@
 Changes file for Email::Filter
+
+1.03    2006-07-21
+
+  - fix link to emailproject.perl.org
 
 1.02    2004-11-06
 

Modified: packages/libemail-filter-perl/trunk/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/MANIFEST?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/MANIFEST (original)
+++ packages/libemail-filter-perl/trunk/MANIFEST Thu Jul 27 19:54:21 2006
@@ -3,7 +3,9 @@
 Makefile.PL
 MANIFEST			This list of files
 MANIFEST.SKIP
-META.yml
 README
 t/Email-Filter.t
 t/josey-nofold
+t/pod-coverage.t
+t/pod.t
+META.yml                                 Module meta-data (added by MakeMaker)

Modified: packages/libemail-filter-perl/trunk/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/META.yml?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/META.yml (original)
+++ packages/libemail-filter-perl/trunk/META.yml Thu Jul 27 19:54:21 2006
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Email-Filter
-version:      1.02
+version:      1.03
 version_from: lib/Email/Filter.pm
 installdirs:  site
 requires:
@@ -12,4 +12,4 @@
     Test::More:                    0.47
 
 distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+generated_by: ExtUtils::MakeMaker version 6.30

Modified: packages/libemail-filter-perl/trunk/README
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/README?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/README (original)
+++ packages/libemail-filter-perl/trunk/README Thu Jul 27 19:54:21 2006
@@ -140,17 +140,18 @@
     This calls the "reject" trigger. "exit" has no effect here.
 
   pipe
-        $mail->pipe('sendmail foo at bar.com');
+        $mail->pipe(qw[sendmail foo\@bar.com]);
 
     Pipes the mail to an external program, returning the standard output
-    from that program if "exit" has been set to false. This allows you to do
-    things like
+    from that program if "exit" has been set to false. The program and each
+    of its arguments must be supplied in a list. This allows you to do
+    things like:
 
         $mail->exit(0);
         $mail->simple(Email::Simple->new($mail->pipe("spamassassin")));
         $mail->exit(1);
 
-    in the absence of decent "Mail::SpamAssassin" support. (Coming soon...)
+    in the absence of decent "Mail::SpamAssassin" support.
 
     If the program returns a non-zero exit code, the behaviour is dependent
     on the status of the "exit" flag. If this flag is set to true (the
@@ -170,5 +171,5 @@
     Simon Cozens, "simon at cpan.org"
 
 SEE ALSO
-    http://pep,kwiki.org
+    http://emailproject.perl.org/wiki/Email::Filter
 

Modified: packages/libemail-filter-perl/trunk/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/debian/changelog?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/debian/changelog (original)
+++ packages/libemail-filter-perl/trunk/debian/changelog Thu Jul 27 19:54:21 2006
@@ -1,3 +1,9 @@
+libemail-filter-perl (1.03-1) UNRELEASED; urgency=low
+
+  * (NOT RELEASED YET) New upstream release
+
+ -- Niko Tyni <ntyni at iki.fi>  Thu, 27 Jul 2006 22:54:56 +0300
+
 libemail-filter-perl (1.02-2) unstable; urgency=low
 
   * debian/control: 

Modified: packages/libemail-filter-perl/trunk/lib/Email/Filter.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libemail-filter-perl/trunk/lib/Email/Filter.pm?rev=3336&op=diff
==============================================================================
--- packages/libemail-filter-perl/trunk/lib/Email/Filter.pm (original)
+++ packages/libemail-filter-perl/trunk/lib/Email/Filter.pm Thu Jul 27 19:54:21 2006
@@ -1,5 +1,4 @@
 package Email::Filter;
-# $Id: Filter.pm,v 1.7 2004/11/06 19:00:31 cwest Exp $
 use strict;
 
 use Email::LocalDelivery;
@@ -11,7 +10,7 @@
 use constant TEMPFAIL  => 75;
 use constant REJECTED  => 100;
 
-$Email::Filter::VERSION = "1.02";
+$Email::Filter::VERSION = "1.03";
 
 =head1 NAME
 
@@ -142,10 +141,10 @@
     my $data;
 
     {
-    local $/;
-    $data = exists $stuff{data} ? $stuff{data} : scalar <STDIN>;
-    # shave any leading From_ line
-    $data =~ s/^From .*?[\x0a\x0d]//
+      local $/;
+      $data = exists $stuff{data} ? $stuff{data} : scalar <STDIN>;
+      # shave any leading From_ line
+      $data =~ s/^From .*?[\x0a\x0d]//
     }
 
     my $obj = bless {
@@ -330,6 +329,12 @@
     return;
 }
 
+=head1 PERL EMAIL PROJECT
+
+This module is maintained by the Perl Email Project
+
+  L<http://emailproject.perl.org/wiki/Email::Filter>
+
 =head1 COPYRIGHT
 
     Copyright 2003, Simon Cozens <simon at cpan.org>
@@ -345,10 +350,6 @@
 
 Simon Cozens, C<simon at cpan.org>
 
-=head1 SEE ALSO
-
-http://pep,kwiki.org
-
 =cut
 
 1;




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