ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: make-mozilla-with-l10n: Use the copy-build-system.

Browse source 
Fixes <https://issues.guix.gnu.org/61742>.

* gnu/packages/gnuzilla.scm (make-mozilla-with-l10n): Rewrite to use the
copy-build-system.

Reported-by: Feng Shu <tumashu@163.com>
This commit is contained in:
Maxim Cournoyer 2023-03-02 15:39:55 -05:00
parent b2200e3488
commit 89e5f3f384
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 42 additions and 37 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
gnu/packages/gnuzilla.scm
View file

@ -50,8 +50,9 @@ (define-module (gnu packages gnuzilla)
#:use-module (guix modules)
#:use-module (guix monads)
#:use-module (guix utils)
#:use-module (guix build-system gnu)
#:use-module (guix build-system cargo)
#:use-module (guix build-system copy)
#:use-module (guix build-system gnu)
#:use-module (guix build-system trivial)
#:use-module (gnu packages admin)
#:use-module (gnu packages audio)
@ -1681,16 +1682,20 @@ (define (make-mozilla-with-l10n project base l10n-package)
(package
(inherit base)
(name (symbol->string project))
(build-system trivial-build-system)
;; Use the copy-build-system, as it provides the necessary UTF-8 locales
;; support.
(build-system copy-build-system)
(arguments
(list
#:modules '((guix build union)
#:imported-modules `(,@%copy-build-system-modules
(guix build union))
#:modules '((guix build copy-build-system)
(guix build union)
(guix build utils))
#:builder
#~(begin
(use-modules (guix build union)
(guix build utils))
#:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(union-build #$output (list #$base #$l10n-package)
#:create-all-directories? #t)
@ -1725,7 +1730,7 @@ (define* (expose name #:optional (proc copy-file)
;; Adjust the references in the desktop file and wrapper.
(substitute* (list (string-append #$output "/" desktop-file)
(string-append #$output "/" wrapper))
((#$base) #$output)))))))))
((#$base) #$output)))))))))))
(define-public icecat
(make-mozilla-with-l10n 'icecat icecat-minimal icecat-l10n))