From: Stefan Monnier <monnier@iro.umontreal.ca> Date: Sat, 23 May 2020 03:36:57 +0000 (-0400) Subject: * lisp/doc-view.el (doc-view-presentation): Fix thinko X-Git-Tag: emacs-28.0.90~7300 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cde0589818ec1d8d663c707d1d8af19a9d8b0752;p=emacs.git * lisp/doc-view.el (doc-view-presentation): Fix thinko --- 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