diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-08-14 08:39:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-08-14 08:39:25 +0000 |
| commit | 1e068e8fbf5eeec0a26b8471969dc186f55ffcb9 (patch) | |
| tree | 08803bb53f0dfede3bf99644d52880e612b063e4 | |
| parent | 3eec84bf8138d70c6bb15758c9c51cbb6581d789 (diff) | |
| download | emacs-1e068e8fbf5eeec0a26b8471969dc186f55ffcb9.tar.gz | |
(frame-initialize): Handle reverseVideo x-resource.
| -rw-r--r-- | lisp/frame.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 4e7581e3b76..ab41eb39621 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -111,7 +111,9 @@ These supersede the values given in `default-frame-alist'.") (frame-remove-geometry-params initial-frame-alist)) ;; Handle `reverse' as a parameter. (if (cdr (or (assq 'reverse initial-frame-alist) - (assq 'reverse default-frame-alist))) + (assq 'reverse default-frame-alist) + (cons nil + (x-get-resource "reverseVideo" "ReverseVideo")))) (let ((params (frame-parameters frame-initial-frame))) (modify-frame-parameters frame-initial-frame |