summaryrefslogtreecommitdiffhomepage
path: root/keysafe.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-08-16 23:54:02 -0400
committerJoey Hess <joeyh@joeyh.name>2016-08-16 23:54:02 -0400
commitac074d3b596a93afefdcf114ba5ae52fadf8eef8 (patch)
treeeabde99fef5249c16edaf40c6d27bfb75cb3ec5d /keysafe.hs
parentfc50d28c84fe7c79d47e89e93e959dbaa68cda5b (diff)
downloadkeysafe-ac074d3b596a93afefdcf114ba5ae52fadf8eef8.tar.gz
allow shorter name
Diffstat (limited to 'keysafe.hs')
-rw-r--r--keysafe.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/keysafe.hs b/keysafe.hs
index ae85ce0..311a598 100644
--- a/keysafe.hs
+++ b/keysafe.hs
@@ -175,7 +175,7 @@ restore ui secretkeydest = do
validateName :: Name -> Maybe Problem
validateName (Name n)
- | B.length n < 6 = Just "The name should be at least 6 letters long."
+ | B.length n < 2 = Just "The name should be at least 2 letters long."
| otherwise = Nothing
userName :: IO Name