futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: guile-avahi: Update to 0.4.0-1.6d43caf.

Browse Source 
* gnu/packages/guile-xyz.scm (guile-avahi): Update to 0.4.0-1.6d43caf.
[arguments]: Add 'fix-guile-avahi-file-name phase with the required modules
and imported-modules.
This commit is contained in:
Mathieu Othacehe 2020-11-03 10:00:55 +01:00
parent e62ffc774e
commit d7f2b1e507
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 56 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
gnu/packages/guile-xyz.scm
View File

@ -4049,23 +4049,45 @@ errors.")
(license license:expat))) (license license:expat)))
(define-public guile-avahi (define-public guile-avahi
(let ((commit "6d43caf64f672a9694bf6c98bbf7a734f17a51e8")
(revision "1"))
(package (package
(name "guile-avahi") (name "guile-avahi")
(version "0.4") (version (git-version "0.4.0" revision commit))
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "git://git.sv.gnu.org/guile-avahi.git") (url "git://git.sv.gnu.org/guile-avahi.git")
(commit (string-append "v" version)))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1m286ggy3qs4fkhk5c01p21ghkslgksjsncaky0z037m9qqn06fn")) "0fvrf8x22yvc71180hd3xkhspg9yvadi0pbv8shzlsaxqncwy1m9"))
(modules '((guix build utils))))) (modules '((guix build utils)))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:make-flags `(#:modules (((guix build guile-build-system)
'("GUILE_AUTO_COMPILE=0"))) ;to prevent guild warnings #:select (target-guile-effective-version))
,@%gnu-build-system-modules)
#:imported-modules ((guix build guile-build-system)
,@%gnu-build-system-modules)
#:make-flags
'("GUILE_AUTO_COMPILE=0") ;to prevent guild warnings
#:phases
(modify-phases %standard-phases
(add-before 'check 'fix-guile-avahi-file-name
(lambda* (#:key outputs #:allow-other-keys)
(with-directory-excursion "src"
(invoke "make" "install"
"-j" (number->string
(parallel-job-count))))
(let* ((out (assoc-ref outputs "out"))
(files (find-files "modules" ".scm")))
(substitute* files
(("\"guile-avahi-v-0\"")
(format #f "\"~a/lib/guile/~a/extensions/guile-avahi-v-0\""
out (target-guile-effective-version))))
#t))))))
(inputs (inputs
`(("guile" ,guile-3.0) `(("guile" ,guile-3.0)
("avahi" ,avahi))) ("avahi" ,avahi)))
@ -4078,12 +4100,12 @@ errors.")
("texinfo" ,texinfo))) ("texinfo" ,texinfo)))
(synopsis "Guile bindings to Avahi") (synopsis "Guile bindings to Avahi")
(description (description
"This package provides bindings for Avahi. It allows programmers to use "This package provides bindings for Avahi. It allows programmers to
functionalities of the Avahi client library from Guile Scheme programs. Avahi use functionalities of the Avahi client library from Guile Scheme programs.
itself is an implementation of multicast DNS (mDNS) and DNS Service Avahi itself is an implementation of multicast DNS (mDNS) and DNS Service
Discovery (DNS-SD).") Discovery (DNS-SD).")
(home-page "https://www.nongnu.org/guile-avahi/") (home-page "https://www.nongnu.org/guile-avahi/")
(license license:lgpl3+))) (license license:lgpl3+))))
(define-public guile-mkdir-p (define-public guile-mkdir-p
(package (package