    module Paths_leksah_server (
        version,
        getBinDir, getLibDir, getDataDir, getLibexecDir,
        getDataFileName
      ) where

    import qualified Control.Exception as Exception
    import Data.Version (Version(..))
    import System.Environment (getEnv)
    import Prelude

    catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
    catchIO = Exception.catch

    version :: Version
    version = Version {versionBranch = [0,12,1,2], versionTags = []}
    bindir, libdir, datadir, libexecdir :: FilePath

    bindir     = "/usr/bin"
    libdir     = "/usr/lib/haskell-packages/ghc/lib/leksah-server-0.12.1.2/ghc-7.6.3"
    datadir    = "/usr/share/leksah-server-0.12.1.2"
    libexecdir = "/usr/libexec"

    getBinDir, getLibDir, getDataDir, getLibexecDir :: IO FilePath
    getBinDir = catchIO (getEnv "leksah_server_bindir") (\_ -> return bindir)
    getLibDir = catchIO (getEnv "leksah_server_libdir") (\_ -> return libdir)
    getDataDir = catchIO (getEnv "leksah_server_datadir") (\_ -> return datadir)
    getLibexecDir = catchIO (getEnv "leksah_server_libexecdir") (\_ -> return libexecdir)

    getDataFileName :: FilePath -> IO FilePath
    getDataFileName name = do
      dir <- getDataDir
      return (dir ++ "/" ++ name)