me
/
guix
Archived
1
0
Fork 0

gnu: Add plasma-desktop.

* gnu/packages/kde-plasma.scm (plasma-desktop): New variable.

Signed-off-by: Marius Bakke <marius@gnu.org>
Brendan Tildesley 2022-03-05 11:46:54 +11:00 committed by Marius Bakke
parent 02f3055114
commit 1ad1517dac
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 154 additions and 1 deletions

View File

@ -48,9 +48,11 @@
#:use-module (gnu packages glib) #:use-module (gnu packages glib)
#:use-module (gnu packages gnome) #:use-module (gnu packages gnome)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
#:use-module (gnu packages ibus)
#:use-module (gnu packages iso-codes) #:use-module (gnu packages iso-codes)
#:use-module (gnu packages kde) #:use-module (gnu packages kde)
#:use-module (gnu packages kde-frameworks) #:use-module (gnu packages kde-frameworks)
#:use-module (gnu packages kde-pim)
#:use-module (gnu packages libcanberra) #:use-module (gnu packages libcanberra)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages libusb) #:use-module (gnu packages libusb)
@ -59,7 +61,6 @@
#:use-module (gnu packages multiprecision) #:use-module (gnu packages multiprecision)
#:use-module (gnu packages pciutils) #:use-module (gnu packages pciutils)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages polkit)
#:use-module (gnu packages pulseaudio) #:use-module (gnu packages pulseaudio)
#:use-module (gnu packages python) #:use-module (gnu packages python)
#:use-module (gnu packages package-management) ; flatpak #:use-module (gnu packages package-management) ; flatpak
@ -1391,6 +1392,158 @@ active window on Plasma Desktop.")
the KDE Plasma 5 desktop.") the KDE Plasma 5 desktop.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public plasma-desktop
(package
(name "plasma-desktop")
(version "5.25.5")
(source (origin
(method url-fetch)
(uri (string-append "mirror://kde/stable/plasma/" version
"/" name "-" version ".tar.xz"))
(sha256
(base32
"05s1pkwr4xmkghp8jrwcyrvjm83n68ngmk2694055xcfgi0pxicg"))))
(build-system qt-build-system)
(native-inputs (list extra-cmake-modules
dbus
kdoctools
intltool
pkg-config
qtsvg-5
qttools-5))
(inputs (list packagekit-qt5
signon-plugin-oauth2
signond
attica
appstream-qt
baloo
breeze
breeze-icons
eudev
fontconfig
glib
ibus
kaccounts-integration
kactivities
kactivities-stats
kauth
karchive
kcmutils
kconfig
kcoreaddons
kcrash
kdbusaddons
kdeclarative
kded
kdesu
kdelibs4support
kglobalaccel
kguiaddons
kholidays
ki18n
kiconthemes
kidletime
kinit
kio
kitemmodels
knewstuff
knotifications
knotifyconfig
kpackage
kpeople
krunner
kscreenlocker
ktexteditor
ktextwidgets
kunitconversion
kuserfeedback
kwallet
kwayland
kwin
layer-shell-qt
libaccounts-qt
libcanberra
libkscreen
libksysguard
libqalculate
gmp
mpfr
libsm
libxi
libxft
libxkbcommon
libxrender
libxtst
networkmanager-qt
phonon
pipewire-0.3
plasma-framework
plasma-wayland-protocols
pulseaudio
prison
qqc2-desktop-style
qtbase-5
qtdeclarative-5
qtquickcontrols2-5
qtwayland
qtx11extras
wayland
wayland-protocols
xcb-util
xcb-util-image
xcb-util-keysyms
xdg-user-dirs
;; These are needed for Xserver
xf86-input-libinput
xf86-input-evdev
xorg-server
xf86-input-synaptics
xkeyboard-config
libxkbfile
libxcursor
libxkbcommon))
(propagated-inputs (list iso-codes kirigami plasma-workspace))
(arguments
(list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "kcms/keyboard/iso_codes.h"
(("\"/usr/share/xml/iso-codes\"")
(string-append "\"" (search-input-directory
inputs "/share/xml/iso-codes")
"\"")))))
(add-after 'unpack 'patch-qml-import-path
(lambda _
(substitute*
'("applets/pager/package/contents/ui/main.qml"
"containments/desktop/package/contents/ui/FolderView.qml"
"containments/desktop/package/contents/ui/main.qml"
"containments/panel/contents/ui/main.qml")
(("^import \"(utils|FolderTools|LayoutManager).js\" as "
line mod)
(string-append "import \"../code/" mod
".js\" as ")))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(setenv "HOME" (getcwd))
(setenv "XDG_RUNTIME_DIR" (getcwd))
(setenv "XDG_CACHE_HOME" (getcwd))
(setenv "QT_QPA_PLATFORM" "offscreen")
(invoke "ctest" "-E" "foldermodeltest")))))))
(home-page "https://kde.org/plasma-desktop/")
(synopsis "Plasma for the Desktop")
(description
"Plasma Desktop offers a beautiful looking desktop that takes
complete advantage of modern computing technology. Through the use of visual
effects and scalable graphics, the desktop experience is not only smooth but
also pleasant to the eye. The looks of Plasma Desktop not only provide
beauty, they are also used to support and improve your computer
activities effectively, without being distracting.")
(license license:gpl2+)))
(define-public plasma-disks (define-public plasma-disks
(package (package
(name "plasma-disks") (name "plasma-disks")