Add the patch
This commit is contained in:
parent
e47208b70c
commit
c689fed5da
1
.gitignore
vendored
1
.gitignore
vendored
@ -3,4 +3,3 @@
|
||||
/Text-Balanced-2.05.tar.gz
|
||||
/Text-Balanced-2.05_01.tar.gz
|
||||
/Text-Balanced-2.06.tar.gz
|
||||
/Text-Balanced-2.06-Fix-undefined-unkpos.patch
|
||||
|
||||
25
Text-Balanced-2.06-Fix-undefined-unkpos.patch
Normal file
25
Text-Balanced-2.06-Fix-undefined-unkpos.patch
Normal file
@ -0,0 +1,25 @@
|
||||
From 5c87f4b673edad87a64044e7e4d8c3e6776c7c4d Mon Sep 17 00:00:00 2001
|
||||
From: =?UTF-8?q?Michal=20Josef=20=C5=A0pa=C4=8Dek?=
|
||||
<michal.josef.spacek@gmail.com>
|
||||
Date: Thu, 23 Feb 2023 19:12:30 +0100
|
||||
Subject: [PATCH] Fix undefined $unkpos
|
||||
|
||||
RT#146697
|
||||
---
|
||||
lib/Text/Balanced.pm | 3 ++-
|
||||
1 file changed, 2 insertions(+), 1 deletion(-)
|
||||
|
||||
diff --git a/lib/Text/Balanced.pm b/lib/Text/Balanced.pm
|
||||
index 960609c..aa87898 100644
|
||||
--- a/lib/Text/Balanced.pm
|
||||
+++ b/lib/Text/Balanced.pm
|
||||
@@ -1005,7 +1005,8 @@ sub extract_multiple (;$$$$) # ($text, $functions_ref, $max_fields, $ignoreun
|
||||
{
|
||||
$unkpos = pos($$textref)-1
|
||||
unless $igunk || defined $unkpos;
|
||||
- _update_patvalid($textref, substr $$textref, $unkpos, pos($$textref)-$unkpos);
|
||||
+ _update_patvalid($textref, substr $$textref, defined $unkpos ? $unkpos : 0,
|
||||
+ pos($$textref) - (defined $unkpos ? $unkpos : 0));
|
||||
}
|
||||
}
|
||||
|
||||
2
sources
2
sources
@ -1 +1 @@
|
||||
SHA512 (Text-Balanced-2.06-Fix-undefined-unkpos.patch) = 659e85535064e4cb81466ca2edd08df69cfb6803aca04437cc9bce942c3249a4aa15191b27b572f90955b8520a397cc329723ae5d32f32327441f0604949e3b5
|
||||
SHA512 (Text-Balanced-2.06.tar.gz) = 17596fb86bb5918390a2a9585dd2ec5312a776ac4e2e28617efe311269f50534e35741c6c4a9162e00b19d6a47f0fe1afa7a65c3861bdcb5412bcdcf5463df62
|
||||
|
||||
Loading…
Reference in New Issue
Block a user