[eqemu_server.pl] Remove non-working fetch_latest_windows_binaries() (#2445)

This commit is contained in:
Chris Miles 2022-09-25 12:00:33 -05:00 committed by GitHub
parent 78a9de124e
commit c826d3b4e9
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1099,7 +1099,7 @@ sub show_menu_prompt
$dc = 1;
}
elsif ($input eq "windows_server_download") {
fetch_latest_windows_binaries();
fetch_latest_windows_appveyor();
$dc = 1;
}
elsif ($input eq "windows_server_latest") {
@ -1613,33 +1613,6 @@ sub fetch_latest_windows_appveyor
rmtree('updates_staged');
}
sub fetch_latest_windows_binaries
{
print "[Update] Fetching Latest Windows Binaries... \n";
get_remote_file($install_repository_request_url . "master_windows_build.zip",
"updates_staged/master_windows_build.zip",
1
);
print "[Update] Fetched Latest Windows Binaries... \n";
print "[Update] Extracting... --- \n";
unzip('updates_staged/master_windows_build.zip', 'updates_staged/binaries/');
my @files;
my $start_dir = "updates_staged/binaries";
find(
sub { push @files, $File::Find::name unless -d; },
$start_dir
);
for my $file (@files) {
my $destination_file = $file;
$destination_file =~ s/updates_staged\/binaries\///g;
print "[Update] Installing [" . $bin_dir . $destination_file . "]\n";
copy_file($file, $bin_dir . $destination_file);
}
print "[Update] Done\n";
rmtree('updates_staged');
}
sub fetch_latest_windows_appveyor_bots
{
print "[Update] Fetching Latest Windows Binaries with Bots (unstable) from Appveyor... \n";