From patchwork Mon Aug 14 04:29:13 2023 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Maxim Cournoyer X-Patchwork-Id: 52807 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id 95FA427BBE9; Mon, 14 Aug 2023 05:34:37 +0100 (BST) X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.7 required=5.0 tests=BAYES_00,DKIM_ADSP_CUSTOM_MED, DKIM_INVALID,DKIM_SIGNED,FREEMAIL_FROM,MAILING_LIST_MULTI, SPF_HELO_PASS,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.6 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 6CF7C27BBE2 for ; Mon, 14 Aug 2023 05:34:35 +0100 (BST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1qVPHJ-0006Ys-3Y; Mon, 14 Aug 2023 00:34:05 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qVPHH-0006YD-CI for guix-patches@gnu.org; Mon, 14 Aug 2023 00:34:03 -0400 Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1qVPHH-0003oP-4V for guix-patches@gnu.org; Mon, 14 Aug 2023 00:34:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1qVPHG-0002uM-Vm for guix-patches@gnu.org; Mon, 14 Aug 2023 00:34:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#65280] [PATCH 03/26] etc: Add Qt manifests for Qt maintenance. Resent-From: Maxim Cournoyer Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 14 Aug 2023 04:34:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 65280 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 65280@debbugs.gnu.org Cc: Maxim Cournoyer Received: via spool by 65280-submit@debbugs.gnu.org id=B65280.169198763811133 (code B ref 65280); Mon, 14 Aug 2023 04:34:02 +0000 Received: (at 65280) by debbugs.gnu.org; 14 Aug 2023 04:33:58 +0000 Received: from localhost ([127.0.0.1]:60654 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qVPHB-0002tR-6l for submit@debbugs.gnu.org; Mon, 14 Aug 2023 00:33:57 -0400 Received: from mail-qt1-x832.google.com ([2607:f8b0:4864:20::832]:54783) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qVPH8-0002sm-BB for 65280@debbugs.gnu.org; Mon, 14 Aug 2023 00:33:54 -0400 Received: by mail-qt1-x832.google.com with SMTP id d75a77b69052e-40fd2f6bd7cso28888841cf.1 for <65280@debbugs.gnu.org>; Sun, 13 Aug 2023 21:33:54 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1691987628; x=1692592428; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:from:to:cc:subject:date :message-id:reply-to; bh=3rZVM2t+0EQOZN6cJGN/e1kniVurej7DSpJ49qNh/Ng=; b=lVaZyxwViqyR8JANG5HiNbcDw5qI/4wcaFaEF1gy46f326N68T7/6QOia28hOO13ee xZp/qsAUyRBTWGvlkY23Ir3HOSGnRxZBV4LeUiB4R7Du3ey82i9lLobkcoc8usWRKzD1 MudyT6u9L21UK1yr6Lryg/H10w7TditvchlD1gU0e8MLuzH9XFSadApvAKMMwl4HTDRT MbGDbCP4rEXJzrHiffKogas7/hOtoZpE2hZCvmmsT9BvHvImkcDTmwCCGgX6GwHVTjaT tfcGSgJjhlZt1IOBfg0KZyKRcUfkPlsHMkJtkzXoZ+ZiY2SkcLtNDH0+kOh1MAuaHcTF 6RyQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20221208; t=1691987628; x=1692592428; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:x-gm-message-state:from:to:cc :subject:date:message-id:reply-to; bh=3rZVM2t+0EQOZN6cJGN/e1kniVurej7DSpJ49qNh/Ng=; b=jUMmvYYHPUKeAn4bYDyzYdSkSmB6XVeZhw4kGxoJJGCDATm8p23/iGwSyrjaYk6Q4f 3mSNlhtjUyplbh4dc03VJ1Hjf+gsat39gmFtYpmMWrionTwqGBnO0FHFaUuV071nmZqW 5sTvA+KrBDUOKRLM6/4YWJIN2RjFXfUWmGRjV9yg3HEneqsLgUzkTjB3G7UmodVnTTCT aTmiZB9GNvJI7Pr8mr657P2xW0kvMC4jliAMWfliPIBQNuJD31eHeZeJ5jpPmkDx4ZWv G1HgOeaQze6UzxMakj5FzH9QcynSSii6sy+vXyhJ3tJ5AGYNyyOH5xjU5sWtJVCyYntg RRaA== X-Gm-Message-State: AOJu0YzY/k/nQfWVARqBcYnCCZmYv6gtA7nn3ZKhzN+/HbyNDTaGNPIL NRSLFWsZY8bXiMM+hAqN9PIIVzDOq5d3Bg== X-Google-Smtp-Source: AGHT+IF5dbEzf4UPGww20GyQP4pl87i8sf6S4OrEMRmZ+A6/CVjU9WFvaNE+hLaSzr3QKIUot1AFnw== X-Received: by 2002:a05:622a:4cb:b0:403:3048:b98 with SMTP id q11-20020a05622a04cb00b0040330480b98mr11156633qtx.34.1691987628494; Sun, 13 Aug 2023 21:33:48 -0700 (PDT) Received: from localhost.localdomain (dsl-205-233-124-111.b2b2c.ca. [205.233.124.111]) by smtp.gmail.com with ESMTPSA id f23-20020ac80157000000b0040541a8bd66sm2844492qtg.60.2023.08.13.21.33.47 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Sun, 13 Aug 2023 21:33:47 -0700 (PDT) From: Maxim Cournoyer Date: Mon, 14 Aug 2023 00:29:13 -0400 Message-ID: X-Mailer: git-send-email 2.41.0 In-Reply-To: References: MIME-Version: 1.0 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org X-getmail-retrieved-from-mailbox: Patches * etc/teams/qt/common.scm: New file. * etc/teams/qt/qt-manifest.scm: Likewise. * etc/teams/qt/qt5-manifest.scm: Likewise. --- etc/teams/qt/common.scm | 50 +++++++++++++++++++++++++++++++++++ etc/teams/qt/qt-manifest.scm | 34 ++++++++++++++++++++++++ etc/teams/qt/qt5-manifest.scm | 34 ++++++++++++++++++++++++ 3 files changed, 118 insertions(+) create mode 100644 etc/teams/qt/common.scm create mode 100644 etc/teams/qt/qt-manifest.scm create mode 100644 etc/teams/qt/qt5-manifest.scm diff --git a/etc/teams/qt/common.scm b/etc/teams/qt/common.scm new file mode 100644 index 0000000000..8e11ac220b --- /dev/null +++ b/etc/teams/qt/common.scm @@ -0,0 +1,50 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2023 Maxim Cournoyer +;;; +;;; 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 . + +;;; This file returns a manifest of packages related to linux-libre. +;;; Simplistically, it selects packages whose names begin with "linux-libre". +;;; It is used to assist continuous integration of the kernel packages. + +(use-modules (guix packages) + (guix profiles) + (guix utils) + (gnu packages)) + +(define* (qt-packages-manifest #:key major-version negate-version-test?) + "Return a manifest of Qt packages for MAJOR-VERSION, or any version if left +unspecified. If NEGATE-VERSION-TEST? is true, select all the Qt packages +*not* matching MAJOR-VERSION." + (manifest + (map package->manifest-entry + (fold-packages + (lambda (package lst) + (let ((uri (and=> (package-source package) + (lambda (x) + (and (origin? x) + (origin-uri x)))))) + (if (and uri + (string? uri) + (string-prefix? "mirror://qt/" uri) + (if major-version + ((if negate-version-test? not identity) + (string=? major-version (version-major + (package-version package)))) + #t)) + (cons package lst) + lst))) + '())))) diff --git a/etc/teams/qt/qt-manifest.scm b/etc/teams/qt/qt-manifest.scm new file mode 100644 index 0000000000..0d8fa95bfe --- /dev/null +++ b/etc/teams/qt/qt-manifest.scm @@ -0,0 +1,34 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2023 Maxim Cournoyer +;;; +;;; 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 . + +;;; This file returns a manifest of packages related to linux-libre. +;;; Simplistically, it selects packages whose names begin with "linux-libre". +;;; It is used to assist continuous integration of the kernel packages. + +(load "common.scm") + +;;; Commentary: +;;; +;;; This manifest can be used to update the latest Qt packages collection, via +;;; e.g.: +;;; +;;; ./pre-inst-env guix refresh -u -m etc/teams/qt/qt-manifest.scm +;;; +;;; Code: + +(qt-packages-manifest #:major-version "5" #:negate-version-test? #t) diff --git a/etc/teams/qt/qt5-manifest.scm b/etc/teams/qt/qt5-manifest.scm new file mode 100644 index 0000000000..8d879f182e --- /dev/null +++ b/etc/teams/qt/qt5-manifest.scm @@ -0,0 +1,34 @@ +;;; GNU Guix --- Functional package management for GNU +;;; Copyright © 2023 Maxim Cournoyer +;;; +;;; 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 . + +;;; This file returns a manifest of packages related to linux-libre. +;;; Simplistically, it selects packages whose names begin with "linux-libre". +;;; It is used to assist continuous integration of the kernel packages. + +(load "common.scm") + +;;; Commentary: +;;; +;;; This manifest can be used to update the Qt 5 packages collection, via +;;; e.g.: +;;; +;;; ./pre-inst-env guix refresh -u -m etc/teams/qt/qt5-manifest.scm --to-version=5.15.10 +;;; +;;; Code: + +(qt-packages-manifest #:major-version "5")