importfeed: Fix handling of dots in extensions.

This commit is contained in:
Joey Hess 2013-08-03 02:36:38 -04:00
parent 24c8a6042b
commit b28023cb52
2 changed files with 2 additions and 0 deletions

View file

@ -182,6 +182,7 @@ feedFile tmpl i = Utility.Format.format tmpl $ M.fromList
fieldMaybe k (Just v) = field k v
sanitize c
| c == '.' = c
| isSpace c || isPunctuation c || c == '/' = '_'
| otherwise = c