mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-18 21:46:35 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

team: kde: Add kde-manifest.scm.

Browse source 
Change-Id: I3455131286e014751fe58c41180fff37b27ac920
This commit is contained in:
Zheng Junjie 2025-01-09 22:59:25 +08:00
parent bd24a13c57
commit 9910e66a4e
No known key found for this signature in database
GPG key ID: 3B5AA993E1A2DFF0
1 changed files with 45 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

45
etc/teams/kde/kde-manifest.scm Normal file
View file

@ -0,0 +1,45 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2025 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
;;;
;;; Code:
(use-modules (guix packages)
(guix profiles)
(srfi srfi-1)
(srfi srfi-2))
(manifest
(map package->manifest-entry
(fold-packages
(lambda (package lst)
(if (or (and-let* ((uri (and=> (package-source package)
(lambda (x)
(and (origin? x)
(origin-uri x)))))
((string? uri)))
(string-prefix? "mirror://kde/" uri))
(any
(lambda (pkg)
(string=? "extra-cmake-modules" (first pkg)))
(append (package-native-inputs package)
(package-propagated-inputs package)
(package-inputs package))))
(cons package lst)
lst))
(list))))