Rename dictionary
This commit is contained in:
parent
87f305b381
commit
833968f514
2
main.hs
2
main.hs
@ -60,4 +60,4 @@ exec opts@Args{..} = do
|
|||||||
dice' x n = readDiceware' (parseDiceware x) n
|
dice' x n = readDiceware' (parseDiceware x) n
|
||||||
-- default arguments
|
-- default arguments
|
||||||
phraseLength' = if phraseLength == 0 then 6 else phraseLength
|
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
|
||||||
|
Loading…
Reference in New Issue
Block a user