replace removeLink with removeFile

same reasoning as in commit 5cc8d9d03b
This commit is contained in:
Joey Hess 2025-02-11 13:41:26 -04:00
parent 90eb1e2da6
commit f8bb9a8734
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
9 changed files with 16 additions and 21 deletions

View file

@ -233,7 +233,7 @@ buildrpms topdir l = do
<$> liftIO (getDirectoryContents rpmrepo)
forM_ tarrpmarches $ \(tararch, rpmarch) ->
forM_ (filter (isstandalonetarball tararch . fst) l) $ \(tarball, v) -> do
liftIO $ mapM_ (removeWhenExistsWith (R.removeLink . toRawFilePath))
liftIO $ mapM_ (removeWhenExistsWith removeFile)
(filter ((rpmarch ++ ".rpm") `isSuffixOf`) oldrpms)
void $ liftIO $ boolSystem script
[ Param rpmarch