1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-10 16:50:43 +02:00

teams: Add Codeberg accounts to <person> records.

Based on the committer accounts given in the thread at
<https://lists.gnu.org/archive/html/guix-devel/2025-05/msg00072.html>
and additional team member accounts given in the thread at
<https://lists.gnu.org/archive/html/guix-devel/2025-05/msg00322.html>.

* etc/teams.scm (<person>)[account]: Add field.
(person): Add ‘account’ parameter.
<top level>: Add known Codeberg account names.

Change-Id: Iad3b10c328b0df5d3c68d98ffee7f7c8ec4c8e23
This commit is contained in:
Ludovic Courtès 2025-05-23 14:45:51 +02:00
parent 22f50f439b
commit 647e345b66
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -75,13 +75,14 @@ exec $pre_inst_env_maybe guix repl -- "$0" "$@"
(scope team-scope)) (scope team-scope))
(define-record-type <person> (define-record-type <person>
(make-person name email) (make-person name email account)
person? person?
(name person-name) (name person-name)
(email person-email)) (email person-email)
(account person-codeberg-account))
(define* (person name #:optional email) (define* (person name #:optional email account)
(make-person name email)) (make-person name email account))
(define* (team id #:key name description (members '()) (define* (team id #:key name description (members '())
(scope '())) (scope '()))
@ -672,24 +673,29 @@ the \"texlive\" importer."
(define-member (person "Eric Bavier" (define-member (person "Eric Bavier"
"bavier@posteo.net") "bavier@posteo.net"
"bavier")
science) science)
(define-member (person "Lars-Dominik Braun" (define-member (person "Lars-Dominik Braun"
"lars@6xq.net") "lars@6xq.net"
"ldb")
python haskell) python haskell)
(define-member (person "Jonathan Brielmaier" (define-member (person "Jonathan Brielmaier"
"jonathan.brielmaier@web.de") "jonathan.brielmaier@web.de"
"jonsger")
mozilla) mozilla)
(define-member (person "Ludovic Courtès" (define-member (person "Ludovic Courtès"
"ludo@gnu.org") "ludo@gnu.org"
"civodul")
core home bootstrap core-packages installer core home bootstrap core-packages installer
documentation mentors) documentation mentors)
(define-member (person "Andreas Enge" (define-member (person "Andreas Enge"
"andreas@enge.fr") "andreas@enge.fr"
"enge")
bootstrap core-packages lxqt science tex) bootstrap core-packages lxqt science tex)
(define-member (person "Tanguy Le Carrour" (define-member (person "Tanguy Le Carrour"
@ -701,15 +707,18 @@ the \"texlive\" importer."
core mentors) core mentors)
(define-member (person "Steve George" (define-member (person "Steve George"
"steve@futurile.net") "steve@futurile.net"
"futurile")
rust) rust)
(define-member (person "Leo Famulari" (define-member (person "Leo Famulari"
"leo@famulari.name") "leo@famulari.name"
"lfam")
kernel) kernel)
(define-member (person "Efraim Flashner" (define-member (person "Efraim Flashner"
"efraim@flashner.co.il") "efraim@flashner.co.il"
"efraim")
embedded bootstrap rust) embedded bootstrap rust)
(define-member (person "jgart" (define-member (person "jgart"
@ -717,11 +726,13 @@ the \"texlive\" importer."
lisp mentors) lisp mentors)
(define-member (person "Guillaume Le Vaillant" (define-member (person "Guillaume Le Vaillant"
"glv@posteo.net") "glv@posteo.net"
"glv")
lisp) lisp)
(define-member (person "Julien Lepiller" (define-member (person "Julien Lepiller"
"julien@lepiller.eu") "julien@lepiller.eu"
"roptat")
java ocaml translations) java ocaml translations)
(define-member (person "Philip McGrath" (define-member (person "Philip McGrath"
@ -729,27 +740,33 @@ the \"texlive\" importer."
racket) racket)
(define-member (person "Mathieu Othacehe" (define-member (person "Mathieu Othacehe"
"othacehe@gnu.org") "othacehe@gnu.org"
"mothacehe")
core installer mentors) core installer mentors)
(define-member (person "Florian Pelz" (define-member (person "Florian Pelz"
"pelzflorian@pelzflorian.de") "pelzflorian@pelzflorian.de"
"pelzflorian")
translations) translations)
(define-member (person "Liliana Marie Prikler" (define-member (person "Liliana Marie Prikler"
"liliana.prikler@gmail.com") "liliana.prikler@gmail.com"
"lilyp")
emacs games gnome) emacs games gnome)
(define-member (person "Ricardo Wurmus" (define-member (person "Ricardo Wurmus"
"rekado@elephly.net") "rekado@elephly.net"
"rekado")
r sugar) r sugar)
(define-member (person "Christopher Baines" (define-member (person "Christopher Baines"
"guix@cbaines.net") "guix@cbaines.net"
"cbaines")
core mentors ruby) core mentors ruby)
(define-member (person "Andrew Tropin" (define-member (person "Andrew Tropin"
"andrew@trop.in") "andrew@trop.in"
"abcdw")
home emacs) home emacs)
(define-member (person "pukkamustard" (define-member (person "pukkamustard"
@ -769,19 +786,22 @@ the \"texlive\" importer."
julia core mentors r) julia core mentors r)
(define-member (person "宋文武" (define-member (person "宋文武"
"iyzsong@envs.net") "iyzsong@envs.net"
"iyzsong")
games localization lxqt qt xfce) games localization lxqt qt xfce)
(define-member (person "Vagrant Cascadian" (define-member (person "Vagrant Cascadian"
"vagrant@debian.org") "vagrant@debian.org"
"vagrantc")
embedded) embedded)
(define-member (person "Vagrant Cascadian" (define-member (person "Vagrant Cascadian" ;XXX: duplicate
"vagrant@reproducible-builds.org") "vagrant@reproducible-builds.org")
reproduciblebuilds) reproduciblebuilds)
(define-member (person "Maxim Cournoyer" (define-member (person "Maxim Cournoyer"
"maxim.cournoyer@gmail.com") "maxim.cournoyer@gmail.com"
"apteryx")
documentation gnome qt telephony electronics) documentation gnome qt telephony electronics)
(define-member (person "Katherine Cox-Buday" (define-member (person "Katherine Cox-Buday"
@ -797,19 +817,23 @@ the \"texlive\" importer."
audio documentation electronics embedded) audio documentation electronics embedded)
(define-member (person "Ekaitz Zarraga" (define-member (person "Ekaitz Zarraga"
"ekaitz@elenq.tech") "ekaitz@elenq.tech"
"ekaitz-zarraga")
bootstrap zig electronics) bootstrap zig electronics)
(define-member (person "Divya Ranjan Pattanaik" (define-member (person "Divya Ranjan Pattanaik"
"divya@subvertising.org") "divya@subvertising.org"
"divyaranjan")
emacs rust haskell) emacs rust haskell)
(define-member (person "Clément Lassieur" (define-member (person "Clément Lassieur"
"clement@lassieur.org") "clement@lassieur.org"
"snape")
mozilla) mozilla)
(define-member (person "Sharlatan Hellseher" (define-member (person "Sharlatan Hellseher"
"sharlatanus@gmail.com") "sharlatanus@gmail.com"
"Hellseher")
go lisp python science sysadmin) go lisp python science sysadmin)
(define-member (person "Vivien Kraus" (define-member (person "Vivien Kraus"
@ -817,7 +841,8 @@ the \"texlive\" importer."
gnome) gnome)
(define-member (person "Mark H Weaver" (define-member (person "Mark H Weaver"
"mhw@netris.org") "mhw@netris.org"
"mhw")
mozilla) mozilla)
(define-member (person "Adam Faiz" (define-member (person "Adam Faiz"
@ -829,23 +854,28 @@ the \"texlive\" importer."
r) r)
(define-member (person "Nicolas Goaziou" (define-member (person "Nicolas Goaziou"
"guix@nicolasgoaziou.fr") "guix@nicolasgoaziou.fr"
"ngz")
tex) tex)
(define-member (person "André Batista" (define-member (person "André Batista"
"nandre@riseup.net") "nandre@riseup.net"
"madage")
mozilla) mozilla)
(define-member (person "Janneke Nieuwenhuizen" (define-member (person "Janneke Nieuwenhuizen"
"janneke@gnu.org") "janneke@gnu.org"
"janneke")
bootstrap core-packages home hurd installer) bootstrap core-packages home hurd installer)
(define-member (person "Ian Eure" (define-member (person "Ian Eure"
"ian@retrospec.tv") "ian@retrospec.tv"
"ieure")
mozilla emacs) mozilla emacs)
(define-member (person "Zheng Junjie" (define-member (person "Zheng Junjie"
"z572@z572.online") "z572@z572.online"
"z572")
core-packages qt kde) core-packages qt kde)
(define-member (person "Sughosha" (define-member (person "Sughosha"
@ -853,7 +883,8 @@ the \"texlive\" importer."
kde) kde)
(define-member (person "Jelle Licht" (define-member (person "Jelle Licht"
"jlicht@fsfe.org") "jlicht@fsfe.org"
"jlicht")
javascript) javascript)
(define-member (person "Cayetano Santos" (define-member (person "Cayetano Santos"
@ -861,15 +892,18 @@ the \"texlive\" importer."
emacs electronics) emacs electronics)
(define-member (person "Greg Hogan" (define-member (person "Greg Hogan"
"code@greghogan.com") "code@greghogan.com"
"greghogan")
c++) c++)
(define-member (person "Hilton Chain" (define-member (person "Hilton Chain"
"hako@ultrarare.space") "hako@ultrarare.space"
"hako")
emacs home localization mozilla rust zig) emacs home localization mozilla rust zig)
(define-member (person "Noé Lopez" (define-member (person "Noé Lopez"
"noelopez@free.fr") "noelopez@free.fr"
"Baleine")
gnome) gnome)
(define-member (person "Ashvith Shetty" (define-member (person "Ashvith Shetty"