diff options
Diffstat (limited to 'Backend')
| -rw-r--r-- | Backend/Hash.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Backend/Hash.hs b/Backend/Hash.hs index 1da11240af..9ac00f8cd3 100644 --- a/Backend/Hash.hs +++ b/Backend/Hash.hs @@ -157,7 +157,8 @@ keyHash = fst . splitKeyNameExtension validInExtension :: Word8 -> Bool validInExtension c | isAlphaNum (chr (fromIntegral c)) = True - | c <= 127 = False -- other ascii, spaces, punctuation, control chars + | fromIntegral c == ord '.' = True + | c <= 127 = False -- other ascii: spaces, punctuation, control chars | otherwise = True -- utf8 is allowed, also other encodings {- Upgrade keys that have the \ prefix on their hash due to a bug, or |