guix_mirror_bot pushed a commit to branch gnome-team
in repository guix.

commit cb63509dee4e13be98b358d95e376072d90d7b03
Author: Liliana Marie Prikler <[email protected]>
AuthorDate: Fri Sep 26 21:00:59 2025 +0200

    gnu: Add cinnamon-control-center.
    
    * gnu/packages/cinnamon.scm (cinnamon-control-center): New variable.
---
 gnu/packages/cinnamon.scm | 117 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 117 insertions(+)

diff --git a/gnu/packages/cinnamon.scm b/gnu/packages/cinnamon.scm
index 91dadec8df..7e021c9638 100644
--- a/gnu/packages/cinnamon.scm
+++ b/gnu/packages/cinnamon.scm
@@ -49,10 +49,13 @@
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages gnome)
   #:use-module (gnu packages gnuzilla)
+  #:use-module (gnu packages ibus)
   #:use-module (gnu packages iso-codes)
+  #:use-module (gnu packages kerberos)
   #:use-module (gnu packages libcanberra)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages nss)
+  #:use-module (gnu packages password-utils)
   #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages photo)
@@ -62,6 +65,8 @@
   #:use-module (gnu packages python-build)
   #:use-module (gnu packages python-xyz)
   #:use-module (gnu packages readline)
+  #:use-module (gnu packages samba)
+  #:use-module (gnu packages tls)
   #:use-module (gnu packages web)
   #:use-module (gnu packages wm)
   #:use-module (gnu packages xdisorg)
@@ -287,6 +292,118 @@ persist XApp settings windows using GSettings.")
      "CJS is a javascript binding for Cinnamon, forked from GJS.")
     (license license:gpl2+)))
 
+(define-public cinnamon-control-center
+  (package
+    (name "cinnamon-control-center")
+    (version "6.4.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/linuxmint/cinnamon-control-center";)
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "1za37ynf8kckkmjc5n500fckynirw6ggg3s5wdlygpxkp2qz83lz"))))
+    (build-system meson-build-system)
+    (arguments
+     (list
+      #:glib-or-gtk? #t
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'configure 'patch-paths
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* '("panels/network/net-device-mobile.c"
+                             
"panels/network/connection-editor/net-connection-editor.c")
+                (("\"nm-connection-editor")
+                 (string-append "\"" (search-input-file
+                                      inputs "bin/nm-connection-editor"))))))
+          (add-after 'unpack 'skip-gtk-update-icon-cache
+            ;; Don't create 'icon-theme.cache'.
+            (lambda _
+              (substitute* "meson.build"
+                (("gtk_update_icon_cache: true")
+                 "gtk_update_icon_cache: false"))))
+          (replace 'check
+            (lambda* (#:key parallel-tests? tests? #:allow-other-keys)
+              (when tests?
+                ;; Tests require a running X server.
+                (system "Xvfb :1 &")
+                (setenv "DISPLAY" ":1")
+                ;; For the missing /var/lib/dbus/machine-id
+                (setenv "DBUS_FATAL_WARNINGS" "0")
+                (setenv "NO_AT_BRIDGE" "1")
+                (setenv "HOME" "/tmp")
+                (setenv "XDG_RUNTIME_DIR" (string-append (getcwd) 
"/runtime-dir"))
+                (mkdir (getenv "XDG_RUNTIME_DIR"))
+                (chmod (getenv "XDG_RUNTIME_DIR") #o700)
+                (setenv "MESON_TESTTHREADS"
+                        (if parallel-tests?
+                            (number->string (parallel-job-count))
+                            "1"))
+                (invoke "dbus-run-session" "--"
+                        "meson" "test" "-t" "0")))))))
+    (native-inputs
+     (list docbook-xsl
+           gettext-minimal
+           `(,glib "bin")               ;for glib-mkenums, etc.
+           libxslt
+           pkg-config
+           python
+           python-dbusmock
+           xorg-server-for-tests
+           setxkbmap))
+    (inputs
+     (list accountsservice
+           cinnamon-desktop
+           cinnamon-menus
+           cinnamon-settings-daemon
+           colord-gtk
+           cups
+           dconf
+           gcr
+           gnome-bluetooth
+           gnome-online-accounts
+           gnome-session
+           gnutls
+           grilo
+           gsound
+           ibus
+           iso-codes
+           json-glib
+           libadwaita
+           libgnomekbd
+           libgudev
+           libgtop
+           libnma
+           libnotify
+           libpwquality
+           (librsvg-for-system)             ;for loading SVG files
+           libsecret
+           libsoup
+           libxml2
+           libwacom
+           mesa
+           mit-krb5
+           modem-manager
+           network-manager-applet
+           polkit
+           pulseaudio
+           samba
+           tecla
+           tzdata
+           udisks
+           upower))
+    (synopsis "Utilities to configure the GNOME desktop")
+    (home-page "https://www.gnome.org/";)
+    (description
+     "This package contains configuration applets for the GNOME desktop,
+allowing to set accessibility configuration, desktop fonts, keyboard and mouse
+properties, sound setup, desktop theme and background, user interface
+properties, screen resolution, and other GNOME parameters.")
+    (license license:gpl2+)))
+
 (define-public cinnamon-desktop
   (package
     (name "cinnamon-desktop")

Reply via email to