Mercurial > emacs
view lisp/term/vt300.el @ 82172:4c1979b84193
(x_draw_fringe_bitmap) [USE_TOOLKIT_SCROLL_BARS]:
Extend fringe background to scroll bar gap.
(x_scroll_bar_create) [USE_TOOLKIT_SCROLL_BARS]:
Set bar->fringe_extended_p.
(XTset_vertical_scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
Put leftmost/rightmost scroll bars on frame edge. Check fringe
background extension. Don't clear extended fringe background area.
author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
---|---|
date | Fri, 27 Jul 2007 08:40:47 +0000 |
parents | af1c58687bdd |
children | 532e0a9335a9 890cc78a5a24 |
line wrap: on
line source
;; -*- no-byte-compile: t -*- (defun terminal-init-vt300 () "Terminal initialization function for vt300." (load "term/vt100" nil t) ;; Make F11 an escape key. (define-key function-key-map "\e[23~" [?\e])) ;;; arch-tag: 876831c9-a6f2-444a-b033-706e6fbc149f ;;; vt300.el ends here