Skip to content

Commit

Permalink
WIP
Browse files Browse the repository at this point in the history
  • Loading branch information
dgdavid committed Dec 28, 2020
1 parent e8ad689 commit 36694ef
Showing 1 changed file with 39 additions and 36 deletions.
75 changes: 39 additions & 36 deletions src/modules/VirtConfig.rb
Expand Up @@ -249,30 +249,33 @@ def ConfigureDom0()
abortmsg = _("The installation will be aborted.")

def Information
widgets = Frame(_("Choose Hypervisor(s) to install"),
HBox(
VBox(
Left(Label(_("Server: Minimal system to get a running Hypervisor"))),
Left(Label(_("Tools: Configure, manage and monitor virtual machines"))),
Left(Label(_("A disabled checkbox means the Hypervisor item has already been installed"))),
),
HSpacing(2),
),
)
Frame(
_("Choose Hypervisor(s) to install"),
MarginBox(1, 0.5,
VBox(
Left(Label(_("Server: Minimal system to get a running Hypervisor"))),
Left(Label(_("Tools: Configure, manage and monitor virtual machines"))),
Left(Label(_("A disabled checkbox means the Hypervisor item has already been installed"))),
),
),
)
end

def VMButtonBox
widgetB = ButtonBox(
PushButton(Id(:accept), Label.AcceptButton),
PushButton(Id(:cancel), Label.CancelButton),
)
ButtonBox(
PushButton(Id(:accept), Label.AcceptButton),
PushButton(Id(:cancel), Label.CancelButton),
)
end

def KVMDialog
widgetKVM = Frame(_("KVM Hypervisor"),
HBox(
Left(CheckBox(Id(:kvm_server), Opt(:key_F6), _("KVM server"))),
Left(CheckBox(Id(:kvm_tools), Opt(:key_F7), _("KVM tools"))),
),
)
Frame(
_("KVM Hypervisor"),
HBox(
Left(CheckBox(Id(:kvm_server), Opt(:key_F6), _("KVM server"))),
Left(CheckBox(Id(:kvm_tools), Opt(:key_F7), _("KVM tools"))),
),
)
end

# Generate a pop dialog to allow user selection of Xen or KVM
Expand All @@ -290,22 +293,22 @@ def KVMDialog
)
else
UI.OpenDialog(
HBox(
HSpacing(2),
VBox(
VSpacing(1),
Information(),
VSpacing(1),
Frame(_("Xen Hypervisor"),
HBox(
Left(CheckBox(Id(:xen_server), Opt(:key_F8), _("Xen server"))),
Left(CheckBox(Id(:xen_tools), Opt(:key_F9), _("Xen tools"))),
),
),
KVMDialog(),
VMButtonBox(),
),
),
MarginBox(2, 0,
VBox(
Information(),
VSpacing(1),
Frame(_("Xen Hypervisor"),
HBox(
Left(CheckBox(Id(:xen_server), Opt(:key_F8), _("Xen server"))),
Left(CheckBox(Id(:xen_tools), Opt(:key_F9), _("Xen tools"))),
),
),
VSpacing(1),
KVMDialog(),
VSpacing(1),
VMButtonBox()
)
)
)
end

Expand Down

0 comments on commit 36694ef

Please sign in to comment.