From 80245d57f11d6d63390a980cfa3e8302db57d4a2 Mon Sep 17 00:00:00 2001 From: kts Date: Tue, 2 Dec 2014 09:00:04 -0800 Subject: [PATCH] Now uses FindBin to access kettext.pm if the module is not installed in the regular lib INC dirs. --- kettext.pl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/kettext.pl b/kettext.pl index 216fceb..f3df44b 100755 --- a/kettext.pl +++ b/kettext.pl @@ -1,6 +1,8 @@ #!/usr/bin/perl +use FindBin; +use lib "$FindBin::Bin/"; require kettext; -# arg check / usage + if ($#ARGV+1 == 0) { showUsage(); exit; @@ -57,9 +59,9 @@ sub showUsage { print "Usage: kettext.pl *.ktx [options]\n"; print " --help\n"; print " show this help screen\n"; - print " --group.setting\n"; - print " set parse/convert setting (e.g., \"--header.numbering\")\n"; - print " --convert, --convertTo=OUTPUT\n"; + print " --group.setting=val\n"; + print " set parse/convert setting (e.g., \"--header.numbering\", \"--header.depth=2\")\n"; + print " --convert=, --convertTo=OUTPUT\n"; print " sets the output converter. Default: HTML\n"; print " --o, --out, --output filename\n"; print " sets the output file. Default: stdout\n";