[elpa] externals/doc-toc d5629c7165 75/84: Update djvu ocr to djvu3.el (create ppm instead of svg)

[ELPA Syncer]

branch: externals/doc-toc
commit d5629c71652d80c5c515d30cdafb345f5a0b7595
Author: Daniel Nicolai <dalanicolai@gmail.com>
Commit: Daniel Nicolai <dalanicolai@gmail.com>

    Update djvu ocr to djvu3.el (create ppm instead of svg)
---
 toc-mode.el | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/toc-mode.el b/toc-mode.el
index e647df2f37..4de0b3762b 100644
--- a/toc-mode.el
+++ b/toc-mode.el
@@ -545,11 +545,19 @@ unprocessed text."
                                                (number-to-string page)
                                                (pdf-cache-get-image page 600)))
                               ((string= ".djvu" ext)
-                               (djvu-goto-page page)
-                               (make-temp-file "pageimage"
-                                               nil
-                                               (number-to-string page)
-                                               (image-property djvu-doc-image 
:data))))))
+                               ;; new code for djvu3
+                               (let ((outfile (format "/tmp/pageimagep%s" 
page)))
+                                 (shell-command (format "ddjvu -page=%s '%s' 
%s"
+                                                        page
+                                                        buffer-file-name
+                                                        outfile))
+                                 outfile)))))
+              ;; old code for original djvu.el
+              ;; (djvu-goto-page page)
+              ;; (make-temp-file "pageimage"
+              ;;                 nil
+              ;;                 (number-to-string page)
+              ;;                 (image-property djvu-doc-image :data))))))
               (apply 'call-process
                      (append (list "tesseract" nil (list buffer nil) nil file)
                              args))