diff --git a/Pugs.cabal b/Pugs.cabal
--- a/Pugs.cabal
+++ b/Pugs.cabal
@@ -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
diff --git a/src/Pugs/AST/Eval.hs b/src/Pugs/AST/Eval.hs
--- a/src/Pugs/AST/Eval.hs
+++ b/src/Pugs/AST/Eval.hs
@@ -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
 
 {-|