Skip site navigation (1)Skip section navigation (2)
Date:      Thu, 3 Nov 2005 12:45:37 +0100
From:      Christian Lackas <delta@lackas.net>
To:        Anton Berezin <tobez@FreeBSD.org>
Cc:        freebsd-ports-bugs@FreeBSD.org
Subject:   Re: ports/87674: update: devel/p5-File-Tail
Message-ID:  <20051103114537.GA49089@zel726.zel.kfa-juelich.de>
In-Reply-To: <200511031111.jA3BBa35002515@freefall.freebsd.org>
References:  <200511031111.jA3BBa35002515@freefall.freebsd.org>

next in thread | previous in thread | raw e-mail | index | archive | help
* Anton Berezin <tobez@FreeBSD.org> [051103 12:12]:

Hello Anton,

> It appears that the updated version does not pass tests with perl
> 5.005_03.  It also appears that plist is incorrect.  Could you
> investigate?
> http://www.freebsd.org/cgi/query-pr.cgi?pr=87674

I am sorry for the inconvenience. Please find here  a patch for the
pkg-plist and a patch (files/path-tail.pm) to fix the syntax error under
5.005_03 ('make test' now works here). I will also send the patch to the
software author.

--- pkg-plist.orig      Thu Nov  3 12:36:35 2005
+++ pkg-plist   Thu Nov  3 12:39:46 2005
@@ -1,8 +1,5 @@
 %%SITE_PERL%%/File/Tail.pm
-%%SITE_PERL%%/auto/File/Tail/autosplit.ix
 %%SITE_PERL%%/%%PERL_ARCH%%/auto/File/Tail/.packlist
 @dirrm %%SITE_PERL%%/%%PERL_ARCH%%/auto/File/Tail
-@dirrm %%SITE_PERL%%/auto/File/Tail
 @unexec rmdir %D/%%SITE_PERL%%/%%PERL_ARCH%%/auto/File 2>/dev/null || true
-@unexec rmdir %D/%%SITE_PERL%%/auto/File 2>/dev/null || true
 @unexec rmdir %D/%%SITE_PERL%%/File 2>/dev/null || true

diff -urN files.orig/patch-tail.pm files/patch-tail.pm
--- files.orig/patch-tail.pm    Thu Jan  1 01:00:00 1970
+++ files/patch-tail.pm Thu Nov  3 12:33:22 2005
@@ -0,0 +1,11 @@
+--- Tail.pm.debug.orig Thu Nov  3 12:32:53 2005
++++ Tail.pm.debug      Thu Nov  3 12:33:03 2005
+@@ -349,7 +349,7 @@
+
+     my $newname;
+     if ($oldhandle && $$object{'name_changes_callback'}) {
+-      $newname=$$object{'name_changes_callback'}();
++      $newname=$object->{'name_changes_callback'}->();
+     } else {
+       $newname=$object->input;
+     }


Cheers
 Christian




Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20051103114537.GA49089>