comment

2018-12-24 02:32:22 -05:00 · 2018-12-24 02:32:22 -05:00 · 771eaa9c42
parent 3b93849a0e
commit 771eaa9c42
1 changed files with 1 additions and 0 deletions
--- a/app/Main.hs
+++ b/app/Main.hs
@ -156,6 +156,7 @@ buildData = do
      return $ set pwPolicy p d)
    (return d)

+-- TODO: refactor this monstrosity
 editPolicy :: PWPolicy -> Request PWPolicy
 editPolicy p = if validatePWPolicy p
  then do