diff options
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/rxvt.el | 2 | ||||
| -rw-r--r-- | lisp/term/x-win.el | 5 | ||||
| -rw-r--r-- | lisp/term/xterm.el | 2 |
3 files changed, 4 insertions, 5 deletions
diff --git a/lisp/term/rxvt.el b/lisp/term/rxvt.el index 3dbea1d46b2..32f7900ed75 100644 --- a/lisp/term/rxvt.el +++ b/lisp/term/rxvt.el | |||
| @@ -26,7 +26,7 @@ | |||
| 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))) |
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 12e87e3bee5..aa0d1fa09c4 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el | |||
| @@ -83,8 +83,7 @@ | |||
| 83 | (require 'menu-bar) | 83 | (require 'menu-bar) |
| 84 | (require 'fontset) | 84 | (require 'fontset) |
| 85 | (require 'x-dnd) | 85 | (require 'x-dnd) |
| 86 | 86 | (require 'server) | |
| 87 | (eval-when-compile (require 'server)) | ||
| 88 | 87 | ||
| 89 | (defvar x-invocation-args) | 88 | (defvar x-invocation-args) |
| 90 | 89 | ||
| @@ -2242,7 +2241,7 @@ order until succeed.") | |||
| 2242 | (if text | 2241 | (if text |
| 2243 | (remove-text-properties 0 (length text) '(foreign-selection nil) text)) | 2242 | (remove-text-properties 0 (length text) '(foreign-selection nil) text)) |
| 2244 | text)) | 2243 | text)) |
| 2245 | 2244 | ||
| 2246 | ;;; Return the value of the current X selection. | 2245 | ;;; Return the value of the current X selection. |
| 2247 | ;;; Consult the selection, and the cut buffer. Treat empty strings | 2246 | ;;; Consult the selection, and the cut buffer. Treat empty strings |
| 2248 | ;;; as if they were unset. | 2247 | ;;; as if they were unset. |
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el index 042df933989..431825d181a 100644 --- a/lisp/term/xterm.el +++ b/lisp/term/xterm.el | |||
| @@ -26,7 +26,7 @@ | |||
| 26 | 26 | ||
| 27 | ;;; Code: | 27 | ;;; Code: |
| 28 | 28 | ||
| 29 | (eval-when-compile (require 'server)) | 29 | (require 'server) |
| 30 | 30 | ||
| 31 | (let ((map (make-sparse-keymap))) | 31 | (let ((map (make-sparse-keymap))) |
| 32 | (define-key map "\e[A" [up]) | 32 | (define-key map "\e[A" [up]) |