aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/settings.sml
diff options
context:
space:
mode:
authorGravatar Sergey Mironov <grrwlf@gmail.com>2014-06-05 20:36:12 +0000
committerGravatar Sergey Mironov <grrwlf@gmail.com>2014-06-05 20:36:12 +0000
commitfa90e68cdf1bb11a89eaafca74e48e88abf7a6da (patch)
tree0b350117cccea0811b4ef09cd1d0e26566874eee /src/settings.sml
parentac8529dadc1a0ba0621058457364b6c634ebe01c (diff)
Allow '+' char in blessMime
See this one [1] for an example [1] - http://www.w3.org/TR/SVGTiny12/mimereg.html
Diffstat (limited to 'src/settings.sml')
-rw-r--r--src/settings.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/settings.sml b/src/settings.sml
index f00a4853..ec05d84d 100644
--- a/src/settings.sml
+++ b/src/settings.sml
@@ -465,7 +465,7 @@ fun check f rules s =
val checkUrl = check (fn _ => true) url
-val validMime = CharVector.all (fn ch => Char.isAlphaNum ch orelse ch = #"/" orelse ch = #"-" orelse ch = #".")
+val validMime = CharVector.all (fn ch => Char.isAlphaNum ch orelse ch = #"/" orelse ch = #"-" orelse ch = #"." orelse ch = #"+")
val validEnv = CharVector.all (fn ch => Char.isAlphaNum ch orelse ch = #"_" orelse ch = #".")
val checkMime = check validMime mime