-mkDefaultPage conf status msgA
- = conf `seq` status `seq` msgA `seq`
- let (# sCode, sMsg #) = statusCode status
- sig = cnfServerSoftware conf
+mkDefaultPage !conf !status !msgA
+ = let (# sCode, sMsg #) = statusCode status
+ sig = C8.unpack (cnfServerSoftware conf)