Commit e1c7b4d0 authored by Alexis Williams's avatar Alexis Williams
Browse files

Fix mystery errors. No idea how I managed to build this earlier.

parent e60fdc12
...@@ -211,7 +211,7 @@ packageToSdist verbosity listSources archiveFormat outputFile pkg = do ...@@ -211,7 +211,7 @@ packageToSdist verbosity listSources archiveFormat outputFile pkg = do
entries <- execWriterT (evalStateT entriesM []) entries <- execWriterT (evalStateT entriesM [])
write . GZip.compress . Tar.write $ entries write . GZip.compress . Tar.write $ entries
notice verbosity $ "Wrote tarball sdist to " ++ outputPath ++ "\n" notice verbosity $ "Wrote tarball sdist to " ++ outputFile ++ "\n"
| archiveFormat == ZipFormat -> | archiveFormat == ZipFormat ->
die' verbosity "'.zip' sdists are not yet supported." die' verbosity "'.zip' sdists are not yet supported."
......
...@@ -26,7 +26,7 @@ import Data.Maybe (fromMaybe) ...@@ -26,7 +26,7 @@ import Data.Maybe (fromMaybe)
import System.FilePath import System.FilePath
import Distribution.Package import Distribution.Package
( PackageId(..), ComponentId, UnitId ) ( PackageId, ComponentId, UnitId )
import Distribution.Client.Setup import Distribution.Client.Setup
( ArchiveFormat(..) ) ( ArchiveFormat(..) )
import Distribution.Compiler import Distribution.Compiler
......
Supports Markdown
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