From 21459786af04ef1ca8271a32f6784b92662f5424 Mon Sep 17 00:00:00 2001 From: Anssi Hannula Date: Thu, 20 Sep 2007 19:42:48 +0000 Subject: Handle symlinks the same way as files in find-lang.pl, some symlinks in documentation were previously left out. --- find-lang.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/find-lang.pl b/find-lang.pl index d87bef9..9b9c7a4 100644 --- a/find-lang.pl +++ b/find-lang.pl @@ -34,7 +34,7 @@ my %finallist; # filename => attr, easy way to perform uniq File::Find::find( sub { my $file = substr($File::Find::name, length($buildroot)); - -f $File::Find::name or return; + -f $File::Find::name or -l $File::Find::name or return; debug("next file is %s", $file); my $langfile = $file; if ($file =~ m:^((.*/share/locale)/([^/@]+)[^/]*).*/([^/]+)\.mo:) { -- cgit v1.2.1