From 2878ef3aa6973df497767eb8a5d60a80b2079986 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Sun, 14 Dec 2014 09:59:25 +0200
Subject: [PATCH] Allow periods in slugs

---
 Data/Slug.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Data/Slug.hs b/Data/Slug.hs
index b7726ab..a3fc74a 100644
--- a/Data/Slug.hs
+++ b/Data/Slug.hs
@@ -48,6 +48,7 @@ validChar c =
     ('A' <= c && c <= 'Z') ||
     ('a' <= c && c <= 'z') ||
     ('0' <= c && c <= '9') ||
+    c == '.' ||
     c == '-' ||
     c == '_'