Mercurial > pub > Impl
diff Lib/IMPL/Serialization.pm @ 219:c477f24f1980
sync
author | sergey |
---|---|
date | Tue, 21 Aug 2012 17:13:47 +0400 |
parents | f534a60d5b01 |
children | 4ddb27ff4a0b |
line wrap: on
line diff
--- a/Lib/IMPL/Serialization.pm Mon Aug 20 17:24:48 2012 +0400 +++ b/Lib/IMPL/Serialization.pm Tue Aug 21 17:13:47 2012 +0400 @@ -182,7 +182,7 @@ die new Exception("A reference to a not existing object found") if not $refObj; my $rhCurrentObj = $this->{$CurrentObject}; - die new Exception("Found a reference to an object as a root of an object's graph") if not $rhCurrentObj; + die new Exception("The root object can't be a reference") if not $rhCurrentObj; if ($rhCurrentObj->{'Data'}) { die new Exception("Invalid serializaed data","Plain deserialization data for an object already exist") if not ref $rhCurrentObj->{'Data'};