Commit 98126f70 authored by bjorn@bringert.net's avatar bjorn@bringert.net
Browse files

s/parseDescription/parsePackageDescription/.

parent 3d273905
......@@ -40,7 +40,7 @@ import System.IO.Unsafe
import Distribution.Package (PackageIdentifier(..), showPackageId)
import Distribution.PackageDescription (GenericPackageDescription(..)
, PackageDescription(..)
, parseDescription, ParseResult(..))
, parsePackageDescription, ParseResult(..))
import Distribution.Version (Dependency, showVersion)
import Distribution.Verbosity
import System.FilePath ((</>), takeExtension, (<.>))
......@@ -124,7 +124,7 @@ parseRepoIndex :: Repo -> ByteString -> [PkgInfo]
parseRepoIndex repo s =
do (name, content) <- readTarArchive s
if takeExtension name == ".cabal"
then case parseDescription (BS.unpack content) of
then case parsePackageDescription (BS.unpack content) of
ParseOk _ descr -> return $ PkgInfo {
pkgRepo = repo,
pkgDesc = descr
......
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