module Paths_haddock ( version, getBinDir, getLibDir, getDataDir, getLibexecDir, getDataFileName ) where import Data.Version (Version(..)) import System.Environment (getEnv) version :: Version version = Version {versionBranch = [2,9,2], versionTags = []} bindir, libdir, datadir, libexecdir :: FilePath bindir = "/usr/bin" libdir = "/usr/lib64/ghc-7.0.4/haddock-2.9.2" datadir = "/usr/share/haddock-2.9.2" libexecdir = "/usr/libexec" getBinDir, getLibDir, getDataDir, getLibexecDir :: IO FilePath getBinDir = catch (getEnv "haddock_bindir") (\_ -> return bindir) getLibDir = catch (getEnv "haddock_libdir") (\_ -> return libdir) getDataDir = catch (getEnv "haddock_datadir") (\_ -> return datadir) getLibexecDir = catch (getEnv "haddock_libexecdir") (\_ -> return libexecdir) getDataFileName :: FilePath -> IO FilePath getDataFileName name = do dir <- getDataDir return (dir ++ "/" ++ name)