X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.main.git;a=blobdiff_plain;f=yarrg%2Fweb%2Fscript;h=05ba792a96055f16f89f33e9f1486860f4665ec1;hp=b8e7d03364827e39ed4f05e1d697f7a489dfef05;hb=c9225ff45ee5e69855cb24cfb648d903dbba54a7;hpb=e1104ec9b3f093f6c496cd9763b06b0792b679ff

diff --git a/yarrg/web/script b/yarrg/web/script
index b8e7d03..05ba792 100644
--- a/yarrg/web/script
+++ b/yarrg/web/script
@@ -36,14 +36,16 @@
     http://www.htmlhelp.com/tools/validator/problems.html#script
 
 </%doc>
+<%perl>
+my $ct= $m->content;
+
+die "bad script content $&"
+    if $ct =~ m,\<\/|--\>,;
+</%perl>
+% if (!printable($m)) {
 <script type="text/javascript">
 <!--
 <% $ct %>
 // -->
 </script>
-<%init>
-my $ct= $m->content;
-
-die "bad script content $&"
-    if $ct =~ m,\<\/|--\>,;
-</%init>
+% }