Fix DocView's text conversion on tty Emacs

* lisp/doc-view.el (doc-view-open-text): Defaults to first page
should `doc-view-current-page' return nil.  (Bug#72305)

(cherry picked from commit 93f62f10f7b28e0ceeb1464d918746fe2b2beae1)

diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index e9e564e14ef612660b0bf199097546c92ef8052d..e836c21235649213cb6f4407e336e9a86d8c12eb 100644 (file)
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -1795,7 +1795,7 @@ For now these keys are useful:
   (if doc-view--current-converter-processes
       (message "DocView: please wait till conversion finished.")
     (let ((txt (expand-file-name "doc.txt" (doc-view--current-cache-dir)))
-          (page (doc-view-current-page)))
+          (page (or (doc-view-current-page) 1)))
       (if (file-readable-p txt)
           (let ((dv-bfn doc-view--buffer-file-name)
                 (dv-text-buffer-name (format "%s/text" (buffer-name))))