withPackagePath', withCandidatePath' :: DynamicPath -> (PkgInfo -> ServerPartE a) -> ServerPartE a
withPackagePath'   dpath k = withPackagePath   dpath $ \pkg _ -> k pkg
withPackagePath', withCandidatePath' :: DynamicPath -> (PkgInfo -> ServerPartE a) -> ServerPartE a
withPackagePath'   dpath k = withPackagePath   dpath $ \pkg _ -> k pkg
withPackagePath'   dpath k = withPackagePath   dpath $ \pkg _ -> k pkg