diff options
Diffstat (limited to 'px/packages/base.scm')
| -rw-r--r-- | px/packages/base.scm | 64 |
1 files changed, 25 insertions, 39 deletions
diff --git a/px/packages/base.scm b/px/packages/base.scm index c36e83c..ba7f711 100644 --- a/px/packages/base.scm +++ b/px/packages/base.scm @@ -1,11 +1,9 @@ -;;; PantherX System Configuration Module -;;; This module supports configuration modules for PantherX OS definitions -;;; ;;; Reza Alizadeh Majd <r.majd@pantherx.org> ;;; Franz Geffke <franz@pantherx.org> ;;; (define-module (px packages base) + #:use-module (gnu system) #:use-module (gnu packages admin) #:use-module (gnu packages certs) #:use-module (gnu packages curl) @@ -13,7 +11,6 @@ #:use-module (gnu packages freedesktop) #:use-module (gnu packages glib) #:use-module (gnu packages gnome) - #:use-module (gnu packages linux) #:use-module (gnu packages libusb) #:use-module (gnu packages networking) #:use-module (gnu packages openbox) @@ -21,7 +18,6 @@ #:use-module (gnu packages security-token) #:use-module (gnu packages tls) #:use-module (gnu packages xorg) - #:use-module (gnu system) #:use-module (px packages activity) #:use-module (px packages desktop) #:use-module (px packages device) @@ -29,19 +25,13 @@ #:use-module (px packages package-management) #:use-module (px packages setup) #:use-module (px packages themes) - #:use-module (guix gexp) - #:use-module (ice-9 match) - #:use-module (srfi srfi-1) #:export (%px-core-packages - %px-desktop-packages-gtk %px-desktop-packages-qt %px-desktop-packages %px-desktop-ee-packages - %px-server-packages %px-server-ee-packages - %px-core-arm-packages %px-gui-arm-packages %px-desktop-arm-packages)) @@ -51,36 +41,30 @@ ;;; (define %px-core-packages - (append (list px ;; User and system updates + (append (list px ;User and system updates ;; px-setup-assistant ;; System installation - gnutls nss-certs ;; TLS library and NNS certificates - libimobiledevice ;; iPhone tethering - screen) - %base-packages)) + gnutls + nss-certs ;TLS library and NNS certificates + libimobiledevice ;iPhone tethering + screen) %base-packages)) ;;; ;;; DESKTOP ;;; (define %px-desktop-packages-gtk - (append - %gtk-desktop-applications - %common-desktop-applications + (append %gtk-desktop-applications %common-desktop-applications %px-core-packages)) (define %px-desktop-packages-qt - (append - %qt-desktop-applications - %common-desktop-applications + (append %qt-desktop-applications %common-desktop-applications %px-core-packages)) (define %px-desktop-packages - (append - %px-desktop-packages-qt)) + (append %px-desktop-packages-qt)) (define %px-desktop-ee-packages - (append (list px-device-identity - px-org-remote-user-activity-service) + (append (list px-device-identity px-org-remote-user-activity-service) %px-desktop-packages)) ;;; @@ -88,29 +72,31 @@ ;;; (define %px-server-packages - (append (list ) - %px-core-packages)) + (append (list) %px-core-packages)) (define %px-server-ee-packages - (append (list px-device-identity) - %px-server-packages)) + (append (list px-device-identity) %px-server-packages)) ;;; ;;; ARM-SPECIFIC ;;; (define %px-core-arm-packages - (append (list cloud-utils ;; disk utilities - gnutls nss-certs curl ;; networking - evtest ;; hardware status - %base-packages))) + (append (list cloud-utils ;disk utilities + gnutls + nss-certs + curl ;networking + ;; evtest ;; hardware status + %base-packages))) (define %px-gui-arm-packages - (append (list openbox ;; window manager - libnotify dunst dbus ;; desktop notifications - xterm xdg-utils + (append (list openbox ;window manager + libnotify + dunst + dbus ;desktop notifications + xterm + xdg-utils %px-core-arm-packages))) (define %px-desktop-arm-packages - (append (list px-sddm-theme) - %base-packages))
\ No newline at end of file + (append (list px-sddm-theme) %base-packages)) |