diff options
| author | Denis Barbier <barbier> | 2001-09-27 21:46:48 +0000 |
|---|---|---|
| committer | Denis Barbier <barbier> | 2001-09-27 21:46:48 +0000 |
| commit | 36d8e35d8e0731462a4920fcae29f06c981164f0 (patch) | |
| tree | 5afcdef43e78248e7509b8a40eb0144dc23676ab /check_trans.pl | |
| parent | 0058b0335cd7194f2d3e46a457a8c545511c3d34 (diff) | |
Fix -C option, chdir must be called before Webwml::TransIgnore->new
CVS version numbers
check_trans.pl: 1.42 -> 1.43
Diffstat (limited to 'check_trans.pl')
| -rwxr-xr-x | check_trans.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/check_trans.pl b/check_trans.pl index 91e79623065..7fa836f4f95 100755 --- a/check_trans.pl +++ b/check_trans.pl @@ -124,6 +124,9 @@ warn "Checking subtree $opt_s only\n" if (($opt_v) && ($opt_s)); # include only files matching $filename my $filename = $opt_p || '(\.wml$)|(\.html$)'; +# Go to desired directory +chdir($opt_C) || die "Cannot go to $opt_C\n"; + my $cvs = Local::Cvsinfo->new(); $cvs->options( recursive => 1, @@ -137,9 +140,6 @@ my $altcvs = $cvs->new(); # Global .transignore my $globtrans = Webwml::TransIgnore->new("."); -# Go to desired directory -chdir($opt_C) || die "Cannot go to $opt_C\n"; - # language configuration my $defaultlanguage = 'italian'; if (open CONF, "<language.conf") |