view lisp/term/vt200.el @ 2800:a7b260d27c2c

(face-initialize): Don't create the `modeline' face. Set region-face. (invert-face): Really do use the default colors. (x-initialize-frame-faces): Always try "gray" color for primary-selection; always invert if that fails. Similar changes for highlight, secondary-selection. (make-face): Add interactive spec. (set-default-font): Deleted.

(defun terminal-80-columns ()
  (interactive)
  (send-string-to-terminal "\033[?3l")
  (set-frame-width 80))

(defun terminal-132-columns ()
  (interactive)
  (send-string-to-terminal "\033[?3h")
  (set-frame-width 132))