From dc84ecf71af5202ab9c009248847e7412f74d8bc Mon Sep 17 00:00:00 2001 From: Michele Guerini Rocco Date: Thu, 4 Jun 2015 00:08:32 +0200 Subject: [PATCH] Fix typo --- src/Breve/Generator.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Breve/Generator.hs b/src/Breve/Generator.hs index 6eefde4..d322093 100644 --- a/src/Breve/Generator.hs +++ b/src/Breve/Generator.hs @@ -31,6 +31,6 @@ word = replicateM 10 letter where intHash :: Url -> Int intHash = decode . fromStrict . hash . pack --- Assing a unique name to the url +-- Assign a unique name to the url nameHash :: Url -> Name nameHash = evalState word . mkStdGen . intHash