aboutsummaryrefslogtreecommitdiffstats
path: root/check_trans.pl
diff options
context:
space:
mode:
authorFinnish Language Team <finnish>2000-07-26 21:35:04 +0000
committerFinnish Language Team <finnish>2000-07-26 21:35:04 +0000
commit3c1598abb483f2b3901dd5edeba2ba06d5e23a24 (patch)
treeef5887689689d2878c61537e234e3de7db38812f /check_trans.pl
parenta34bb2fa396ff477f2fd43cecccc7f8c6acd6054 (diff)
Script check_trans.pl now supports #use wml::debian::translation-check
syntax. CVS version numbers check_trans.pl: 1.8 -> 1.9 english/template/debian/translation-check.wml: 1.2 -> 1.3
Diffstat (limited to 'check_trans.pl')
-rwxr-xr-xcheck_trans.pl9
1 files changed, 5 insertions, 4 deletions
diff --git a/check_trans.pl b/check_trans.pl
index 2abe4f8866a..9702b37a430 100755
--- a/check_trans.pl
+++ b/check_trans.pl
@@ -15,7 +15,8 @@
# Translators need to embed in the files they translate a comment
# in its own line with the revision of the file they translated such as:
-# <!--translation revision-->
+# #use wml::debian::translation-check translation="revision"
+# (Old form <!--translation revision--> works too.)
# The revision can be obtained from the CVS/Entries files or from
# the command "cvs status filename".
@@ -109,9 +110,9 @@ sub check_file {
}
open(F, $name) || die $!;
while(<F>) {
- if (/<!--\s*translation\s+(.*)?\s*-->\s*$/oi) {
- warn "Found revision $1\n" if $opt_v;
- $oldr = $1;
+ if (/translation(\s+|=")([.0-9]*)("|\s*-->)\s*$/oi) {
+ warn "Found revision $2\n" if $opt_v;
+ $oldr = $2;
if ($oldr eq $revision) {
close(F);
return;

© 2014-2024 Faster IT GmbH | imprint | privacy policy