branch: externals/dicom
commit 3e2df669d52de06372ba6fa50683f99504f8f2a5
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>

    Use dcm2img
---
 dicom.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/dicom.el b/dicom.el
index 7bbff35841..a37dab640e 100644
--- a/dicom.el
+++ b/dicom.el
@@ -40,7 +40,7 @@
 ;; on external programs from the dcmtk DICOM toolkit, which are all widely
 ;; available on Linux distributions.
 
-;; - `dcm2xml' and `dcmj2pnm' from the dcmtk DICOM toolkit
+;; - `dcm2xml' and `dcm2img' from the dcmtk DICOM toolkit
 ;; - `ffmpeg' for video conversion (optional)
 ;; - `mpv' for video playing (optional)
 
@@ -371,7 +371,7 @@ progress:${percent-pos}%%' %s) & disown"
     (unless exists
       (dicom--enqueue
        (dicom--image-callback tmp dst pos)
-       "dcmj2pnm" "--write-png" "--scale-y-size" "200" src tmp))))
+       "dcm2img" "--write-png" "--scale-y-size" "200" src tmp))))
 
 (defun dicom--item (level item &optional indent)
   "Insert ITEM at LEVEL into buffer."
@@ -444,7 +444,7 @@ progress:${percent-pos}%%' %s) & disown"
     (unless exists
       (dicom--enqueue
        (dicom--image-callback tmp dst pos)
-       "dcmj2pnm" "--write-png" dicom--file tmp))))
+       "dcm2img" "--write-png" dicom--file tmp))))
 
 (defun dicom--setup-check ()
   "Check requirements."
@@ -456,7 +456,7 @@ progress:${percent-pos}%%' %s) & disown"
     (dolist (type '(png svg))
       (unless (image-type-available-p type)
         (push (format "lib%s" type) req)))
-    (dolist (exe '("dcm2xml" "dcmj2pnm"))
+    (dolist (exe '("dcm2xml" "dcm2img"))
       (unless (executable-find exe)
         (push exe req)))
     (when req

Reply via email to