Commit 06ce3dcf authored by Francesc Guasch's avatar Francesc Guasch
Browse files

[#85] returns if a domain is hibernated

parent b35f3ed9
......@@ -34,6 +34,7 @@ requires 'remove';
requires 'display';
requires 'is_active';
requires 'is_hibernated';
requires 'is_paused';
requires 'start';
requires 'shutdown';
......
......@@ -568,6 +568,17 @@ sub resume {
}
=head2 is_hibernated
Returns if the domain has a managed saved state.
=cut
sub is_hibernated {
my $self = shift;
return $self->domain->has_managed_save_image;
}
=head2 is_paused
Returns if the domain is paused
......
......@@ -87,6 +87,8 @@ sub remove {
$self->remove_disks();
}
sub is_hibernated { return 0 }
sub is_paused {
my $self = shift;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment