From 505d99ec3749fc30c1e2362140b49beb166be7ab Mon Sep 17 00:00:00 2001 From: hallgren Date: Wed, 22 Dec 2010 14:47:35 +0000 Subject: [PATCH] PGF web service: Use Content-Type text/javascript from JSON output The Content-Type used to be text/json, but this caused warning messages in some web browers. --- src/server/FastCGIUtils.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/server/FastCGIUtils.hs b/src/server/FastCGIUtils.hs index 0bae305c5..f9e575df7 100644 --- a/src/server/FastCGIUtils.hs +++ b/src/server/FastCGIUtils.hs @@ -165,7 +165,7 @@ outputJSONP x = let str = case mc of Nothing -> encode x Just c -> c ++ "(" ++ encode x ++ ")" - setHeader "Content-Type" "text/json; charset=utf-8" + setHeader "Content-Type" "text/javascript; charset=utf-8" outputStrict $ UTF8.encodeString str outputPNG :: BS.ByteString -> CGI CGIResult