michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 14:13:29 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Get rid of local

Browse Source
This commit is contained in:
Jamie Cameron
2009-02-27 00:39:40 +00:00
parent cd2c80f155
commit 706db74fca
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
web-lib.pl
View File

@@ -71,15 +71,15 @@ Returns the unique elements of some array, passed as its parameters.
=cut
sub unique
{
local(%found, @rv, $e);
foreach $e (@_) {
my (%found, @rv);
foreach my $e (@_) {
if (!$found{$e}++) { push(@rv, $e); }
}
return @rv;
}
if (!$done_web_lib_funcs) {
local $script = -r '../web-lib-funcs.pl' ? '../web-lib-funcs.pl'
my $script = -r '../web-lib-funcs.pl' ? '../web-lib-funcs.pl'
: 'web-lib-funcs.pl';
do $script;
}