diff options
| -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'.") | |||
| 111 | (frame-remove-geometry-params initial-frame-alist)) | 111 | (frame-remove-geometry-params initial-frame-alist)) |
| 112 | ;; Handle `reverse' as a parameter. | 112 | ;; Handle `reverse' as a parameter. |
| 113 | (if (cdr (or (assq 'reverse initial-frame-alist) | 113 | (if (cdr (or (assq 'reverse initial-frame-alist) |
| 114 | (assq 'reverse default-frame-alist))) | 114 | (assq 'reverse default-frame-alist) |
| 115 | (cons nil | ||
| 116 | (x-get-resource "reverseVideo" "ReverseVideo")))) | ||
| 115 | (let ((params (frame-parameters frame-initial-frame))) | 117 | (let ((params (frame-parameters frame-initial-frame))) |
| 116 | (modify-frame-parameters | 118 | (modify-frame-parameters |
| 117 | frame-initial-frame | 119 | frame-initial-frame |