Fixed a bug where VersionTag->get would return unsafe copies. Also added tests for this.

This commit is contained in:
Martin Kamerbeek 2009-07-15 06:50:33 +00:00
parent 40fcbb5fa9
commit 0f70c99873
3 changed files with 22 additions and 2 deletions

View file

@ -247,7 +247,7 @@ sub get {
return $self->{_data}{$name};
}
else {
return \%{ $self->{_data} },
return { %{ $self->{_data} } },
}
}