From 3bedec5364a106e804cdb2ead877fc90a9c2c4da Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 2 Jul 2001 16:09:19 +0000 Subject: yet even better i18n strings extraction --- perl-install/share/po/Makefile | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/share/po/Makefile b/perl-install/share/po/Makefile index 70036dc4f..a9bcad71d 100644 --- a/perl-install/share/po/Makefile +++ b/perl-install/share/po/Makefile @@ -26,14 +26,14 @@ DrakX.pot: $(PMSFILES) perl i18n_compssUsers 2>/dev/null >> $@ verif2: - perl -I ../.. -Mcommon -e 'foreach (qw($(PMSFILES))) { printf "package foo%d;\n", ++$$i; print common::cat_($$_) }' | perl -ne 'print if !/use (diagnostics|vars|strict)/' | OUTFILE=tmp.pm perl -I. -I../.. -Mb_dump_strings >/dev/null 2>/dev/null +# perl -I ../.. -Mcommon -e 'foreach (qw($(PMSFILES))) { printf "package foo%d;\n", ++$$i; print common::cat_($$_) }' | perl -ne 'print if !/use (diagnostics|vars|strict)/' | OUTFILE=tmp.pm perl -I. -I../.. -Mb_dump_strings >/dev/null 2>/dev/null perl -pe 's|$$|\\n\\|' tmp.pm > tmp.pm_.c xgettext --keyword=_ -o tmp.po tmp.pm_.c msgmerge DrakX.pot tmp.po > tmp.pot grep "^msgid" tmp.pot | sort > tmp.pot.light - grep "^msgid" DrakX.pot | sort | diff - tmp.pot.light | grep "^>" + grep "^msgid" DrakX.pot | sort | diff - tmp.pot.light | grep "^>" || true $(PMSCFILES): %_.c: % - perl -pe 's|^(__?\()| $$1|; s,\Qs/#.*//,,; s|//|/""/|g; s,(^|[^\$$])#([^+].*),\1/*\2*/,; s|$$|\\n\\|' $< > $@ + perl -lpe 's|^(__?\()| $$1|; s,\Qs/#.*//,,; s|//|/""/|g; s,(^|[^\$$])#([^+].*),\1/*\2*/,; s|$$|\\n\\|' $< > $@ # for i in *.po; do echo -n "$i "; msgfmt -v $i 2>&1; done | perl -e 'print map { $_->[0] } sort { $a->[1] <=> $b->[1] } map { [ $_, (split)[1] ] } <>' -- cgit v1.2.1