Mercurial > pub > Impl
changeset 329:50ff1595bd62
fixed bug when transforming list properties
author | sergey |
---|---|
date | Mon, 03 Jun 2013 18:03:54 +0400 |
parents | 63709a4e6da0 |
children | fe725fad2d90 |
files | Lib/IMPL/DOM/Transform/ObjectToDOM.pm |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Transform/ObjectToDOM.pm Mon Jun 03 03:28:01 2013 +0400 +++ b/Lib/IMPL/DOM/Transform/ObjectToDOM.pm Mon Jun 03 18:03:54 2013 +0400 @@ -140,9 +140,10 @@ $_->name, 1 } $data->GetMeta(PropertyInfo, sub { $_->access == ACCESS_PUBLIC }, 1 ); + my %values = map { $_, - $data->$_(); + scalar($data->$_()) } keys %props; return $this->Transform(\%values);