comparison lisp/term/x-win.el @ 5537:899159133053

(vendor-key-syms): Add more HP keysyms and some Sun.

5536:f900f7bba4c2

(put 'linefeed 'ascii-character ?\n)
(put 'clear 'ascii-character 12)
(put 'return 'ascii-character 13)
(put 'escape 'ascii-character ?\e)

(setq vendor-key-syms
      '(
	;; These are some HP keys.
	(65388 . reset)
	(65389 . system)
	(65390 . user)
	(65391 . clearline)
	(65392 . insertline)

	(65395 . deletechar)
	(65396 . backtab)
	(65397 . kp-backtab)
	;; This is used on some system or other.
	(0 . remove)
	))

;;;; Selections and cut buffers

;;; We keep track of the last text selected here, so we can check the

5537:899159133053

(put 'linefeed 'ascii-character ?\n)
(put 'clear 'ascii-character 12)
(put 'return 'ascii-character 13)
(put 'escape 'ascii-character ?\e)

;; Set up to recognize vendor-specific keysyms.
;; Unless/until there is a real conflict,
;; we need not try to make this list depend on
;; the type of X server in use.
(setq vendor-key-syms
      '(
	;; These are some HP keys.
	(  168 . mute-acute)
	(  169 . mute-grave)
	(  170 . mute-asciicircum)
	(  171 . mute-diaeresis)
	(  172 . mute-asciitilde)
	(  175 . lira)
	(  190 . guilder)
	(  252 . block)
	(  256 . longminus)
	(65388 . reset)
	(65389 . system)
	(65390 . user)
	(65391 . clearline)
	(65392 . insertline)

	(65395 . deletechar)
	(65396 . backtab)
	(65397 . kp-backtab)
	;; This is used on some system or other.
	(0 . remove)
	;; These are for Sun.
	(392976 . f35)
    	(392977 . f36)
	(393056 . req)))
	))

;;;; Selections and cut buffers

;;; We keep track of the last text selected here, so we can check the