diff options
| author | Sergey Skvortsov <skv@FreeBSD.org> | 2009-01-22 17:45:15 +0000 |
|---|---|---|
| committer | Sergey Skvortsov <skv@FreeBSD.org> | 2009-01-22 17:45:15 +0000 |
| commit | 73f3ace03432846807a9c7ae10053ae3f0372866 (patch) | |
| tree | 12a13f9c3e5151f6082ef6ab2f824624c3a7779d | |
| parent | - Mark BROKEN after lang/guile update (diff) | |
Fix issue "Use of uninitialized value $_ in pattern match (m//)".
PR: ports/130829
Submitted by: skv
Approved by: lth (maintainer)
Bug: https://rt.cpan.org/Ticket/Display.html?id=42681
| -rw-r--r-- | devel/p5-IO-Prompt/Makefile | 1 | ||||
| -rw-r--r-- | devel/p5-IO-Prompt/files/patch-Prompt.pm | 10 |
2 files changed, 11 insertions, 0 deletions
diff --git a/devel/p5-IO-Prompt/Makefile b/devel/p5-IO-Prompt/Makefile index 738d3482a410..1523600865b9 100644 --- a/devel/p5-IO-Prompt/Makefile +++ b/devel/p5-IO-Prompt/Makefile @@ -8,6 +8,7 @@ PORTNAME= IO-Prompt PORTVERSION= 0.99.4 DISTVERSIONPREFIX= v +PORTREVISION= 1 CATEGORIES= devel perl5 MASTER_SITES= CPAN PKGNAMEPREFIX= p5- diff --git a/devel/p5-IO-Prompt/files/patch-Prompt.pm b/devel/p5-IO-Prompt/files/patch-Prompt.pm new file mode 100644 index 000000000000..13b7f037dcb4 --- /dev/null +++ b/devel/p5-IO-Prompt/files/patch-Prompt.pm @@ -0,0 +1,10 @@ +--- Prompt.pm ++++ Prompt.pm +@@ -88,6 +88,7 @@ + @data = map { $flags_alias{$_} || $_ } @data; + for (my $i = 0 ; $i < @data ; $i++) { + local *_ = \($data[$i]); ++ next unless defined $_; + if (ref eq 'HASH') { + splice @data, $i + 1, 0, %$_; + } |