-- remove migrate by 1.0

parseAdd :: Parser Command
parseAdd = Add
           <$> parseUsername
           <*> optional parseLocation
           <*> optional parseNotes
parseAdd :: Parser Command
parseAdd = Add
           <$> parseUsername
           <*> optional parseLocation
           <*> optional parseNotes
parseAdd = Add
           <$> parseUsername
           <*> optional parseLocation
           <*> optional parseNotes