emacs/lisp/term/screen.el

13 lines
350 B
EmacsLisp
Raw Normal View History

2011-02-27 16:26:22 -05:00
;; Treat a screen terminal similar to an xterm.
(load "term/xterm")
(declare-function xterm-register-default-colors "xterm" ())
2011-02-27 16:26:22 -05:00
(defun terminal-init-screen ()
"Terminal initialization function for screen."
;; Use the xterm color initialization code.
(xterm-register-default-colors)
(tty-set-up-initial-frame-faces))
;; screen.el ends here