summaryrefslogtreecommitdiffstats
path: root/po/fake_c.pl
diff options
context:
space:
mode:
authorPablo Saratxaga <pablo@mandriva.com>2002-08-26 08:57:49 +0000
committerPablo Saratxaga <pablo@mandriva.com>2002-08-26 08:57:49 +0000
commitde239fcc678296e2b820d4753b62b7841bcd085b (patch)
tree7ead69ac73c8713622fe253a212b4d4d84ffe991 /po/fake_c.pl
parent151822a8ed9385ad89a1a00e3494e326df6b3326 (diff)
downloadcontrol-center-de239fcc678296e2b820d4753b62b7841bcd085b.tar
control-center-de239fcc678296e2b820d4753b62b7841bcd085b.tar.gz
control-center-de239fcc678296e2b820d4753b62b7841bcd085b.tar.bz2
control-center-de239fcc678296e2b820d4753b62b7841bcd085b.tar.xz
control-center-de239fcc678296e2b820d4753b62b7841bcd085b.zip
Changed the way the pot file is built
Diffstat (limited to 'po/fake_c.pl')
-rwxr-xr-xpo/fake_c.pl22
1 files changed, 22 insertions, 0 deletions
diff --git a/po/fake_c.pl b/po/fake_c.pl
new file mode 100755
index 00000000..21cf25b0
--- /dev/null
+++ b/po/fake_c.pl
@@ -0,0 +1,22 @@
+#!/usr/bin/perl -lp
+
+s|^(__?\()| $1|; # add a blank at the beginning (?!)
+
+s|_\(\[(.*),\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;
+ $_;
+}