module Paths_xss_sanitize (
version,
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir,
getDataFileName, getSysconfDir
) where
import qualified Control.Exception as Exception
import Data.Version (Version(..))
import System.Environment (getEnv)
import Prelude
#if defined(VERSION_base)
#if MIN_VERSION_base(4,0,0)
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
#else
catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a
#endif
#else
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
#endif
catchIO = Exception.catch
version :: Version
version = Version [0,3,6] []
bindir, libdir, dynlibdir, datadir, libexecdir, sysconfdir :: FilePath
bindir = "/usr/bin"
libdir = "/usr/lib64/ghc-8.2.2/xss-sanitize-0.3.6"
dynlibdir = "/usr/lib64"
datadir = "/usr/share/xss-sanitize-0.3.6"
libexecdir = "/usr/libexec/xss-sanitize-0.3.6"
sysconfdir = "/usr/etc"
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir, getSysconfDir :: IO FilePath
getBinDir = catchIO (getEnv "xss_sanitize_bindir") (\_ -> return bindir)
getLibDir = catchIO (getEnv "xss_sanitize_libdir") (\_ -> return libdir)
getDynLibDir = catchIO (getEnv "xss_sanitize_dynlibdir") (\_ -> return dynlibdir)
getDataDir = catchIO (getEnv "xss_sanitize_datadir") (\_ -> return datadir)
getLibexecDir = catchIO (getEnv "xss_sanitize_libexecdir") (\_ -> return libexecdir)
getSysconfDir = catchIO (getEnv "xss_sanitize_sysconfdir") (\_ -> return sysconfdir)
getDataFileName :: FilePath -> IO FilePath
getDataFileName name = do
dir <- getDataDir
return (dir ++ "/" ++ name)