Merge branch 'maint'

1 files changed, 4 insertions, 2 deletions

diff --git a/lisp/ox.el b/lisp/ox.el
index 9cf6207..3fd4869 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -6836,10 +6836,12 @@ back to standard interface."
       (with-current-buffer "*Org Export Dispatcher*"
 	;; Refresh help.  Maintain display continuity by re-visiting
 	;; previous window position.
-	(let ((pos (window-start)))
+	(let ((pt (point))
+	      (wstart (window-start)))
 	  (erase-buffer)
 	  (insert help)
-	  (set-window-start nil pos)))
+	  (goto-char pt)
+	  (set-window-start nil wstart)))
       (org-fit-window-to-buffer)
       (org-export--dispatch-action
        standard-prompt allowed-keys entries options first-key expertp))))