From f557e87eff8a142aac171d1067b3d7a83c8c32e7 Mon Sep 17 00:00:00 2001 From: Franz Geffke Date: Sun, 24 Dec 2023 10:24:01 +0000 Subject: desktop: drop custom lxqt --- px/services/desktop.scm | 32 -------------------------------- 1 file changed, 32 deletions(-) (limited to 'px/services/desktop.scm') diff --git a/px/services/desktop.scm b/px/services/desktop.scm index cc8f9b6..a97cfb0 100644 --- a/px/services/desktop.scm +++ b/px/services/desktop.scm @@ -38,7 +38,6 @@ #:use-module (ice-9 match) #:export (px-desktop-configuration px-desktop-configuration? - px-desktop-service-type polkit-network-manager-service polkit-elogind-service @@ -47,37 +46,6 @@ %px-desktop-services-base)) -;; -;; PantherX desktop service type -;; - -(define-record-type* px-desktop-configuration - make-px-desktop-configuration - px-desktop-configuration? - (lxqt px-config-package - (default lxqt-modified)) - (default-packages px-config-default-packages - (default (list px-desktop-defaults)))) - -(define (px-desktop-polkit-settings config) - "Return the list of LXQt dependencies that provide polkit actions and -rules." - (list lxqt-admin)) - -(define px-desktop-profile-packages - (lambda (config) - (append (list (px-config-package config)) - (px-config-default-packages config)))) - -(define px-desktop-service-type - (service-type (name 'px-desktop) - (extensions (list (service-extension polkit-service-type - px-desktop-polkit-settings) - (service-extension profile-service-type - px-desktop-profile-packages))) - (default-value (px-desktop-configuration)) - (description "Run LXQt desktop environment on PantherX."))) - ;; ;; allow netdev group to control network manger ;; -- cgit v1.2.3