Author: ai0867
Date: Mon Nov 14 01:24:30 2011
New Revision: 51965
URL: http://svn.gna.org/viewcvs/wesnoth?rev=51965&view=rev
Log:
Add #po: comment recognition to perl wmlxgettext
Modified:
trunk/utils/wmlxgettext
Modified: trunk/utils/wmlxgettext
URL:
http://svn.gna.org/viewcvs/wesnoth/trunk/utils/wmlxgettext?rev=51965&r1=51964&r2=51965&view=diff
==============================================================================
--- trunk/utils/wmlxgettext (original)
+++ trunk/utils/wmlxgettext Mon Nov 14 01:24:30 2011
@@ -60,6 +60,10 @@
next LINE;
}
+ if (m/\#\s*po:\s+(.+)/) {
+ push @{$nodeinfostack[-1][2]}, $1;
+ }
+
# skip other # lines as comments
next LINE if m/^\s*\#/ and !defined $str;
_______________________________________________
Wesnoth-commits mailing list
[email protected]
https://mail.gna.org/listinfo/wesnoth-commits
