Koha-community/Koha
15
7
Fork 0
Code Issues Releases Wiki Activity

Bug 38871: Remove sub string_list from misc/translator/xgettext.pl

Browse source 
It is never used

% git grep string_list
should not return anything

Signed-off-by: Thibault Keromnes <thibault.keromnes@univ-paris8.fr>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Jonathan Druart 2025-01-09 22:38:50 +01:00 committed by Katrin Fischer
parent 7f48902403
commit 74050efda3
Signed by: kfischer
GPG key ID: 0EF6E2C03357A834
1 changed files with 0 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
misc/translator/xgettext.pl
View file

@ -98,22 +98,6 @@ sub remember {
###############################################################################
sub string_list {
my @t = keys %text;
# The real gettext tools seems to sort case sensitively; I don't know why
@t = sort { $a cmp $b } @t if $sort eq 's';
@t = sort {
my @aa = sort { $a->pathname cmp $b->pathname || $a->line_number <=> $b->line_number } @{ $text{$a} };
my @bb = sort { $a->pathname cmp $b->pathname || $a->line_number <=> $b->line_number } @{ $text{$b} };
$aa[0]->pathname cmp $bb[0]->pathname
|| $aa[0]->line_number <=> $bb[0]->line_number;
} @t if $sort eq 'F';
return @t;
}
###############################################################################
sub text_extract {
my ($h) = @_;
for ( ; ; ) {