Mercurial > pub > Impl

diff Lib/IMPL/DOM/Transform/ObjectToDOM.pm @ 329:50ff1595bd62

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed bug when transforming list properties
author sergey
date Mon, 03 Jun 2013 18:03:54 +0400
parents c9c2ec29793f
children f116cd9fe7d9
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);