* Fixed a bug in anvil-provision-server wasn't loading the available OS list when provisioning servers. The should resolve issue #296.

Signed-off-by: digimer <mkelly@alteeve.ca>
main
digimer 2 years ago
parent d88fde7733
commit 695b274d78
  1. 4
      tools/anvil-manage-storage-groups
  2. 5
      tools/anvil-provision-server

@ -8,6 +8,10 @@
# 0 = Normal exit. # 0 = Normal exit.
# 1 = Any problem that causes an early exit. # 1 = Any problem that causes an early exit.
# #
# Examples;
# - TODO: Write the man page!
# - anvil-manage-storage-groups -vv --log-secure --anvil mk-anvil-07 --rename --group "Storage group 2" --new-name "HDD Group 1"
# - anvil-manage-storage-groups -vv --log-secure --anvil mk-anvil-07 --add --group "HDD Group 1" --member xidRiS-KT4K-cmVN-MRbK-tI2c-jhK6-VCCLau
use strict; use strict;
use warnings; use warnings;

@ -2741,7 +2741,7 @@ sub interactive_ask_server_os
} }
} }
$anvil->Get->virsh_list_os({debug => 2}); $anvil->Get->virsh_list_os();
foreach my $os_code (split/,/, $anvil->data->{sys}{servers}{os_short_list}) foreach my $os_code (split/,/, $anvil->data->{sys}{servers}{os_short_list})
{ {
$os_code =~ s/ //g; $os_code =~ s/ //g;
@ -2841,7 +2841,8 @@ sub interactive_ask_server_confirm
$anvil->Database->get_anvils(); $anvil->Database->get_anvils();
$anvil->Database->get_files(); $anvil->Database->get_files();
$anvil->Database->get_file_locations(); $anvil->Database->get_file_locations();
$anvil->Get->virsh_list_os();
$anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => 2, list => { $anvil->Log->variables({source => $THIS_FILE, line => __LINE__, level => 2, list => {
"new_server::anvil_uuid" => $anvil->data->{new_server}{anvil_uuid}, "new_server::anvil_uuid" => $anvil->data->{new_server}{anvil_uuid},
"switches::ci-test" => $anvil->data->{switches}{'ci-test'}, "switches::ci-test" => $anvil->data->{switches}{'ci-test'},

Loading…
Cancel
Save