From 2669e5714d02cc81aa89275ab9bb2397da049005 Mon Sep 17 00:00:00 2001 From: Wolfram Schneider Date: Fri, 23 Apr 2010 17:35:37 +0200 Subject: [PATCH] allow to set xslt sheet on commandline --- bin/irspy-rewrite-records.pl | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/bin/irspy-rewrite-records.pl b/bin/irspy-rewrite-records.pl index f994de6..c80b05d 100755 --- a/bin/irspy-rewrite-records.pl +++ b/bin/irspy-rewrite-records.pl @@ -9,6 +9,12 @@ use ZOOM::IRSpy::Utils qw(render_record); my($dbname) = @ARGV; die "$0 no database name specified" if !defined $dbname; + +my $irspy_to_zeerex_xsl = $ARGV[1] || '../xsl/irspy2zeerex.xsl'; + +$ZOOM::IRSpy::irspy_to_zeerex_xsl = $irspy_to_zeerex_xsl + if $irspy_to_zeerex_xsl; + my $spy = new ZOOM::IRSpy($dbname, "admin", "fruitbat"); my $rs = $spy->{conn}->search(new ZOOM::Query::CQL("cql.allRecords=1")); print STDERR "rewriting ", $rs->size(), " target records"; -- 1.7.10.4