Permalink
Browse files

Fix warnings.

  • Loading branch information...
1 parent cb6ec01 commit 700bf1271c678cb848234949e7819998bf206643 @nominolo committed May 11, 2011
Showing with 3 additions and 4 deletions.
  1. +2 −3 src/Scion/Types/Session.hs
  2. +1 −1 src/Scion/Worker/Commands.hs
@@ -10,12 +10,11 @@ import Scion.Utils.Convert
import Scion.Types.Note
import Scion.Types.Core
-import Paths_scion as Info ( version, getBinDir )
+import Paths_scion as Info ( getBinDir )
import Control.Applicative
-import Control.Exception ( Exception, throwIO )
import Data.Binary
-import Data.List ( intersperse, intercalate )
+import Data.List ( intercalate )
import Data.Monoid
import qualified Data.MultiSet as MS
import Data.String ( IsString(fromString) )
@@ -92,7 +92,7 @@ load how_much = do
_ <- getAndClearNewNotes
(res, time_diff)
- <- withMeasuredTime $ \stop_timer -> do
+ <- withMeasuredTime $ \_stop_timer -> do
Ghc.load how_much --WithLogger (my_logger msgs) how_much
`gcatch` (\(e :: Ghc.SourceError) -> do
Ghc.printExceptionAndWarnings e

0 comments on commit 700bf12

Please sign in to comment.