diff options
| author | Jim Blandy <jimb@redhat.com> | 1993-07-03 10:17:56 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1993-07-03 10:17:56 +0000 |
| commit | 9ffd6e562e529c1e00c0a1ef35bf63cc5428caf8 (patch) | |
| tree | fd7d1ecc969f6521dddb9aa85b70f1a0080d44e8 /lisp/term | |
| parent | 220c275a26e35d6dd2d19531e7631a68744783bc (diff) | |
| download | emacs-9ffd6e562e529c1e00c0a1ef35bf63cc5428caf8.tar.gz | |
* term/x-win.el: Check the reverseVideo/ReverseVideo resource,
correctly distinguish between "on" and "off" values, and put a
parameter in default-frame-alist.
* frame.el (frame-initialize): Don't call x-get-resource here.
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/x-win.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 4d3dda600e3..263a0a06d86 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -529,6 +529,13 @@ This returns ARGS with the arguments that have been processed removed." (setq initial-frame-alist (append initial-frame-alist (x-parse-geometry res-geometry))))) +;; Check the reverseVideo resource. +(if (assoc + (x-get-resource "reverseVideo" + "ReverseVideo") + '("True" "true" "Yes" "yes")) + (setq default-frame-alist (cons '(reverse . t) default-frame-alist))) + ;; Set x-selection-timeout, measured in milliseconds. (let ((res-selection-timeout (x-get-resource "selectionTimeout" "SelectionTimeout"))) |