diff Lib/IMPL/DOM/Schema/ValidationError.pm @ 102:cf3b6ef2be22

Schema beta version
author wizard
date Fri, 07 May 2010 08:05:23 +0400
parents df6b4f054957
children 196bf443b5e1
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Schema/ValidationError.pm	Thu May 06 17:55:59 2010 +0400
+++ b/Lib/IMPL/DOM/Schema/ValidationError.pm	Fri May 07 08:05:23 2010 +0400
@@ -11,6 +11,7 @@
     public _direct property Node => prop_get;
     public _direct property Schema => prop_get;
     public _direct property Source => prop_get;
+    public _direct property Parent => prop_get;
     public _direct property Message => prop_get;
 }
 
@@ -20,6 +21,7 @@
     $this->{$Node} = $args{Node};
     $this->{$Schema} = $args{Schema} if $args{Schema};
     $this->{$Source} = $args{Source} if $args{Source};
+    $this->{$Parent} = $args{Parent} if $args{Parent};
     $this->{$Message} = FormatMessage(delete $args{Message}, \%args) if $args{Message};
 }