Commit ffa35ce0 authored by Sergei Trofimovich's avatar Sergei Trofimovich
Browse files

Distribution/Client/SrcDist.hs: fixed warning on -Wall (unused result)

parent 5fc5ff49
......@@ -55,7 +55,7 @@ sdist flags = do
| otherwise = pkg
setupMessage verbosity "Building source dist for" (packageId pkg')
if snapshot
_ <- if snapshot
then prepareSnapshotTree verbosity pkg' mb_lbi distPref tmpDir pps
else prepareTree verbosity pkg' mb_lbi distPref tmpDir pps
targzFile <- createArchive verbosity pkg tmpDir distPref
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment