Commit 8f4c823a authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix up whitespace

parent f6b7966a
...@@ -8,9 +8,9 @@ ...@@ -8,9 +8,9 @@
----------------------------------------------------------------------------- -----------------------------------------------------------------------------
-- TODO: -- TODO:
-- - validate modules -- * validate modules
-- - expanding of variables in new-style package conf -- * expanding of variables in new-style package conf
-- - version manipulation (checking whether old version exists, -- * version manipulation (checking whether old version exists,
-- hiding old version?) -- hiding old version?)
module Main (main) where module Main (main) where
...@@ -38,12 +38,11 @@ import System.Console.GetOpt ...@@ -38,12 +38,11 @@ import System.Console.GetOpt
import Text.PrettyPrint import Text.PrettyPrint
import qualified Control.Exception as Exception import qualified Control.Exception as Exception
import Data.Maybe import Data.Maybe
import Data.Char ( isSpace ) import Data.Char ( isSpace )
import Monad import Monad
import Directory import Directory
import System ( getArgs, getProgName, getEnv, import System ( getArgs, getProgName, getEnv, exitWith, ExitCode(..) )
exitWith, ExitCode(..)
)
import System.IO import System.IO
import System.IO.Error (try) import System.IO.Error (try)
import Data.List ( isPrefixOf, isSuffixOf, intersperse, sortBy ) import Data.List ( isPrefixOf, isSuffixOf, intersperse, sortBy )
...@@ -1112,9 +1111,9 @@ parseSearchPath path = split path ...@@ -1112,9 +1111,9 @@ parseSearchPath path = split path
(chunk', rest') = break (==searchPathSeparator) s (chunk', rest') = break (==searchPathSeparator) s
-- | A platform-specific character used to separate search path strings in -- | A platform-specific character used to separate search path strings
-- environment variables. The separator is a colon (\":\") on Unix and Macintosh, -- in environment variables. The separator is a colon (\":\") on Unix
-- and a semicolon (\";\") on the Windows operating system. -- and Macintosh, and a semicolon (\";\") on the Windows operating system.
searchPathSeparator :: Char searchPathSeparator :: Char
#if mingw32_HOST_OS || mingw32_TARGET_OS #if mingw32_HOST_OS || mingw32_TARGET_OS
searchPathSeparator = ';' searchPathSeparator = ';'
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment