mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-30 08:09:04 +00:00
55a714795d
lisp/notifications.el (dbus-debug): lisp/term/linux.el (gpm-mouse-enable): lisp/term/screen.el (xterm-register-default-colors): Declare.
13 lines
350 B
EmacsLisp
13 lines
350 B
EmacsLisp
;; Treat a screen terminal similar to an xterm.
|
|
(load "term/xterm")
|
|
|
|
(declare-function xterm-register-default-colors "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
|