From e8692a780d3467b2028e6e1b6ea21acd634b9c0c Mon Sep 17 00:00:00 2001 From: "Anders S. Mortensen" Date: Thu, 28 Jun 2007 13:57:53 +0000 Subject: [PATCH] Tell toString() to pretty print the output xml. --- bin/irspy_xsltproc.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bin/irspy_xsltproc.pl b/bin/irspy_xsltproc.pl index 30869be..03e641d 100755 --- a/bin/irspy_xsltproc.pl +++ b/bin/irspy_xsltproc.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -w -# $Id: irspy_xsltproc.pl,v 1.3 2007-02-02 12:44:43 sondberg Exp $ +# $Id: irspy_xsltproc.pl,v 1.4 2007-06-28 13:57:53 sondberg Exp $ # ------------------------------------------------------------------ # This script is only for debugging purposes - it takes a raw IRspy # xml output document as argument and executes the irspy2zeerex.xsl @@ -25,4 +25,4 @@ my $source_file = shift || die("$0: Please specify xml instance file"); my $source_doc = $spy->{libxml}->parse_file($source_file); my $results = $spy->{irspy_to_zeerex_style}->transform($source_doc); -print $results->toString(); +print $results->toString(1); -- 1.7.10.4