diff options
| author | Akshay Nair <phenax5@gmail.com> | 2024-12-29 21:13:50 +0530 |
|---|---|---|
| committer | Akshay Nair <phenax5@gmail.com> | 2024-12-29 21:23:04 +0530 |
| commit | 2f35bbd272d7b1414003bf437cc6ad675fe81400 (patch) | |
| tree | bb24c7588ae17a01c541e5f61b793b9599d9098b /src/Chelleport/View.hs | |
| parent | fc2a09facce2fe6d06769712ea992f99bf15c8e2 (diff) | |
| download | chelleport-2f35bbd272d7b1414003bf437cc6ad675fe81400.tar.gz chelleport-2f35bbd272d7b1414003bf437cc6ad675fe81400.zip | |
Change font to roboto mono + hint position changes
Diffstat (limited to 'src/Chelleport/View.hs')
| -rw-r--r-- | src/Chelleport/View.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Chelleport/View.hs b/src/Chelleport/View.hs index a1195c7..314aa39 100644 --- a/src/Chelleport/View.hs +++ b/src/Chelleport/View.hs @@ -33,7 +33,7 @@ renderSearchView state searchData@(ModeSearchData {searchFilteredWords, searchHi fillRectVertices (matchStartX, matchStartY) (matchEndX, matchEndY) (w, h) <- windowSize - void $ drawText (w `div` 2, h `div` 2) searchingTextStyle (Text.pack $ getSearchText state searchData) + void $ drawText (w `div` 2, 5 + h `div` 2) searchingTextStyle (Text.pack $ getSearchText state searchData) renderHintsView :: (MonadDraw m) => State -> ModeHintsData -> m () renderHintsView state (ModeHintsData {stateGrid, stateKeySequence, stateIsMatched}) = do @@ -42,8 +42,8 @@ renderHintsView state (ModeHintsData {stateGrid, stateKeySequence, stateIsMatche (wcell, hcell) <- cellSize state forM_ (zip [0 ..] stateGrid) $ \(rowIndex, row) -> forM_ (zip [0 ..] row) $ \(colIndex, cell) -> do - let py = rowIndex * hcell + 10 - let px = colIndex * wcell + wcell `div` 2 - 20 + let py = rowIndex * hcell + 20 + let px = colIndex * wcell + wcell `div` 2 - 16 visible <- renderKeySequence stateKeySequence cell (px, py) when visible $ do renderTargetMarker state (rowIndex, colIndex) |