diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-05-09 23:54:12 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-05-09 23:54:12 +0000 |
| commit | ffe1dd7ac1d406d2099f0cec753f9aa223610111 (patch) | |
| tree | 200d9980dddffe12692274914c666e09b69ee6ad /lisp/term | |
| parent | 4bf5153268486668a8585e7fa9c2f86a4679ae94 (diff) | |
| download | emacs-ffe1dd7ac1d406d2099f0cec753f9aa223610111.tar.gz emacs-ffe1dd7ac1d406d2099f0cec753f9aa223610111.tar.bz2 emacs-ffe1dd7ac1d406d2099f0cec753f9aa223610111.zip | |
* x-win.el: Since we require faces.el, there's no point in setting
frame-creation-function to x-create-frame - just set it directly
to x-create-frame-with-faces.
* x-win.el: (require 'faces), too. Move (require 'select) to top,
with the other requires.
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/x-win.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 66aeef9de0a..38498eaef4b 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -70,6 +70,8 @@ (require 'frame) (require 'mouse) (require 'scroll-bar) +(require 'faces) +(require 'select) (setq command-switch-alist (append '(("-bw" . x-handle-numeric-switch) @@ -503,14 +505,12 @@ This returns ARGS with the arguments that have been processed removed." (x-open-connection (or x-display-name (setq x-display-name (getenv "DISPLAY")))) -(setq frame-creation-function 'x-create-frame) +(setq frame-creation-function 'x-create-frame-with-faces) (defun x-win-suspend-error () (error "Suspending an emacs running under X makes no sense")) (add-hook 'suspend-hook 'x-win-suspend-error) -(require 'select) - ;;; Arrange for the kill and yank functions to set and check the clipboard. (setq interprogram-cut-function 'x-select-text) (setq interprogram-paste-function 'x-cut-buffer-or-selection-value) |