~ruther/guix-local

95bbaa02aa63bc5eae36f686f1ed9915663aa4cf — Leo Famulari 8 years ago 1b6d3b7
gnu: poppler: Fix CVE-2017-{9775,9776}.

* gnu/packages/pdf.scm (poppler)[replacement]: New field.
(poppler-0.56.0): New variable.
(poppler-qt4, poppler-qt5): Use 'package/inherit'.
1 files changed, 15 insertions(+), 2 deletions(-)

M gnu/packages/pdf.scm
M gnu/packages/pdf.scm => gnu/packages/pdf.scm +15 -2
@@ 76,6 76,7 @@
(define-public poppler
  (package
   (name "poppler")
   (replacement poppler-0.56.0)
   (version "0.52.0")
   (source (origin
            (method url-fetch)


@@ 129,15 130,27 @@
   (license license:gpl2+)
   (home-page "https://poppler.freedesktop.org/")))

(define-public poppler-qt4
(define poppler-0.56.0
  (package (inherit poppler)
  (version "0.56.0")
  (source
    (origin
      (method url-fetch)
      (uri (string-append "https://poppler.freedesktop.org/poppler-"
                          version ".tar.xz"))
      (sha256
       (base32
        "0wviayidfv2ix2ql0d4nl9r1ia6qi5kc1nybd9vjx27dk7gvm7c6"))))))

(define-public poppler-qt4
  (package/inherit poppler
   (name "poppler-qt4")
   (inputs `(("qt-4" ,qt-4)
             ,@(package-inputs poppler)))
   (synopsis "Qt4 frontend for the Poppler PDF rendering library")))

(define-public poppler-qt5
  (package (inherit poppler)
  (package/inherit poppler
   (name "poppler-qt5")
   (inputs `(("qtbase" ,qtbase)
             ,@(package-inputs poppler)))