fixed error

This commit is contained in:
marcos.alconada 2019-10-07 11:21:16 +02:00
parent a9e8b1113e
commit 4c04b8f628
1 changed files with 6 additions and 7 deletions

View File

@ -1222,8 +1222,9 @@ sub pandora_execute_action ($$$$$$$$$;$) {
# Check for _module_graph_Xh_ macros
# Check for _module_graph_Xh_ macros and _module_graphth_Xh_
my $module_graph_list = {};
my $macro_regexp = "_modulegraph_24h_";
my $macro_regexp2 = "_modulegraphth_24h_";
my $macro_regexp = "_modulegraph_(\\d+)h_";
my $macro_regexp2 = "_modulegraphth_(\\d+)h_";
# API connection
my $ua = new LWP::UserAgent;
eval {
@ -1259,12 +1260,11 @@ sub pandora_execute_action ($$$$$$$$$;$) {
}
$params->{"other_mode"} = 'url_encode_separator_%7C';
if (! exists($module_graph_list->{$cid}) && defined $url) {
# Get the module graph image in base 64
my $response = $ua->post($url, $params);
if ($response->is_success) {
$module_graph_list->{$cid} = $response->decoded_content();
@ -6075,5 +6075,4 @@ L<DBI>, L<XML::Simple>, L<HTML::Entities>, L<Time::Local>, L<POSIX>, L<PandoraFM
Copyright (c) 2005-2011 Artica Soluciones Tecnologicas S.L
=cut
=cut