jlamothe/passman
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

comment

Browse Source
This commit is contained in:
Jonathan Lamothe
2018-12-24 02:32:22 -05:00
parent 3b93849a0e
commit 771eaa9c42
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
app/Main.hs
View File

@@ -156,6 +156,7 @@ buildData = do
return $ set pwPolicy p d) return $ set pwPolicy p d)
(return d) (return d)
-- TODO: refactor this monstrosity
editPolicy :: PWPolicy -> Request PWPolicy editPolicy :: PWPolicy -> Request PWPolicy
editPolicy p = if validatePWPolicy p editPolicy p = if validatePWPolicy p
then do then do