cristiancmoises
/
radix
mirror of https://codeberg.org/anemofilia/radix.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

packages: pdf: Ensure patches for sioyek are found

pull/3/head
Luis Guilherme Coelho 2024-02-18 02:01:21 -03:00
parent af57367608
commit 6f22008b09
No known key found for this signature in database
GPG Key ID: 1F2E76ACE3F531C8
1 changed files with 15 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
modules/radix/packages/pdf.scm
View File

@ -3,7 +3,6 @@
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix build-system qt) #:use-module (guix build-system qt)
#:use-module ((guix build utils) #:hide (delete))
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages web) #:use-module (gnu packages web)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
@ -11,6 +10,10 @@
#:use-module (gnu packages image) #:use-module (gnu packages image)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages javascript) #:use-module (gnu packages javascript)
#:use-module (gnu packages)
#:use-module ((radix packages)
#:select (%patch-path)
#:renamer (const '%radix:patch-path))
#:use-module ((guix licenses) #:prefix license:)) #:use-module ((guix licenses) #:prefix license:))
(define-public sioyek (define-public sioyek
@ -24,7 +27,9 @@
(url "https://github.com/ahrm/sioyek") (url "https://github.com/ahrm/sioyek")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(patches (find-files "patches" "sioyek-parse-link-uri.patch")) (patches
(parameterize ((%patch-path %radix:patch-path))
(search-patches "sioyek-parse-link-uri.patch")))
(sha256 (sha256
(base32 "1vmmp2s032ygh1byz77pg9aljmp8hx745fr7mmz11831f96mlmhq")))) (base32 "1vmmp2s032ygh1byz77pg9aljmp8hx745fr7mmz11831f96mlmhq"))))
(inputs (inputs
@ -40,10 +45,9 @@
qtbase-5)) qtbase-5))
(build-system qt-build-system) (build-system qt-build-system)
(arguments (arguments
(list #:tests? #f (list #:phases
#:phases #~(modify-phases %standard-phases
#~(modify-phases (delete 'check)
%standard-phases
(replace 'configure (replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
@ -57,11 +61,11 @@
(("/usr/share/sioyek") share) (("/usr/share/sioyek") share)
(("/etc/sioyek") etc)) (("/etc/sioyek") etc))
(substitute* "pdf_viewer_build_config.pro" (substitute* "pdf_viewer_build_config.pro"
(("-lmupdf-third ") "")) (("-lmupdf-third ") ""))))))))
#t))))))
(home-page "https://sioyek.info") (home-page "https://sioyek.info")
(synopsis "A PDF viewer designed for research papers and technical books") (synopsis "A PDF viewer designed for research papers and technical books")
(description "Sioyek is a PDF viewer with a focus on technical books and research papers.") (description "Sioyek is a PDF viewer with a focus on technical books and
research papers.")
(license license:gpl3))) (license license:gpl3)))
(define-public sioyek/wayland (define-public sioyek/wayland
@ -71,3 +75,5 @@
(inputs (inputs
(modify-inputs (package-inputs sioyek) (modify-inputs (package-inputs sioyek)
(append qtwayland-5))))) (append qtwayland-5)))))
sioyek