Mercurial > pub > Impl
view Lib/IMPL/Test/FailException.pm @ 246:2746a8e5a6c4
Fixed regressions in DOM due previous refactorings
Fixed ObjectToDOM transformation to handle a schema with mixed node types
author | sergey |
---|---|
date | Tue, 30 Oct 2012 01:17:31 +0400 |
parents | 4267a2ac3d46 |
children |
line wrap: on
line source
package IMPL::Test::FailException; use strict; use warnings; use parent qw(IMPL::Exception); __PACKAGE__->PassThroughArgs; sub toString { my $this = shift; $this->Message . join("\n",'',map IMPL::Exception::indent($_,1), @{$this->Args} ); } sub save { my ($this,$ctx) = @_; $ctx->AddVar(Message => $this->Message); $ctx->AddVar(Args => $this->Args) if @{$this->Args}; } 1;