michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-20 08:40:24 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Fix to favour lexically scoped variable over global

Browse Source
This commit is contained in:
Ilia Ross
2024-06-01 15:31:50 +03:00
parent e302b706ec
commit a0f6dd935c
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
webmincron/webmincron-lib.pl
View File

@@ -6,11 +6,11 @@ Functions for creating and listing Webmin scheduled functions.
BEGIN { push(@INC, ".."); };
use WebminCore;
use feature 'state';
&init_config();
$webmin_crons_directory = "$module_config_directory/crons";
@special_modes = ( 'hourly', 'daily', 'weekly', 'monthly', 'yearly' );
$save_webmin_cron_count = 0;
=head2 list_webmin_crons
@@ -73,11 +73,12 @@ Create or update a webmin cron function. Also locks the file being written to.
sub save_webmin_cron
{
my ($cron) = @_;
state $cnt = 0;
if (!-d $webmin_crons_directory) {
&make_dir($webmin_crons_directory, 0700);
}
if (!$cron->{'id'}) {
$cron->{'id'} = time().'_'.$$.'_'.($save_webmin_cron_count++);
$cron->{'id'} = time().'_'.$$.'_'.($cnt++);
}
my $file = "$webmin_crons_directory/$cron->{'id'}.cron";
my %wcron = %$cron;