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

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>
+% }