diff options
| author | Manuel Giraud | 2024-07-26 17:37:02 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2025-02-23 14:44:07 +0100 |
| commit | 93f62f10f7b28e0ceeb1464d918746fe2b2beae1 (patch) | |
| tree | 5008352eb6d0dc78da53f90f6ba6b283910e05d0 | |
| parent | 71a4670a9fa238f920ce88b938f703b605ad2f48 (diff) | |
| download | emacs-93f62f10f7b28e0ceeb1464d918746fe2b2beae1.tar.gz emacs-93f62f10f7b28e0ceeb1464d918746fe2b2beae1.zip | |
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)
| -rw-r--r-- | lisp/doc-view.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/doc-view.el b/lisp/doc-view.el index 98522f35765..2fdcc111cab 100644 --- a/lisp/doc-view.el +++ b/lisp/doc-view.el | |||
| @@ -1798,7 +1798,7 @@ For now these keys are useful: | |||
| 1798 | (if doc-view--current-converter-processes | 1798 | (if doc-view--current-converter-processes |
| 1799 | (message "DocView: please wait till conversion finished.") | 1799 | (message "DocView: please wait till conversion finished.") |
| 1800 | (let ((txt (expand-file-name "doc.txt" (doc-view--current-cache-dir))) | 1800 | (let ((txt (expand-file-name "doc.txt" (doc-view--current-cache-dir))) |
| 1801 | (page (doc-view-current-page))) | 1801 | (page (or (doc-view-current-page) 1))) |
| 1802 | (if (file-readable-p txt) | 1802 | (if (file-readable-p txt) |
| 1803 | (let ((dv-bfn doc-view--buffer-file-name) | 1803 | (let ((dv-bfn doc-view--buffer-file-name) |
| 1804 | (dv-text-buffer-name (format "%s/text" (buffer-name)))) | 1804 | (dv-text-buffer-name (format "%s/text" (buffer-name)))) |