diff options
| author | skv <skv@FreeBSD.org> | 2009-01-23 01:45:15 +0800 |
|---|---|---|
| committer | skv <skv@FreeBSD.org> | 2009-01-23 01:45:15 +0800 |
| commit | 4537a0410a68f13816ee3e495ec490bf64108134 (patch) | |
| tree | aea77e1c00c6237d36270d50aa6a6a83786be4ca /devel/p5-IO-Prompt | |
| parent | 393135ba217d1717177766c16ef9801950427b06 (diff) | |
| download | freebsd-ports-gnome-4537a0410a68f13816ee3e495ec490bf64108134.tar.gz freebsd-ports-gnome-4537a0410a68f13816ee3e495ec490bf64108134.tar.zst freebsd-ports-gnome-4537a0410a68f13816ee3e495ec490bf64108134.zip | |
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
Diffstat (limited to 'devel/p5-IO-Prompt')
| -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, %$_; + } |