mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-13 09:32:47 +00:00
12 lines
319 B
EmacsLisp
12 lines
319 B
EmacsLisp
;; -*- no-byte-compile: t -*-
|
|
;; Treat a screen terminal similar to an xterm.
|
|
(load "term/xterm")
|
|
|
|
(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
|