Pugs 6.2.13.20120717 → 6.2.13.20130611

raw patch · 2 files changed

+4/−4 lines, 2 filesnew-uploader

Files

Pugs.cabal +1/−1
src/Pugs/AST/Eval.hs +3/−3

Pugs.cabal view

@@ -1,5 +1,5 @@ Name            : Pugs-Version         : 6.2.13.20120717+Version         : 6.2.13.20130611 license         : BSD3 license-file    : LICENSE cabal-version   : >= 1.2.3

src/Pugs/AST/Eval.hs view

@@ -3,8 +3,8 @@ module Pugs.AST.Eval where import Pugs.Internals import Pugs.Cont hiding (resetT)-import System.IO.Error (try, IOError)-import Control.Exception (SomeException)+import System.IO.Error (IOError)+import Control.Exception (SomeException, try)  import Pugs.AST.SIO import {-# SOURCE #-} Pugs.AST.Internals@@ -156,7 +156,7 @@ guardIO x = do     rv <- io $ try x     case rv of-        Left e -> fail (show e)+        Left e -> fail (show (e :: SomeException))         Right v -> return v  {-|