Reverting changes to slices since it breaks ePerl, though, I can't

find out where it breaks.

CVS version numbers

english/template/debian/translation-check.wml: 1.43 -> 1.44

1 files changed, 6 insertions, 6 deletions

diff --git a/english/template/debian/translation-check.wml b/english/template/debian/translation-check.wml
index b352e5d8d14..0821d0d6ab7 100644
--- a/english/template/debian/translation-check.wml
+++ b/english/template/debian/translation-check.wml
@@ -61,8 +61,8 @@
 # This is the message that is displayed if the translation is too old.
 # (difference >= max_delta)
 <define-tag translationoutofdate whitespace=delete>
-<:
-my $slices = q{
+# <:
+# my $slices = q{
   [EN:<P><STRONG>Warning! This translation is too out of date,
       please see the <A HREF="$link">original</A>.</STRONG></P>:]
   [AR:<P><STRONG>Warning! This translation is too out of date,
@@ -109,10 +109,10 @@ my $slices = q{
       please see the <A HREF="$link">original</A>.</STRONG></P>:]
   [ZH:<p><strong>注意！此網頁中文譯本太久沒有更新了，\
       請參閱\<a href="$link">最新原英文本</a>。</strong></p>:]
-};
-$slices =~ s/([^:][^ \]])\n/$1 \n/g;
-print $slices;
-:>
+# };
+# $slices =~ s/([^:][^ \]])\n/$1 \n/g;
+# print $slices;
+# :>
 </define-tag>
 
 # This is the message that is displayed if the referenced original file