view docs/xsls/dump.xsls @ 2715:a5845475a903

perl termination fixes: *) master exit hook is run before global pool cleanup, so call PERL_SYS_TERM() after perl_destruct()/perl_free(). This fixes the message panic: MUTEX_LOCK (22) [op.c:352] on some threaded perl builds *) call perl_destruct()/perl_free() before PERL_SYS_TERM() for non-mulitiplicity perl
author Igor Sysoev <igor@sysoev.ru>
date Thu, 16 Apr 2009 14:42:31 +0000
parents 551102312e19
children 2c863b4a8f93
line wrap: on
line source

X:stylesheet {

X:output method="xml"
X:param indent-increment="'   '";

X:template noname(indent="'&#xA;'") = "*" {
	!{$indent}

	X:if "name()='xsl:template'" {
		!{$indent}
	}

	X:copy {
	   X:copy-of "@*"
     	   !!( indent = "concat($indent, $indent-increment)" );
	   X:if "./* " { !{$indent}  }
	}
}

 
X:template = "comment()|processing-instruction()" {
    X:copy;
}

<!--
X:template ="text()[normalize-space(.)='']" {}
-->

}