mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 12:05:19 -06:00
Partially revert "gnu: emacs-dicom: Enable video playing."
This partially reverts commit 6db9bd04d9 to
reduce closure size.
* gnu/packages/emacs-xyz.scm (emacs-dicom):
[arguments]<#:phases>{patch-commands}: Do not patch ffmpeg and mpv commands.
[inputs]: Remove ffmpeg and mpv.
Change-Id: Ib0de1cae10100f0a4378a3b8b97f26255b4d4fd1
Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
This commit is contained in:
parent
3f9a28a9b0
commit
2e9170642e
1 changed files with 3 additions and 9 deletions
|
|
@ -2096,25 +2096,19 @@ separate, named tab groups.")
|
|||
(make-file-writable "dicom.el")
|
||||
(let ((convert (search-input-file inputs "/bin/convert"))
|
||||
(dcm2img (search-input-file inputs "/bin/dcm2img"))
|
||||
(dcm2xml (search-input-file inputs "/bin/dcm2xml"))
|
||||
(ffmpeg (search-input-file inputs "/bin/ffmpeg"))
|
||||
(mpv (search-input-file inputs "/bin/mpv")))
|
||||
(dcm2xml (search-input-file inputs "/bin/dcm2xml")))
|
||||
(substitute* "dicom.el"
|
||||
(("(^|[^`])dcm2img" _ start)
|
||||
(string-append start dcm2img))
|
||||
(("\"dcm2xml")
|
||||
(string-append "\"" dcm2xml))
|
||||
(("(^|[^`])ffmpeg" _ start)
|
||||
(string-append start ffmpeg))
|
||||
;; Guix has ImageMagick 6.
|
||||
(("(^|[^`])magick" _ start)
|
||||
(string-append start convert))
|
||||
(("(^|[^`])mpv" _ start)
|
||||
(string-append start mpv))))))
|
||||
(string-append start convert))))))
|
||||
(add-before 'install 'makeinfo
|
||||
(lambda _ (emacs-makeinfo))))))
|
||||
(native-inputs (list texinfo))
|
||||
(inputs (list dcmtk ffmpeg imagemagick mpv))
|
||||
(inputs (list dcmtk imagemagick))
|
||||
(propagated-inputs (list emacs-compat))
|
||||
(home-page "https://github.com/minad/dicom")
|
||||
(synopsis
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue