diff options
| author | David Waern <david.waern@gmail.com> | 2010-12-11 17:51:19 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2010-12-11 17:51:19 +0000 |
| commit | 30d49c2613505b2fcf827e37a3d779a923124844 (patch) | |
| tree | 1510db258604f59f4159b73b8fd6f4b7044fb38a | |
| parent | 799474662fb83e5baa8045d678635020fd050763 (diff) | |
Fix indentation problem
| -rw-r--r-- | src/Main.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/Main.hs b/src/Main.hs index defccdc6..deb699f7 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -403,14 +403,14 @@ getPrologue flags = #ifdef IN_GHC_TREE getInTreeLibDir :: IO String -getInTreeLibDir = - do m <- getExecDir - case m of - Nothing -> error "No GhcLibDir found" +getInTreeLibDir = do + m <- getExecDir + case m of + Nothing -> error "No GhcLibDir found" #ifdef NEW_GHC_LAYOUT - Just d -> return (d </> ".." </> "lib") + Just d -> return (d </> ".." </> "lib") #else - Just d -> return (d </> "..") + Just d -> return (d </> "..") #endif |