rename file

This commit is contained in:
Joey Hess 2011-03-15 22:04:50 -04:00
parent f27df5e658
commit 4594bd51c1
12 changed files with 21 additions and 22 deletions

3
Key.hs
View file

@ -76,11 +76,10 @@ instance Arbitrary Key where
arbitrary = do
n <- arbitrary
b <- elements ['A'..'Z']
s <- arbitrary
return $ Key {
keyName = n,
keyBackendName = [b],
keySize = s,
keySize = Nothing,
keyMtime = Nothing
}