Debian.Debianize.Prelude

Functions and instances used by but not related to cabal-debian. These could conceivably be moved into more general libraries.

Documentation

curry3 :: ((a, b, c) -> d) -> a -> b -> c -> d

type DebMap = Map BinPkgName (Maybe DebianVersion)

buildDebVersionMap :: IO DebMap

Read and parse the status file for installed debian packages: varlibdpkgstatus

(!) :: DebMap -> BinPkgName -> DebianVersion

trim :: String -> String

strictReadF :: (Text -> r) -> FilePath -> IO r

replaceFile :: FilePath -> String -> IO ()

Write a file which we might still be reading from in order to compute the text argument.

modifyFile :: FilePath -> (String -> IO (Maybe String)) -> IO ()

Compute the new file contents from the old. If f returns Nothing do not write.

diffFile :: FilePath -> Text -> IO (Maybe String)

removeIfExists :: FilePath -> IO ()

dpkgFileMap :: IO (Map FilePath (Set BinPkgName))

Create a map from pathname to the names of the packages that contains that pathname using the contents of the debian package info directory varlibdpkginfo.

debOfFile :: FilePath -> ReaderT (Map FilePath (Set BinPkgName)) IO (Maybe BinPkgName)

Given a path, return the name of the package that owns it.

cond :: t -> t -> Bool -> t

readFile' :: FilePath -> IO Text

readFileMaybe :: FilePath -> IO (Maybe Text)

showDeps :: [[Relation]] -> String

showDeps' :: [a] -> [[Relation]] -> String

withCurrentDirectory :: FilePath -> IO a -> IO a

From Darcs.Utils - set the working directory and run an IO operation.

getDirectoryContents' :: FilePath -> IO [FilePath]

Get directory contents minus dot files.

setMapMaybe :: (Ord a, Ord b) => (a -> Maybe b) -> Set a -> Set b

zipMaps :: Ord k => (k -> Maybe a -> Maybe b -> Maybe c) -> Map k a -> Map k b -> Map k c

foldEmpty :: r -> ([a] -> r) -> [a] -> r

maybeL :: Lens a (Maybe b) -> Maybe b -> a -> a

If the current value of getL x is Nothing, replace it with f.

indent :: [Char] -> String -> String

maybeRead :: Read a => String -> Maybe a

read' :: Read a => (String -> a) -> String -> a

modifyM :: MonadState a m => (a -> m a) -> m ()

intToVerbosity' :: Int -> Verbosity

Version of intToVerbosity that first clamps its argument to the acceptable range (0-3).

(~=) :: Monad m => Lens a b -> b -> StateT a m ()

Set a lens value. (This is a version of Data.Lens.Lazy.~= that returns () instead of b.)

(~?=) :: Monad m => Lens a (Maybe b) -> Maybe b -> StateT a m ()

Set b if it currently isNothing and the argument isJust, that is 1. Nothing happens if the argument isNothing 2. Nothing happens if the current value isJust

(%=) :: Monad m => Lens a b -> (b -> b) -> StateT a m ()

Modify a value. (This is a version of Data.Lens.Lazy.%= that returns () instead of a.)

(+=) :: (Monad m, Ord b) => Lens a (Set b) -> b -> StateT a m ()

Insert an element into a (Set b)

(++=) :: (Monad m, Ord b) => Lens a (Map b c) -> (b, c) -> StateT a m ()

Insert an element into a (Map b c)

(+++=) :: (Monad m, Ord b, Monoid c) => Lens a (Map b c) -> (b, c) -> StateT a m ()

Insert an element into a (Map b (Set c))

listElemLens :: (a -> Bool) -> Lens [a] (Maybe a)

maybeLens :: a -> Lens a b -> Lens (Maybe a) b

fromEmpty :: Set a -> Set a -> Set a

fromSingleton :: a -> ([a] -> a) -> Set a -> a

class Pretty a where

Methods

pretty :: a -> Doc

Instances

Pretty Bool

Pretty String

Pretty Version

Pretty Relations

Pretty OrRelation

Pretty Relation

Pretty SrcPkgName

Pretty BinPkgName

Pretty ArchitectureReq

Pretty VersionReq

Pretty ChangesFile

Pretty ChangedFileSpec

Pretty ChangeLogEntry

Pretty ChangeLog

Pretty DebianVersion

Pretty NameAddr

Pretty Text

Pretty License

Pretty PackageIdentifier

Pretty VersionRange

Pretty PackageName

Pretty Area

Pretty Section

Pretty PackageArchitectures

Pretty PackagePriority

Pretty SourceFormat

Pretty StandardsVersion

Pretty [NameAddr]

Pretty (Maybe SrcPkgName)

Pretty (Maybe NameAddr)

Pretty (Maybe PackageArchitectures)

Pretty a => Pretty (Control' a)

This may have bad performance issues (why?)

Pretty a => Pretty (Paragraph' a)

Pretty a => Pretty (Field' a)