Mercurial > emacs
view lisp/term/vt200.el @ 95865:99530dd346d3
(LFACE_FOUNDRY): New macro.
(check_lface_attrs): Check foundry.
(set_lface_from_font): Don't parse "FOUNDRY-FAMILY" from.
(merge_face_vectors): Check foundry.
(merge_face_ref): Likewise.
(Finternal_set_lisp_face_attribute): Likewise.
(x_update_menu_appearance): Likewise.
(Finternal_get_lisp_face_attribute): Likewise.
(lface_hash): Likewise.
(lface_same_font_attributes_p): Likewise.
(x_supports_face_attributes_p): Likewise.
(tty_supports_face_attributes_p): Likewise.
(Finternal_set_alternative_font_family_alist): Intern strings.
(Finternal_set_alternative_font_registry_alist): Downcase strings.
(realize_default_face): Set LFACE_FOUNDRY (lface).
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 13 Jun 2008 02:08:32 +0000 |
parents | 528714e93230 |
children | 4bc33ffdda1a ef719132ddfa |
line wrap: on
line source
;; -*- no-byte-compile: t -*- ;; For our purposes we can treat the vt200 and vt100 almost alike. ;; Most differences are handled by the termcap entry. (defun terminal-init-vt200 () "Terminal initialization function for vt200." (tty-run-terminal-initialization (selected-frame) "vt100") ;; Make F11 an escape key. (define-key input-decode-map "\e[23~" [f11]) ;Probably redundant. (define-key local-function-key-map [f11] [?\e])) ;; arch-tag: 0f78f583-9f32-4237-b106-28bcfff21d89 ;;; vt200.el ends here