mirror of
https://github.com/ilyakooo0/vty.git
synced 2024-10-04 11:17:08 +03:00
Fix for issue #35
This commit is contained in:
parent
53d501be14
commit
506979fe13
@ -74,7 +74,7 @@ failure".
|
||||
|]
|
||||
wait_for_return
|
||||
results <- do_test_menu 1
|
||||
env_attributes <- mapM ( \env_name -> catch ( Env.getEnv env_name >>= return . (,) env_name )
|
||||
env_attributes <- mapM ( \env_name -> Control.Exception.catch ( Env.getEnv env_name >>= return . (,) env_name )
|
||||
( \ (_ :: SomeException) -> return (env_name, "") )
|
||||
)
|
||||
[ "TERM", "COLORTERM", "LANG", "TERM_PROGRAM", "XTERM_VERSION" ]
|
||||
|
Loading…
Reference in New Issue
Block a user