summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJustin Bedo <cu@cua0.org>2024-10-10 16:02:46 +1100
committerJustin Bedo <cu@cua0.org>2024-10-10 16:09:38 +1100
commitc80a1d442dbc9c37d48f04b4a943f923629ef61b (patch)
treea63189ca165d5cf4c812c3e5116bdc74af84e896
parentaf429246e83dd5d61d2ed6f2580cad2350dd594c (diff)
switch palette
-rw-r--r--jterm.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/jterm.hs b/jterm.hs
index d795554..11b8bc2 100644
--- a/jterm.hs
+++ b/jterm.hs
@@ -406,8 +406,8 @@ main = do
withXftColorName display visual colourmap "black" $ \fgcolour ->
withXftColorValue display visual colourmap (XRenderColor 0xffff 0xffff 0xeaea 0xffff) $ \bgcolour -> do
- withXftColorValue display visual colourmap (XRenderColor 0x3030 0xd4d4 0xd4d4 0xffff) $ \selcolour -> do
- withXftColorValue display visual colourmap (XRenderColor 0xaeae 0xeeee 0xeeee 0xffff) $ \linecolour -> do
+ withXftColorValue display visual colourmap (XRenderColor 0xf7f7 0xeaea 0xffff 0xffff) $ \selcolour -> do
+ withXftColorValue display visual colourmap (XRenderColor 0xaeae 0xf7f7 0xffff 0xffff) $ \linecolour -> do
selectInput display win (exposureMask .|. buttonPressMask .|. buttonReleaseMask .|. keyPressMask .|. pointerMotionMask)
allocaXEvent $ \e ->
flip runStateT (Buffer 0 "" (0, 0) Nothing pty) $