Rename dictionary

This commit is contained in:
Rnhmjoj 2014-10-14 00:20:32 +02:00
parent 87f305b381
commit 833968f514
2 changed files with 1 additions and 1 deletions

View File

@ -60,4 +60,4 @@ exec opts@Args{..} = do
dice' x n = readDiceware' (parseDiceware x) n
-- default arguments
phraseLength' = if phraseLength == 0 then 6 else phraseLength
dictionary' = if null dictionary then "diceware.txt" else dictionary
dictionary' = if null dictionary then "diceware" else dictionary