Merge pull request #15 from JPMoresmau/master

The first bug is blocking, the other one is to build on GHC 7.2
JPMoresmau · Jan 15, 2012 · 5e763af · 5e763af
2 parents b4131a9 + 4e994d7
commit 5e763af
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 4 deletions.
diff --git a/scion-browser.cabal b/scion-browser.cabal
@@ -1,5 +1,5 @@
 name:           scion-browser
-version:        0.2.1
+version:        0.2.2
 cabal-version:  >= 1.8
 build-type:     Simple
 license:        BSD3

diff --git a/src/Scion/PersistentBrowser/DbTypes.hs b/src/Scion/PersistentBrowser/DbTypes.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE QuasiQuotes, TemplateHaskell, TypeFamilies, OverloadedStrings, GADTs,FlexibleContexts #-}
+{-# LANGUAGE QuasiQuotes, TemplateHaskell, TypeFamilies, OverloadedStrings, GADTs, FlexibleContexts, EmptyDataDecls #-}
 
 module Scion.PersistentBrowser.DbTypes where
 

diff --git a/src/Scion/PersistentBrowser/Parser.hs b/src/Scion/PersistentBrowser/Parser.hs
@@ -75,8 +75,7 @@ parseDirectoryFiles dir tmpdir =
   do contents' <- getDirectoryContents dir
      let contents = map (\d -> dir </> d) (filterDots contents')
      files <- filterM doesFileExist contents
-     fPackages <- mapM (\fname -> do putChar '.'
-                                     hFlush stdout
+     fPackages <- mapM (\fname -> do hPutChar stderr '.' >> hFlush stderr
                                      p <- parseHoogleFile fname
                                      return (fname, p) )
                        files