snapshot list: include current position

This commit is contained in:
Dietmar Maurer 2012-09-11 08:33:20 +02:00
parent 7b2257a8b5
commit 0ea6bc6943

View File

@ -1918,7 +1918,16 @@ __PACKAGE__->register_method({
my $res = [];
foreach my $name (keys %$snaphash) {
push @$res, { name => $name };
my $d = $snaphash->{$name};
my $item = { name => $name, description => $d->{description} };
$item->{parent} = $d->{parent} if $d->{parent};
push @$res, $item;
}
if ($conf->{parent}) {
push @$res, { name => '__current', parent => $conf->{parent} };
} else {
push @$res, { name => '__current' };
}
return $res;