kalipso/racalmas
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixup! events.pm: fix listen_key

Browse Source
This commit is contained in:
Milan
2024-07-26 21:00:00 +02:00
parent b0a56d7dfc
commit 533f7c30c2
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/calcms/events.pm
View File

@@ -533,7 +533,7 @@ sub get_listen_key($$){
my $archive_dir = $config->{locations}->{local_archive_dir}; my $archive_dir = $config->{locations}->{local_archive_dir};
my $archive_url = $config->{locations}->{listen_url}; my $archive_url = $config->{locations}->{listen_url};
return $event->{listen_url} = $archive_url . '/' . $event->{listen_key} if return $event->{listen_url} = $archive_url . '/' . $event->{listen_key} if
defined $event->{listen_key} and -l $archive_dir .'/'. $event->{listen_key}; defined $event->{listen_key} && -l $archive_dir .'/'. $event->{listen_key};
set_listen_key($config, $event) unless $event->{listen_key}; set_listen_key($config, $event) unless $event->{listen_key};
} }