Function: tty-handle-reverse-video

tty-handle-reverse-video is a byte-compiled function defined in faces.el.gz.

Signature

(tty-handle-reverse-video FRAME PARAMETERS)

Documentation

Handle the reverse-video frame parameter for terminal frames.

Source Code

;; Defined in /usr/src/emacs/lisp/faces.el.gz
(defun tty-handle-reverse-video (frame parameters)
  "Handle the reverse-video frame parameter for terminal frames."
  (when (cdr (assq 'reverse parameters))
    (let* ((params (frame-parameters frame))
	   (bg (cdr (assq 'foreground-color params)))
	   (fg (cdr (assq 'background-color params))))
      (modify-frame-parameters frame
			       (list (cons 'foreground-color fg)
				     (cons 'background-color bg)))
      (if (equal bg (cdr (assq 'mouse-color params)))
	  (modify-frame-parameters frame
				   (list (cons 'mouse-color fg))))
      (if (equal bg (cdr (assq 'cursor-color params)))
	  (modify-frame-parameters frame
				   (list (cons 'cursor-color fg)))))))