Mercurial > emacs
comparison lisp/term/rxvt.el @ 83277:886073e54ccb
Fix some superflous deviations from CVS, plus apply some cosmetics.
* etc/TODO: Fix deviation from CVS.
* lisp/emulation/viper-util.el: Ditto.
* lisp/international/mule-cmds.el: Ditto.
* lisp/progmodes/gdb-ui.el: Ditto.
* src/termchar.h: Ditto.
* src/xfns.c (Fx_create_frame): Ditto.
* lisp/term/rxvt.el: Don't embed `(require 'server)' in eval-when-compile.
* lisp/term/xterm.el: Ditto.
* src/xterm.c (x_delete_display): Cosmetic change.
* src/xterm.c (x_create_frame_display): Cosmetic change.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-317
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Wed, 23 Mar 2005 12:53:42 +0000 |
parents | 7652900ea029 |
children | 8e357d90cc9f |
comparison
equal
deleted
inserted
replaced
83276:26c9034f3533 | 83277:886073e54ccb |
---|---|
24 | 24 |
25 ;;; Commentary: | 25 ;;; Commentary: |
26 | 26 |
27 ;;; Code: | 27 ;;; Code: |
28 | 28 |
29 (eval-when-compile (require 'server)) | 29 (require 'server) |
30 | 30 |
31 ;; Set up function-key-map entries that termcap and terminfo don't know. | 31 ;; Set up function-key-map entries that termcap and terminfo don't know. |
32 (let ((map (make-sparse-keymap))) | 32 (let ((map (make-sparse-keymap))) |
33 (define-key map "\e[A" [up]) | 33 (define-key map "\e[A" [up]) |
34 (define-key map "\e[B" [down]) | 34 (define-key map "\e[B" [down]) |