ui: fix a vty version bound typo & possibly build failures (#494)
CPP intended to use old code for vty < 5.15 was always using the new code.
This commit is contained in:
parent
332c23865e
commit
a1c0835445
@ -15,7 +15,7 @@ import Control.Concurrent (threadDelay)
|
||||
import Control.Concurrent.Async
|
||||
import Control.Monad
|
||||
-- import Control.Monad.IO.Class (liftIO)
|
||||
#if !MIN_VERSION_vty(0,15,0)
|
||||
#if !MIN_VERSION_vty(5,15,0)
|
||||
import Data.Default (def)
|
||||
#endif
|
||||
-- import Data.Monoid --
|
||||
@ -228,7 +228,7 @@ runBrickUi uopts@UIOpts{cliopts_=copts@CliOpts{reportopts_=ropts}} j = do
|
||||
)
|
||||
|
||||
-- and start the app. Must be inside the withManager block
|
||||
#if MIN_VERSION_vty(0,15,0)
|
||||
#if MIN_VERSION_vty(5,15,0)
|
||||
let myVty = mkVty mempty
|
||||
#else
|
||||
let myVty = mkVty def
|
||||
|
||||
Loading…
Reference in New Issue
Block a user