Fix error message

1 files changed, 1 insertions, 1 deletions

diff --git a/src/Main.hs b/src/Main.hs
index 04ccc163..6b47b64e 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -271,7 +271,7 @@ readInterfaceFiles name_cache_accessor pairs = do
       case eIface of
         Left err -> liftIO $ do
           putStrLn ("Warning: Cannot read " ++ iface ++ ":")
-          putStrLn ("   " ++ show err)
+          putStrLn ("   " ++ err)
           putStrLn "Skipping this interface."
           return Nothing
         Right f -> return $ Just (f, html)