hsdev 0.1.8.0 → 0.1.8.1

raw patch · 3 files changed

+5/−4 lines, 3 files

Files

• hsdev.cabal +1/−1
• src/HsDev/Server/Commands.hs +1/−1
• tests/Test.hs +3/−2

@@ -2,7 +2,7 @@ --  see http://haskell.org/cabal/users-guide/
 
 name:                hsdev
-version:             0.1.8.0
+version:             0.1.8.1
 synopsis:            Haskell development library and tool with support of autocompletion, symbol info, go to declaration, find references etc.
 description:
   Haskell development library and tool with support of autocompletion, symbol info, go to declaration, find references, hayoo search etc.

@@ -60,7 +60,7 @@ import System.Win32.FileMapping.NamePool
 import System.Win32.PowerShell (escape, quote, quoteDouble)
 #else
-import Control.Exception (handle)
+import Control.Exception (SomeException, handle)
 import System.Posix.Process
 import System.Posix.Files (removeLink)
 import System.Posix.IO

@@ -5,6 +5,7 @@ 	) where
 
 import Control.Lens
+import Control.Exception (displayException)
 import Data.Aeson hiding (Error)
 import Data.Aeson.Lens
 import Data.Default
@@ -18,8 +19,8 @@ 	r <- inServer srv def c
 	case r of
 		Result v -> return $ Just v
-		Error e _ -> do
-			expectationFailure $ "command result error: " ++ e
+		Error e -> do
+			expectationFailure $ "command result error: " ++ displayException e
 			return Nothing
 
 exports :: Maybe Value -> [String]