module WASH.CGI.CGIConfig where
import System.IO.Unsafe
import System
tmpDir, varDir, imageDir, emailTmpDir, frameDir, persistentDir, persistent2Dir, registryDir, keyFile, pbmPath, catProgram, sendmailProgram :: String
globalRoot :: String
globalRoot =
unsafePerformIO (catch (getEnv "HOME") (\ ioe -> return ""))
tmpDir = globalRoot ++ "/tmp/"
varDir = globalRoot ++ "/tmp/"
imageDir = tmpDir ++ "Images/"
emailTmpDir = tmpDir
frameDir = tmpDir ++ "Frames/"
persistentDir = varDir ++ "Persistent/"
persistent2Dir = varDir ++ "Persistent2/"
transactionDir = varDir ++ "Transactions/"
registryDir = tmpDir ++ "REGISTRY/"
keyFile = varDir ++ "KEYFILE"
pbmPath = "/usr/X11R6/bin/"
catProgram = "/bin/cat"
sendmailProgram = "/usr/sbin/sendmail"