Function: xterm--init-update-cursor

xterm--init-update-cursor is a byte-compiled function defined in xterm.el.gz.

Signature

(xterm--init-update-cursor)

Documentation

Register hooks to run xterm--update-cursor-type appropriately.

Source Code

;; Defined in /usr/src/emacs/lisp/term/xterm.el.gz
(defun xterm--init-update-cursor ()
  "Register hooks to run `xterm--update-cursor-type' appropriately."
  (when (memq xterm-update-cursor '(color t))
    (push xterm--reset-cursor-color-escape-sequence
          (terminal-parameter nil 'tty-mode-reset-strings))
    ;; No need to set `tty-mode-set-strings' because
    ;; `xterm--post-command-hook' handles restoring the cursor color.

    (xterm--update-cursor-color))
  (when (memq xterm-update-cursor '(type t))
    (xterm--update-cursor-type))
  (add-hook 'post-command-hook 'xterm--post-command-hook))