diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-09-20 14:26:54 +0200 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-09-20 14:26:54 +0200 |
| commit | 2b18247dc304c222a785e464b3327ab3b8d27db5 (patch) | |
| tree | 5416121def22533a70e3981c852f31e8121c60cd | |
| parent | 398297f678eb6dbff2b11d7aaac51caf493ef1ac (diff) | |
EFA: respect tls_insecure in _p mode
| -rw-r--r-- | lib/Travel/Status/DE/EFA.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index 6d3e92c..072ec3c 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -165,6 +165,7 @@ sub new { developer_mode => $opt{developer_mode}, efa_url => $opt{efa_url}, service => $opt{service}, + tls_insecure => $tls_insecure, strp_stopseq => DateTime::Format::Strptime->new( pattern => '%Y%m%d %H:%M', time_zone => $opt{time_zone}, @@ -363,6 +364,10 @@ sub post_with_cache_p { say ' cache miss'; } + if ( $self->{tls_insecure} ) { + $self->{ua}->insecure(1); + } + $self->{ua}->post_p( $url, form => $self->{post} )->then( sub { my ($tx) = @_; |