From 4ad686d73208a760ed8d2beaad03198e455d7623 Mon Sep 17 00:00:00 2001 From: Jo-Philipp Wich Date: Sun, 1 Nov 2009 01:01:47 +0000 Subject: [PATCH] build: allow multiple search directories in i18n-scan.pl --- build/i18n-scan.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/build/i18n-scan.pl b/build/i18n-scan.pl index 8523ced1a..a31952bbb 100755 --- a/build/i18n-scan.pl +++ b/build/i18n-scan.pl @@ -4,7 +4,7 @@ use strict; use warnings; use Text::Balanced qw(extract_bracketed extract_delimited extract_tagged); -@ARGV == 1 || die "Usage: $0 \n"; +@ARGV >= 1 || die "Usage: $0 \n"; my %stringtable; @@ -31,7 +31,7 @@ sub dec_tpl_str } -if( open F, "find $ARGV[0] -type f '(' -name '*.htm' -or -name '*.lua' ')' |" ) +if( open F, "find @ARGV -type f '(' -name '*.htm' -or -name '*.lua' ')' |" ) { while( defined( my $file = readline F ) ) { -- 2.25.1