propellor spin

This commit is contained in:
Joey Hess 2014-07-18 14:42:46 -04:00
parent 43116fd198
commit ef472be6a6
Failed to extract signature
1 changed files with 1 additions and 1 deletions

View File

@ -82,7 +82,7 @@ getMainCf name = parse . lines <$> readProcess "postconf" [name]
mainCfIsSet :: String -> IO Bool
mainCfIsSet name = do
v <- getMainCf name
return $ v == Nothing || v == Just ""
return $ v /= Nothing && v /= Just ""
-- | Parses main.cf, and removes any initial configuration lines that are
-- overridden to other values later in the file.