diff options
| author | Olivier Thauvin <nanardon@mandriva.org> | 2007-08-21 14:57:49 +0000 |
|---|---|---|
| committer | Olivier Thauvin <nanardon@mandriva.org> | 2007-08-21 14:57:49 +0000 |
| commit | 63df57646ff582eaa473728398c1b08fe8745ad3 (patch) | |
| tree | f67d42f4f79614d6e3da82db013b4094eac8ada3 /find-lang.pl | |
| parent | b362e863fd21c8273f11b2146f00cbbc26a1cca9 (diff) | |
| download | rpm-setup-63df57646ff582eaa473728398c1b08fe8745ad3.tar rpm-setup-63df57646ff582eaa473728398c1b08fe8745ad3.tar.gz rpm-setup-63df57646ff582eaa473728398c1b08fe8745ad3.tar.bz2 rpm-setup-63df57646ff582eaa473728398c1b08fe8745ad3.tar.xz rpm-setup-63df57646ff582eaa473728398c1b08fe8745ad3.zip | |
- fix second part of #32366
Diffstat (limited to 'find-lang.pl')
| -rw-r--r-- | find-lang.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/find-lang.pl b/find-lang.pl index 382ed80..f12af1f 100644 --- a/find-lang.pl +++ b/find-lang.pl @@ -40,7 +40,7 @@ File::Find::find( return; } ($pkg, $lang, $parent) = ($4, $3, $2); - } elsif ($file =~ m:^(.*/gnome/help/([^/_@]+))[^/]*/([^/]+)$:) { + } elsif ($file =~ m:^(.*/gnome/help/([^/]+))/([^/_]+)$:) { if (!$withgnome) { return; } @@ -55,7 +55,7 @@ File::Find::find( return; } ($pkg, $lang, $parent) = ($3, $2, $1); - } elsif ($file =~ m:^(/+usr/share/man)/([^/_@\.]+)[^/]*/man[^/]+/([^/.]+)\.\d[^/]*$:) { + } elsif ($file =~ m:^(/+usr/share/man)/([^/@\.]+)[^/]*/man[^/]+/([^/.]+)\.\d[^/]*$:) { if (!$withman) { return; } @@ -104,6 +104,6 @@ sub parent_to_own { } else { $finallist{$parent} = "$lang %dir "; } - debug("File %s will be %s", $parent, $finallist{$parent}); + debug("Parent %s will be %s", $parent, $finallist{$parent}); } } |