trapError :: IOThrowsError String -> IOThrowsError String
trapError action = catchError action (return . show)
trapError :: IOThrowsError String -> IOThrowsError String
trapError action = catchError action (return . show)
trapError action = catchError action (return . show)