Mercurial > emacs
comparison lisp/term/x-win.el @ 5515:920b55d2057b
(vendor-key-syms): Set this variable.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 08 Jan 1994 14:36:57 +0000 |
parents | 59aa39575936 |
children | 899159133053 |
comparison
equal
deleted
inserted
replaced
5514:8112b5b2651b | 5515:920b55d2057b |
---|---|
495 (put 'tab 'ascii-character ?\t) | 495 (put 'tab 'ascii-character ?\t) |
496 (put 'linefeed 'ascii-character ?\n) | 496 (put 'linefeed 'ascii-character ?\n) |
497 (put 'clear 'ascii-character 12) | 497 (put 'clear 'ascii-character 12) |
498 (put 'return 'ascii-character 13) | 498 (put 'return 'ascii-character 13) |
499 (put 'escape 'ascii-character ?\e) | 499 (put 'escape 'ascii-character ?\e) |
500 | |
501 (setq vendor-key-syms | |
502 '( | |
503 ;; These are some HP keys. | |
504 (65388 . reset) | |
505 (65389 . system) | |
506 (65390 . user) | |
507 (65391 . clearline) | |
508 (65392 . insertline) | |
509 (65393 . deleteline) | |
510 (65394 . insertchar) | |
511 (65395 . deletechar) | |
512 (65396 . backtab) | |
513 (65397 . kp-backtab) | |
514 ;; This is used on some system or other. | |
515 (0 . remove) | |
516 )) | |
500 | 517 |
501 ;;;; Selections and cut buffers | 518 ;;;; Selections and cut buffers |
502 | 519 |
503 ;;; We keep track of the last text selected here, so we can check the | 520 ;;; We keep track of the last text selected here, so we can check the |
504 ;;; current selection against it, and avoid passing back our own text | 521 ;;; current selection against it, and avoid passing back our own text |