diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-10 01:56:26 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-10 01:56:26 +0000 |
commit | 3661bf4880dea683268c973962238f4196bd7118 (patch) | |
tree | 3ab4faf7c759ae3718c7392699efb0535840131f /perl-install/share/po/fake_c.pl | |
parent | c3b33d89ad77ea8b294c5f2d4ecfb81f8854ab5d (diff) | |
download | drakx-backup-do-not-use-3661bf4880dea683268c973962238f4196bd7118.tar drakx-backup-do-not-use-3661bf4880dea683268c973962238f4196bd7118.tar.gz drakx-backup-do-not-use-3661bf4880dea683268c973962238f4196bd7118.tar.bz2 drakx-backup-do-not-use-3661bf4880dea683268c973962238f4196bd7118.tar.xz drakx-backup-do-not-use-3661bf4880dea683268c973962238f4196bd7118.zip |
use "perl_checker --generate-pot" instead of fake_c + xgettext
Diffstat (limited to 'perl-install/share/po/fake_c.pl')
-rwxr-xr-x | perl-install/share/po/fake_c.pl | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/perl-install/share/po/fake_c.pl b/perl-install/share/po/fake_c.pl deleted file mode 100755 index cd80801eb..000000000 --- a/perl-install/share/po/fake_c.pl +++ /dev/null @@ -1,22 +0,0 @@ -#!/usr/bin/perl -lp - -s|^(N_?\()| $1|; # add a blank at the beginning (?!) - -s|N\(\[(.*),\s*(.*),\s*(.*)\]|ngettext($2,$3,$1)|; # special plural form handling - -s,\Qs/#.*//,,; # ugly special case - -s,(^|[^\$])#([^+].*),"$1/*" . simpl($2) . "*/",e; - # rewrite comments to C format except for: - # - ``#+ xxx'' comments which are kept - # - ``$#xxx'' which are not comments - -s|//|/""/|g; # ensure // or not understood as comments - -s|$|\\n\\|; # multi-line strings not handled in C - -sub simpl { - local $_ = $_[0]; - s,\*/,,g; - $_; -} |