Mercurial > emacs
comparison lisp/term/x-win.el @ 2157:0d77768bf3f2
Added library headers.
author | Eric S. Raymond <esr@snark.thyrsus.com> |
---|---|
date | Fri, 12 Mar 1993 19:53:22 +0000 |
parents | aa0b19850348 |
children | ed9b74c46fb9 |
comparison
equal
deleted
inserted
replaced
2156:706a869e685d | 2157:0d77768bf3f2 |
---|---|
1 ;; Parse switches controlling how Emacs interfaces with X window system. | 1 ;;; x-win.el --- parse switches controlling interface with X window system |
2 | |
3 ;; Author: FSF | |
4 ;; Keywords: terminals | |
5 | |
2 ;; Copyright (C) 1990 Free Software Foundation, Inc. | 6 ;; Copyright (C) 1990 Free Software Foundation, Inc. |
3 | 7 |
4 ;; This file is part of GNU Emacs. | 8 ;; This file is part of GNU Emacs. |
5 | 9 |
6 ;; GNU Emacs is distributed in the hope that it will be useful, | 10 ;; GNU Emacs is distributed in the hope that it will be useful, |
16 ;; supposed to have been given to you along with GNU Emacs so you | 20 ;; supposed to have been given to you along with GNU Emacs so you |
17 ;; can know your rights and responsibilities. It should be in a | 21 ;; can know your rights and responsibilities. It should be in a |
18 ;; file named COPYING. Among other things, the copyright notice | 22 ;; file named COPYING. Among other things, the copyright notice |
19 ;; and this notice must be preserved on all copies. | 23 ;; and this notice must be preserved on all copies. |
20 | 24 |
25 ;;; Commentary: | |
21 | 26 |
22 ;; X-win.el: this file is loaded from ../lisp/startup.el when it recognizes | 27 ;; X-win.el: this file is loaded from ../lisp/startup.el when it recognizes |
23 ;; that X windows are to be used. Command line switches are parsed and those | 28 ;; that X windows are to be used. Command line switches are parsed and those |
24 ;; pertaining to X are processed and removed from the command line. The | 29 ;; pertaining to X are processed and removed from the command line. The |
25 ;; X display is opened and hooks are set for popping up the initial window. | 30 ;; X display is opened and hooks are set for popping up the initial window. |
26 | 31 |
27 ;; startup.el will then examine startup files, and eventually call the hooks | 32 ;; startup.el will then examine startup files, and eventually call the hooks |
28 ;; which create the first window (s). | 33 ;; which create the first window (s). |
34 | |
35 ;;; Code: | |
29 | 36 |
30 ;; These are the standard X switches from the Xt Initialize.c file of | 37 ;; These are the standard X switches from the Xt Initialize.c file of |
31 ;; Release 4. | 38 ;; Release 4. |
32 | 39 |
33 ;; Command line Resource Manager string | 40 ;; Command line Resource Manager string |
518 (setq interprogram-paste-function 'x-cut-buffer-or-selection-value) | 525 (setq interprogram-paste-function 'x-cut-buffer-or-selection-value) |
519 | 526 |
520 ;;; Turn off window-splitting optimization; X is usually fast enough | 527 ;;; Turn off window-splitting optimization; X is usually fast enough |
521 ;;; that this is only annoying. | 528 ;;; that this is only annoying. |
522 (setq split-window-keep-point t) | 529 (setq split-window-keep-point t) |
530 | |
531 ;;; x-win.el ends here |