git.iko.soy/vty
on master help sign in
Fix for issue #35
506979fAmy de Buitléir
test/interactive_terminal_test.hs+1−1
compare with master
unifiedsplit
@@ -74,7 +74,7 @@ failure".
74|]
74|]
75 wait_for_return
75 wait_for_return
76 results <- do_test_menu 1
76 results <- do_test_menu 1
77− env_attributes <- mapM ( \env_name -> catch ( Env.getEnv env_name >>= return . (,) env_name )
77+ env_attributes <- mapM ( \env_name -> Control.Exception.catch ( Env.getEnv env_name >>= return . (,) env_name )
78 ( \ (_ :: SomeException) -> return (env_name, "") )
78 ( \ (_ :: SomeException) -> return (env_name, "") )
79 )
79 )
80 [ "TERM", "COLORTERM", "LANG", "TERM_PROGRAM", "XTERM_VERSION" ]
80 [ "TERM", "COLORTERM", "LANG", "TERM_PROGRAM", "XTERM_VERSION" ]