diff options
author | Peter Karlsson <peterk> | 2002-03-27 14:42:07 +0000 |
---|---|---|
committer | Peter Karlsson <peterk> | 2002-03-27 14:42:07 +0000 |
commit | d127f34f690df5dc66bb692caddab9eefc28a88c (patch) | |
tree | fd0ebe54856645f8a8278b661c546341ec61169b /copypage.pl | |
parent | 5d8a26dcaf36d485befbcd40e1187e720fad7494 (diff) |
The translation-check header doesn't need to go first anymore. Still make it
go after other headers for readability.
CVS version numbers
copypage.pl: 1.14 -> 1.15
Diffstat (limited to 'copypage.pl')
-rwxr-xr-x | copypage.pl | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/copypage.pl b/copypage.pl index 4d65784a859..f3b17a58ac2 100755 --- a/copypage.pl +++ b/copypage.pl @@ -156,18 +156,12 @@ sub copy # Copy the file and insert the revision number my $insertedrevision = 0; - my $isdefinetag = 0; - my $ignorews = 0; while (<SRC>) { next if /\$Id/; - $isdefinetag = 1 if /<define-tag/; - $ignorews = 1 if $isdefinetag; - - unless ($insertedrevision || /^#/ || $isdefinetag || - ($ignorews && /^$/)) + unless ($insertedrevision || /^#/) { print DST qq'#use wml::debian::translation-check translation="$revision"\n'; $insertedrevision = 1; @@ -180,9 +174,6 @@ sub copy { print DST $_; } - - $isdefinetag = 0 if m'</define-tag>'; - $ignorews = 0 if /^#/; } unless ($insertedrevision) |