Commit 471e2e72 authored by Leigh Stoller's avatar Leigh Stoller

Image aliases cannot be mfs() ... Add global() to image aliases too.

parent d23b535f
......@@ -1418,6 +1418,7 @@ sub uuid($) { return $_[0]->{'ALIAS'}->{'uuid'}; }
sub imagelist($) { return values(%{ $_[0]->{'IMAGES'} }); }
sub isImageAlias($) { return 1; }
sub IsGeneric($) { return 0; }
sub mfs($) { return 0; }
sub path($) { return undef; }
#
......@@ -1626,6 +1627,19 @@ sub shared($)
$self->ImageIterate($coderef);
return $shared;
}
# All images have to be global.
sub global($)
{
my ($self) = @_;
my $global = 1;
my $coderef = sub {
$global = 0
if (!$_[0]->global());
return 0;
};
$self->ImageIterate($coderef);
return $global;
}
#
# Get the combined type list.
......
Markdown is supported
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