# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1477403159 -32374
# Node ID 33276557234188211874277429c3683968aaac4e
# Parent  4f06842488d35c4871c374850241ddb9e01e64cb
Text files in <pre> should be htmlescaped

diff -r 4f06842488d3 -r 332765572341 s4-funcs.sh
--- a/s4-funcs.sh	Tue Oct 25 22:42:34 2016 +0859
+++ b/s4-funcs.sh	Tue Oct 25 22:45:33 2016 +0859
@@ -3362,7 +3362,7 @@
 	ASCII*)	charset=""	;;
       esac
       ct="text/html${charset:+; charset=$charset}"
-      cat $bin \
+      cat $bin | htmlescape \
 	  | sed 's,^,<span></span>,' \
 	  | _m4 -D_TITLE_="$fn" -D_CONTENT_TYPE_="$ct" \
 		-D_BODY_="syscmd(\`cat')" $layout/pretty.m4.txt