149 lines
6.3 KiB
Scheme
149 lines
6.3 KiB
Scheme
;;; SPDX-License-Identifier: GPL-3.0-or-later
|
|
;;; Copyright © 2022, 2023 Giacomo Leidi <goodoldpaul@autistici.org>
|
|
;;; Copyright © 2022 Mathieu Othacehe <m.othacehe@gmail.com>
|
|
;;; Copyright © 2022 Jonathan Brielmaier <jonathan.brielmaier@web.de>
|
|
|
|
(define-module (nongnu packages edge)
|
|
#:use-module (gnu packages base)
|
|
#:use-module (gnu packages compression)
|
|
#:use-module (gnu packages curl)
|
|
#:use-module (gnu packages fonts)
|
|
#:use-module (gnu packages freedesktop)
|
|
#:use-module (gnu packages gl)
|
|
#:use-module (gnu packages gtk)
|
|
#:use-module (gnu packages image)
|
|
#:use-module (gnu packages linux)
|
|
#:use-module (gnu packages pciutils)
|
|
#:use-module (gnu packages photo)
|
|
#:use-module (gnu packages qt)
|
|
#:use-module (gnu packages video)
|
|
#:use-module (gnu packages wget)
|
|
#:use-module (gnu packages xiph)
|
|
#:use-module (gnu packages xorg)
|
|
#:use-module (guix download)
|
|
#:use-module (guix gexp)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (nonguix build-system chromium-binary)
|
|
#:use-module (nonguix licenses)
|
|
#:use-module (ice-9 string-fun))
|
|
|
|
(define-public (make-discord repo version hash)
|
|
(let* ((name (string-append "discord-" repo))
|
|
(appname "discord"))
|
|
(package
|
|
(name name)
|
|
(version version)
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri
|
|
(string-append
|
|
"https://stable.dl2.discordapp.net/apps/linux/"
|
|
version "/" name version ".deb"))
|
|
(sha256
|
|
(base32 hash))))
|
|
(build-system chromium-binary-build-system)
|
|
(arguments
|
|
(list
|
|
;; almost 300MB, faster to download and build from Google servers
|
|
#:substitutable? #f
|
|
#:wrapper-plan
|
|
#~(let ((path (string-append "usr/share/discord/")))
|
|
(map (lambda (file)
|
|
(string-append path file))
|
|
'("Discord"
|
|
"chrome-sandbox"
|
|
"chrome_crashpad_handler"
|
|
"libEGL.so"
|
|
"libGLESv2.so"
|
|
"libffmpeg.so"
|
|
"libvk_swiftshader.so"
|
|
"libvulkan.so.1"
|
|
;;"WidevineCdm/_platform_specific/linux_x64/libwidevinecdm.so"
|
|
)))
|
|
#:install-plan
|
|
#~'(("usr/" "/share")
|
|
("usr/share/" "/share"))
|
|
#:phases
|
|
#~(modify-phases %standard-phases
|
|
(add-before 'install 'patch-assets
|
|
;; Many thanks to
|
|
;; https://github.com/NixOS/nixpkgs/blob/master/pkgs/applications/networking/browsers/discord/default.nix
|
|
(lambda _
|
|
(let* ((bin (string-append #$output "/bin"))
|
|
(share (string-append #$output "/share"))
|
|
(usr "./usr")
|
|
(usr/share "./usr/share")
|
|
(old-exe (string-append "/usr/discord/" #$appname "/discord-" #$appname))
|
|
(exe (string-append bin "/discord-" #$appname)))
|
|
;; This allows us to override CHROME_WRAPPER later.
|
|
(substitute* (string-append usr "/discord/" #$appname "/discord-" #$appname)
|
|
(("CHROME_WRAPPER") "WRAPPER"))
|
|
(substitute* (string-append usr/share "/applications/discord-" #$appname ".desktop")
|
|
(("^Exec=.*") (string-append "Exec=" exe "\n")))
|
|
(substitute* (string-append usr/share "/gnome-control-center/default-apps/discord-" #$appname ".xml")
|
|
((old-exe) exe))
|
|
(substitute* (string-append usr/share "/menu/discord-" #$appname ".menu")
|
|
(("/usr") share)
|
|
((old-exe) exe)))))
|
|
#!(add-after 'install 'install-icons
|
|
(lambda _
|
|
(define (format-icon-size name)
|
|
(car
|
|
(string-split
|
|
(string-drop-right (string-drop name 13) 4)
|
|
#\_)))
|
|
(let ((icons (string-append #$output "/usr/share/icons/hicolor"))
|
|
(share (string-append #$output "/usr/share/discord/" #$appname)))
|
|
(for-each (lambda (icon)
|
|
(let* ((icon-name (basename icon))
|
|
(icon-size (format-icon-size icon-name))
|
|
(target (string-append icons "/" icon-size "x" icon-size "/apps/discord-" #$appname ".png")))
|
|
(mkdir-p (dirname target))
|
|
(rename-file icon target)))
|
|
(find-files share "product_logo_.*\\.png")))))
|
|
(add-before 'install-wrapper 'install-exe
|
|
(lambda _
|
|
(let* ((bin (string-append #$output "/usr/bin"))
|
|
(exe (string-append bin "/discord-" #$appname "-stable"))
|
|
(share (string-append #$output "/usr/share"))
|
|
(edge-target (string-append share "/discord/" #$appname "/discord-" #$appname)))
|
|
(mkdir-p bin)
|
|
(symlink edge-target exe)
|
|
(wrap-program exe
|
|
'("CHROME_WRAPPER" = (#$appname))))))
|
|
!#
|
|
(delete 'patch-assets)
|
|
(delete 'install-wrapper))))
|
|
(inputs
|
|
(list bzip2
|
|
curl
|
|
flac
|
|
font-liberation
|
|
gdk-pixbuf
|
|
gtk
|
|
harfbuzz
|
|
libexif
|
|
libglvnd
|
|
libpng
|
|
libva
|
|
libxscrnsaver
|
|
opus
|
|
pciutils
|
|
pipewire
|
|
qtbase-5
|
|
qtbase
|
|
snappy
|
|
util-linux
|
|
xdg-utils
|
|
wget))
|
|
(synopsis "Freeware web browser")
|
|
(supported-systems '("x86_64-linux"))
|
|
(description "Vivaldi is a highly customizable browser developed by Vivaldi.")
|
|
(home-page "https://discord.com/")
|
|
(license (nonfree "https://discord.com/privacy/browser/")))))
|
|
|
|
(define-public discord-stable
|
|
(make-discord "" "0.0.86" "0agwhl8nvj3203fk9i3hscljvc6zzmbivdqwpflabliamkxyarsk"))
|
|
|
|
discord-stable |