diff options
| author | Gerd Möllmann <gerd,moellmann@gmail.com> | 2025-02-16 17:27:58 +0100 |
|---|---|---|
| committer | Gerd Möllmann <gerd,moellmann@gmail.com> | 2025-02-18 05:05:39 +0100 |
| commit | a51cfbbd15889ce2af59b0b1bffac8735f70f6b9 (patch) | |
| tree | c03a9ee6bf2297bc1b3f467540174f158a2232ab | |
| parent | df93e53a1c648654d8b128a5955bb4ff0229b041 (diff) | |
| download | emacs-a51cfbbd15889ce2af59b0b1bffac8735f70f6b9.tar.gz emacs-a51cfbbd15889ce2af59b0b1bffac8735f70f6b9.tar.bz2 emacs-a51cfbbd15889ce2af59b0b1bffac8735f70f6b9.zip | |
Hide cursor based on tty frame's `cursor-type'
* src/dispnew.c (terminal_cursor_magic): if selected-frame has
`(cursor-type . nil)' parameter.
| -rw-r--r-- | src/dispnew.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/dispnew.c b/src/dispnew.c index bb480f88537..c222e721077 100644 --- a/src/dispnew.c +++ b/src/dispnew.c @@ -3969,6 +3969,14 @@ terminal_cursor_magic (struct frame *root, struct frame *topmost_child) tty_hide_cursor (FRAME_TTY (root)); } } + + /* Hide cursor if selected frame has (cursor-type . nil). */ + { + struct frame *sf = SELECTED_FRAME (); + Lisp_Object cursor = assq_no_quit (Qcursor_type, sf->param_alist); + if (CONSP (cursor) && NILP (XCDR (cursor))) + tty_hide_cursor (FRAME_TTY (root)); + } } void |