summaryrefslogtreecommitdiff
path: root/poky/meta/recipes-devtools/perl/files/CVE-2023-31486-0002.patch
blob: e41e140cf907f8726804a157bba597bf6aa0760f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
commit a22785783b17cbaa28afaee4a024d81a1903701d
From: Stig Palmquist <git@stig.io>
Date:   Sun Jun 18 11:36:05 2023 +0200

    Fix incorrect env var name for verify_SSL default

    The variable to override the verify_SSL default differed slightly in the
    documentation from what was checked for in the code.

    This commit makes the code use `PERL_HTTP_TINY_SSL_INSECURE_BY_DEFAULT`
    as documented, instead of `PERL_HTTP_TINY_INSECURE_BY_DEFAULT` which was
    missing `SSL_`

Upstream-Status: Backport [https://github.com/chansen/p5-http-tiny/commit/a22785783b17cbaa28afaee4a024d81a1903701d]

Signed-off-by: Soumya <soumya.sambu@windriver.com>
---
diff --git a/lib/HTTP/Tiny.pm b/lib/HTTP/Tiny.pm
index bf455b6..7240b65 100644
--- a/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
+++ b/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm
@@ -149,7 +149,7 @@ sub _verify_SSL_default {
     my ($self) = @_;
     # Check if insecure default certificate verification behaviour has been
     # changed by the user by setting PERL_HTTP_TINY_SSL_INSECURE_BY_DEFAULT=1
-    return (($ENV{PERL_HTTP_TINY_INSECURE_BY_DEFAULT} || '') eq '1') ? 0 : 1;
+    return (($ENV{PERL_HTTP_TINY_SSL_INSECURE_BY_DEFAULT} || '') eq '1') ? 0 : 1;
 }

 sub _set_proxies {