fortrangoingonforty/fortty / 09ed062

Browse files

Add cursor style and blink configuration fields

Add cursor_style (block/underline/bar) and cursor_blink fields to
config_t with sensible defaults. TOML parsing not yet implemented.
Authored by espadonne
SHA
09ed0627ada6d93b946a3051c8dac055e6751350
Parents
15b48a8
Tree
c0e2a64

1 changed file

StatusFile+-
M src/config/config.f90 6 0
src/config/config.f90modified
@@ -28,6 +28,10 @@ module config_mod
2828
     ! Terminal
2929
     integer :: scrollback_lines = 10000
3030
31
+    ! Cursor
32
+    integer :: cursor_style = 0        ! 0=block, 1=underline, 2=bar
33
+    logical :: cursor_blink = .true.   ! Enable cursor blinking
34
+
3135
     ! Shell
3236
     character(len=256) :: shell_program = ''
3337
@@ -74,6 +78,8 @@ contains
7478
     cfg%palette(15) = make_rgb_color(255, 255, 255)   ! Bright White
7579
7680
     cfg%scrollback_lines = 10000
81
+    cfg%cursor_style = 0      ! block
82
+    cfg%cursor_blink = .true.
7783
     cfg%shell_program = ''
7884
     cfg%loaded = .false.
7985