parseUpdateLocation :: Parser Location
parseUpdateLocation = fieldWrapperParser (Location) $ long "uL" <> long "updateLoc" <> metavar "NEWLOC"
                <> help "Update the location with the new location as the argument."
parseUpdateLocation :: Parser Location
parseUpdateLocation = fieldWrapperParser (Location) $ long "uL" <> long "updateLoc" <> metavar "NEWLOC"
                <> help "Update the location with the new location as the argument."
parseUpdateLocation = fieldWrapperParser (Location) $ long "uL" <> long "updateLoc" <> metavar "NEWLOC"
                <> help "Update the location with the new location as the argument."