implement another adjustment -- easy to do now!

This commit is contained in:
Joey Hess 2016-03-11 19:53:18 -04:00
parent a85196bd4e
commit 41b7c5f6aa
Failed to extract signature
2 changed files with 19 additions and 8 deletions

View file

@ -20,6 +20,6 @@ seek = withWords start
start :: [String] -> CommandStart
start [] = do
enterAdjustedBranch UnlockAdjustment
enterAdjustedBranch HideMissingAdjustment
next $ next $ return True
start _ = error "Unknown parameter"