1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-21 00:25:50 +00:00

Update to 2.17 and

apply a patch to fix interaction with modern Filter.pm.

PR:			191730
Submitted by:	Ting-Wei Lan
This commit is contained in:
Anton Berezin 2014-08-01 12:51:23 +00:00
parent 35f367ed9f
commit 209c394d9a
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=363704
3 changed files with 19 additions and 4 deletions

View File

@ -2,10 +2,10 @@
# $FreeBSD$
PORTNAME= Switch
PORTVERSION= 2.16
PORTVERSION= 2.17
CATEGORIES= lang perl5
MASTER_SITES= CPAN
MASTER_SITE_SUBDIR= CPAN:RGARCIA
MASTER_SITE_SUBDIR= CPAN:CHORNY
PKGNAMEPREFIX= p5-
MAINTAINER= tobez@FreeBSD.org

View File

@ -1,2 +1,2 @@
SHA256 (Switch-2.16.tar.gz) = 308c8f27f295906778186f14c6291923905730b46ba879c3a68fff81c37df9d8
SIZE (Switch-2.16.tar.gz) = 13185
SHA256 (Switch-2.17.tar.gz) = 31354975140fe6235ac130a109496491ad33dd42f9c62189e23f49f75f936d75
SIZE (Switch-2.17.tar.gz) = 14490

View File

@ -0,0 +1,15 @@
--- Switch.pm 2014-08-01 14:47:54.000000000 +0200
+++ Switch.pm 2014-08-01 14:47:57.000000000 +0200
@@ -25,9 +25,11 @@ my ($Perl5, $Perl6) = (0,0);
sub import
{
+ my ($class) = @_;
+ my $self = bless {}, $class;
$fallthrough = grep /\bfallthrough\b/, @_;
$offset = (caller)[2]+1;
- filter_add({}) unless @_>1 && $_[1] eq 'noimport';
+ filter_add($self) unless @_>1 && $_[1] eq 'noimport';
my $pkg = caller;
no strict 'refs';
for ( qw( on_defined on_exists ) )