diff options
| -rwxr-xr-x | perl-install/share/po/help_xml2pm.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/share/po/help_xml2pm.pl b/perl-install/share/po/help_xml2pm.pl index f37e39141..e9875b831 100755 --- a/perl-install/share/po/help_xml2pm.pl +++ b/perl-install/share/po/help_xml2pm.pl @@ -80,7 +80,7 @@ EOF my $s = join(', ', $main, map { qq(N($_)) } @inside); print STDERR "Writing id=$_\n"; print $F <<EOF; -sub $_ { +sub $_() { N($s); } EOF |