summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--etc/NEWS3
-rw-r--r--lisp/doc-view.el8
2 files changed, 10 insertions, 1 deletions
diff --git a/etc/NEWS b/etc/NEWS
index f858c958317..cb8b6fcac18 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -607,6 +607,9 @@ its functions.
*** New commands 'doc-view-presentation' and 'doc-view-fit-window-to-page'.
*** Added support for password-protected PDF files
+*** A new variable 'doc-view-pdftotext-program-args' has been added to
+allow controlling how the conversion to text is done.
+
** Ido
*** New user option 'ido-big-directories' to mark directories whose
names match certain regular expressions as big. Ido won't attempt to
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 49d2b56b7d6..9d10d036285 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -172,6 +172,11 @@
:type 'file
:version "24.4")
+(defcustom doc-view-pdftotext-program-args '("-raw")
+ "Parameters to give to the pdftotext command."
+ :version "27.1"
+ :type '(repeat string))
+
(defcustom doc-view-pdf->png-converter-function
(if (executable-find doc-view-pdfdraw-program)
#'doc-view-pdf->png-converter-mupdf
@@ -1132,7 +1137,8 @@ Start by converting PAGES, and then the rest."
(or (executable-find doc-view-pdftotext-program)
(error "You need the `pdftotext' program to convert a PDF to text"))
(doc-view-start-process "pdf->txt" doc-view-pdftotext-program
- (list "-raw" pdf txt)
+ (append doc-view-pdftotext-program-args
+ (list pdf txt))
callback))
(defun doc-view-current-cache-doc-pdf ()