summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2020-05-22 23:36:57 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2020-05-22 23:36:57 -0400
commitcde0589818ec1d8d663c707d1d8af19a9d8b0752 (patch)
tree29ab90a8b94daf6ec669c5d7476db29e2e7678e3
parentc67f8f298a21be61362d049cfff5273f7d010d75 (diff)
downloademacs-cde0589818ec1d8d663c707d1d8af19a9d8b0752.tar.gz
* lisp/doc-view.el (doc-view-presentation): Fix thinko
-rw-r--r--lisp/doc-view.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 3cac2629a9c..de342f1519e 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -2050,8 +2050,8 @@ See the command `doc-view-mode' for more information on this mode."
(when (memq (selected-frame) (alist-get 'frames attrs))
(let ((geom (alist-get 'geometry attrs)))
(when geom
- (setq monitor-top (nth 0 geom))
- (setq monitor-left (nth 1 geom))
+ (setq monitor-left (nth 0 geom))
+ (setq monitor-top (nth 1 geom))
(setq monitor-width (nth 2 geom))
(setq monitor-height (nth 3 geom))))))
(let ((frame (make-frame