Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Schema/ValidationError.pm @ 194:4d0e1962161c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replaced tabs with spaces IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
author cin
date Tue, 10 Apr 2012 20:08:29 +0400
parents d1676be8afcc
children 6d8092d8ce1b
comparison
equal deleted inserted replaced
193:8e8401c0aea4 194:4d0e1962161c
24 24
25 $this->{$Node} = $args{Node}; 25 $this->{$Node} = $args{Node};
26 $this->{$Schema} = $args{Schema} if $args{Schema}; 26 $this->{$Schema} = $args{Schema} if $args{Schema};
27 $this->{$Source} = $args{Source} if $args{Source}; 27 $this->{$Source} = $args{Source} if $args{Source};
28 if ($args{Parent}) { 28 if ($args{Parent}) {
29 $this->{$Parent} = $args{Parent}; 29 $this->{$Parent} = $args{Parent};
30 } elsif ($args{Node}) { 30 } elsif ($args{Node}) {
31 $this->{$Parent} = $args{Node}->parentNode; 31 $this->{$Parent} = $args{Node}->parentNode;
32 } else { 32 } else {
33 die new IMPL::InvalidArgumentException("A 'Parent' or a 'Node' parameter is required"); 33 die new IMPL::InvalidArgumentException("A 'Parent' or a 'Node' parameter is required");
34 } 34 }
35 $this->{$Message} = FormatMessage(delete $args{Message}, \%args) if $args{Message}; 35 $this->{$Message} = FormatMessage(delete $args{Message}, \%args) if $args{Message};
36 } 36 }
37 37
38 sub toString { 38 sub toString {
39 (my $this) = @_; 39 (my $this) = @_;
40 return $this->Message; 40 return $this->Message;
41 } 41 }
42 42
43 1; 43 1;
44 44
45 __END__ 45 __END__