From: Anders S. Mortensen <sondberg@indexdata.dk>
Date: Fri, 2 Feb 2007 12:41:16 +0000 (+0000)
Subject: This has now changed name to irspy_xsltproc.pl.
X-Git-Tag: CPAN-v1.02~631
X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=86e26bc846f97ad3572f20fb5f82a86c1cb9b281;ds=sidebyside

This has now changed name to irspy_xsltproc.pl.
---

diff --git a/bin/xslt_process.pl b/bin/xslt_process.pl
deleted file mode 100755
index c3e246e..0000000
--- a/bin/xslt_process.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/perl -w
-
-# $Id: xslt_process.pl,v 1.3 2007-02-02 11:30:50 mike Exp $
-
-use strict;
-use warnings;
-use lib '../lib';
-use Getopt::Std;
-use ZOOM::IRSpy;
-use XML::LibXSLT;
-
-if (@ARGV && $ARGV[0] eq "-d") {
-    shift;
-    XML::LibXSLT->debug_callback(\&xslt_debug);
-}
-
-my $dbname = 'localhost:8018/IR-Explain---1';
-my $spy = new ZOOM::IRSpy($dbname, "admin", "fruitbat");
-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(), "\n\n";
-
-
-
-sub xslt_debug {
-    my ($msg) = @_;
-
-    print STDERR $msg;
-}