Mercurial > pub > Impl
view Lib/IMPL/DOM/Transform.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 | d1676be8afcc |
children |
line wrap: on
line source
package IMPL::DOM::Transform; use strict; use warnings; use parent qw(IMPL::Transform); __PACKAGE__->PassThroughArgs; sub GetClassForObject { my ($this,$object) = @_; if (my $class = ref $object) { if (UNIVERSAL::isa($object,'IMPL::DOM::Node')) { return $object->nodeName; } else { return $class; } } else { return undef; } } 1; __END__ =pod =head1 DESCRIPTION Преобразование для DOM документа, использует имя узла для применения подходящего преобразования. =cut