1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-07-29 23:29:27 +02:00

Compare commits

..

37 Commits

Author SHA1 Message Date
Steve George d0d906917c gnu: ruby: Update to use 3.4 series.
* gnu/packages/ruby.scm (ruby): Use Ruby-3.4 which is still
  in full maintenance period.

Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 2288a14a60 gnu: ruby-timeout: Update to 0.6.0.
* gnu/packages/ruby-xyz.scm (ruby-timeout): Update to 0.6.0.

Change-Id: Ic87e5011edb627cf902a85e50ccbc7425a3c9c28
2026-04-26 12:41:27 +01:00
Aaron Covrig da50337f6b gnu: ruby-diffy: Update to 3.4.4.
* gnu/packages/ruby-xyz.scm (ruby-diffy): Update to 3.4.4.
[native-inputs]: Add ruby-rake.
[arguments]<#:test-target>: Set to spec and enable tests.

Change-Id: Iaaf371ca93089781ee48ff1c530f1abde09483d9
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 939ce93a12 gnu: ruby-rainbow: Update to 3.1.1.
* gnu/packages/ruby-xyz.scm (ruby-rainbow): Update to 3.1.1.

Change-Id: I12b411ca895894b859ce6e2e9f87043bc5ca4825
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 421df8e79b gnu: ruby-tilt: Update to 2.7.0.
* gnu/packages/ruby-xyz.scm (ruby-tilt): Update to 2.7.0.
[propagated-inputs]: Remove ruby-pandoc-ruby and ruby-sassc.
[native-inputs]: Remove bundler, ruby-yard, ruby-builder, ruby-erubis, and
ruby-markaby.

Change-Id: I2ccbc8325cb8fa32e4b110b448f61a7ad7a33d6a
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig c534e0adfd gnu: ruby-slim: Update native-inputs.
* gnu/packages/ruby-xyz.scm (ruby-slim): Update native-inputs.
[native-inputs]: Add ruby-pandoc-ruby.
[home-page]: Update url to https.

Change-Id: I632fabcb8e785a5494ff34a5d38be5dabe2f00e7
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 3b338604b8 gnu: ruby-timecop: Update to 0.9.10.
* gnu/packages/ruby-xyz.scm (ruby-timecop): Update to 0.9.10.

Change-Id: Ie5d9220b3963870946c6c7ad8397d3edb5f97a6d
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 67c8d652fd gnu: ruby-unicode-display-width: Update to 3.2.0.
* gnu/packages/ruby-xyz.scm (ruby-unicode-display-width): Update to 3.2.0.
[propagated-inputs]: Add ruby-unicode-emoji.

Change-Id: Ida9c8fc4f005153ae1395ac9939441d7b405263d
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 3a2775a160 gnu: Add ruby-unicode-emoji.
* gnu/packages/ruby-xyz.scm (ruby-unicode-emoji): New variable.

Change-Id: Ia07e49d5d1e66cc2605426a03a2eff0ff9a17bee
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 5e5ff1381b gnu: ruby-terminal-table: Update to 4.0.0.
* gnu/packages/ruby-xyz.scm (ruby-terminal-table): Update to 4.0.0.
[native-inputs]: Remove ruby-term-ansicolor.

Change-Id: Idde31b70c3e0e8e18a99e38a7344ac339a9d24bf
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig ef165bcf5a gnu: jekyll: Loosen dependencies.
* gnu/packages/ruby-xyz.scm (jekyll): Loosen dependencies.
[arguments]<#:phases>{loosen-dependencies}: New phase.

Change-Id: I832d2a4d1d9b84675906bb9d6fa7e2265f911c52
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig f8f1778c69 gnu: ruby-concurrent-ruby: Update to 1.3.6.
* gnu/packages/ruby-xyz.scm (ruby-concurrent-ruby): Update to 1.3.6.

Change-Id: Idb3268ff21495e5d339641f970b4c281a4a18a24
2026-04-26 12:41:27 +01:00
Aaron Covrig 1e88181626 gnu: ruby-pg: Update to 1.6.3.
* gnu/packages/ruby-xyz.scm (ruby-pg): Update to 1.6.3.
[source]: Remove patch.

Change-Id: Iadd1ae740a6e46c1f27ff194f160c16878d0a27b
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig c364afa1d6 gnu: ruby-faker: Update to 3.6.0.
* gnu/packages/ruby-xyz.scm (ruby-faker): Update to 3.6.0.
[description]: Add space after period.

Change-Id: I2b45827ece0e9db3a7a0c7d6a69c29f5f3a6e13f
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Aaron Covrig 8dffe4713d gnu: ruby-rubygems-tasks: Update to 0.3.0.
* gnu/packages/ruby-xyz.scm (ruby-rubygems-tasks): Update to 0.3.0.

Change-Id: Ib5d2191b82f28f99b5d44a663f782c25d12ed218
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:27 +01:00
Steve George f1286d6bf1 gnu: Update ruby-method-source.
* gnu/packages/ruby-xyz.scm (ruby-method-source): Update to 1.1.0.
  [arguments]<#:ruby>: Use ruby-3.3.

Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:41:23 +01:00
gemmaro 8cb29ebe60 gnu: ruby-racc: Update to 1.8.1.
* gnu/packages/ruby-xyz.scm (ruby-racc): Update to 1.8.1.
[source]: Use the Git repository for tests.
[arguments]<#:tests?>: Remove the disabling of tests.
<#:phases>: Add the compile phase before the build phase to support the
optional native extension for performance improvements.
[native-inputs]: Remove Hoe and add test-unit-ruby-core as a test dependency.

Change-Id: If3295179b6401db63cd5c1ab3beb77fe0579eaae
2026-04-26 12:07:48 +01:00
Yan Abu Arab 56b1a933f1 gnu: Add bashly.
* gnu/packages/bash.scm (bashly): New variable.

Change-Id: I242872ae6e958865fed7d4f63c590b3908ff61a0
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 19019755ad gnu: Add ruby-tty-markdown.
* gnu/packages/ruby-xyz.scm (ruby-tty-markdown): New variable.

Change-Id: I6f545a7e5b0d12040a0ccfaf540331e0d3a708a9
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 57a0260359 gnu: Add ruby-strings.
* gnu/packages/ruby-xyz.scm (ruby-strings): New variable.

Change-Id: I72fe90e20fb7971f13717633fb8495319ad76dae
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 82b8284ce1 gnu: Add ruby-strings-ansi.
* gnu/packages/ruby-xyz.scm (ruby-strings-ansi): New variable.

Change-Id: I5cccefb9ecc2f6a7a446432134de8284beeb02b0
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 7c290d6667 gnu: Add ruby-unicode-utils.
* gnu/packages/ruby-xyz.scm (ruby-unicode-utils): New variable.

Change-Id: I9c7d65878ea3740590574fc95e6df6d363af41f5
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 46a4f15a55 gnu: Add ruby-pastel.
* gnu/packages/ruby-xyz.scm (ruby-pastel): New variable.

Change-Id: Id29ba0f928d96d74cb8c8a103efeaa13ca42844e
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab d407ea1404 gnu: Add ruby-tty-color.
* gnu/packages/ruby-xyz.scm (ruby-tty-color): New variable.

Change-Id: I1ac670580783b37278b2d8b911d55db36ce1bb82
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 3da6a0bc9d gnu: Add ruby-tty-screen.
* gnu/packages/ruby-xyz.scm (ruby-tty-screen): New variable.

Change-Id: I95dbd3b246bdfaeaf405b801ecee8ea601181d53
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 44ac95c31f gnu: Add ruby-requires.
* gnu/packages/ruby-xyz.scm (ruby-requires): New variable.

Change-Id: I1c7be3706228519ba0863757067fc16ec9441159
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab e734102b74 gnu: Add ruby-ostruct.
* gnu/packages/ruby-xyz.scm (ruby-ostruct): New variable.

Change-Id: Id3aeac1448ea8eea2dc2d18f1f9948695b45a128
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 4a041b080e gnu: Add ruby-lp.
* gnu/packages/ruby-xyz.scm (ruby-lp): New variable.

Change-Id: I945c9655b15a20cf9f7eb98046688c095103191d
2026-04-26 12:07:48 +01:00
Yan Abu Arab a3ae72cebe gnu: Add ruby-logger.
* gnu/packages/ruby-xyz.scm (ruby-logger): New variable.

Change-Id: I4bf70d0454508ab26796ffaa9760b8b7bc47b412
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 4dea734cb7 gnu: Add ruby-gtx.
* gnu/packages/ruby-xyz.scm (ruby-gtx): New variable.

Change-Id: I299aced1e3c3bde74842ed3eb1b7715907d29f59
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 44019bf299 gnu: Add ruby-erb.
* gnu/packages/ruby-xyz.scm (ruby-erb): New variable.

Change-Id: Ie93d17f86117cac8a7578cd6f67f37f98c694dc9
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 3a7d19de6a gnu: Add ruby-filewatcher.
* gnu/packages/ruby-xyz.scm (ruby-filewatcher): New variable.

Change-Id: I8000180150dd459892286ae2e113c11ad6bd1703
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab b03996be13 gnu: Add ruby-module-methods.
* gnu/packages/ruby-xyz.scm (ruby-module-methods): New variable.

Change-Id: Ie56b41d3b3e46efc1f93082229720798b0bc07ce
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 7ad161c1c8 gnu: Add ruby-completely.
* gnu/packages/ruby-xyz (ruby-completely): New variable.

Change-Id: I8a302bb43b9ffb4ca80ba22341f5f8c13ab7a4e1
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 4dd12d40d8 gnu: Add ruby-mister-bin.
* gnu/packages/ruby-xyz (ruby-mister-bin): New variable.

Change-Id: I19471c1435d2a64d1b4fa349273e5387fdaf9b16
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab ef3aec8060 gnu: Add ruby-docopt-ng.
* gnu/packages/ruby-xyz (ruby-docopt-ng): New variable.

Change-Id: I630bae2f85829df393e45d01679535ff1331bd41
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
Yan Abu Arab 057e45fa94 gnu: Add ruby-colsole.
* gnu/packages/ruby-xyz.scm (ruby-colsole): New variable.

Closes: guix/guix#4985
Change-Id: Ic45d94aecbe190d363cf91c026233cd2c26d43f1
Signed-off-by: Steve George <steve@futurile.net>
2026-04-26 12:07:48 +01:00
213 changed files with 15883 additions and 73124 deletions
-2
View File
@@ -16,8 +16,6 @@
( ;; primary: "D0C2 EAC1 3310 822D 98DE B57C E9C5 A2D9 0898 A02F" ( ;; primary: "D0C2 EAC1 3310 822D 98DE B57C E9C5 A2D9 0898 A02F"
"01FD 85F4 1A7B 7F82 0583 06A5 935E BE07 36DC 857E" "01FD 85F4 1A7B 7F82 0583 06A5 935E BE07 36DC 857E"
(name "avp")) (name "avp"))
("5D54 CF25 57B2 38E8 8DC1 80A2 2D22 3241 0AB7 4043"
(name "baleine"))
( ;; primary: "34FF 38BC D151 25A6 E340 A0B5 3453 2F9F AFCA 8B8E" ( ;; primary: "34FF 38BC D151 25A6 E340 A0B5 3453 2F9F AFCA 8B8E"
"A3A4 B419 0074 087C A7DE 5698 BC45 CA67 E2F8 D007" "A3A4 B419 0074 087C A7DE 5698 BC45 CA67 E2F8 D007"
(name "bavier")) (name "bavier"))
-2
View File
@@ -264,7 +264,6 @@ gnu/installer(\.scm$|/) @guix/installer
gnu/packages/clojure\.scm @guix/java gnu/packages/clojure\.scm @guix/java
gnu/packages/java(-.+|)\.scm$ @guix/java gnu/packages/java(-.+|)\.scm$ @guix/java
gnu/packages/maven(-.+|)\.scm$ @guix/java gnu/packages/maven(-.+|)\.scm$ @guix/java
gnu/packages/netbeans\.scm @guix/java
guix/build/ant-build-system\.scm @guix/java guix/build/ant-build-system\.scm @guix/java
guix/build/clojure-build-system\.scm @guix/java guix/build/clojure-build-system\.scm @guix/java
guix/build/clojure-utils\.scm @guix/java guix/build/clojure-utils\.scm @guix/java
@@ -275,7 +274,6 @@ guix/build-system/ant\.scm @guix/java
guix/build-system/clojure\.scm @guix/java guix/build-system/clojure\.scm @guix/java
guix/build-system/maven\.scm @guix/java guix/build-system/maven\.scm @guix/java
gnu/packages/javascript\.scm @guix/javascript
gnu/packages/node-xyz\.scm @guix/javascript gnu/packages/node-xyz\.scm @guix/javascript
gnu/packages/node\.scm @guix/javascript gnu/packages/node\.scm @guix/javascript
guix/build-system/node\.scm @guix/javascript guix/build-system/node\.scm @guix/javascript
-2
View File
@@ -457,8 +457,6 @@ AUX_FILES = \
gnu/packages/aux-files/findclass.php \ gnu/packages/aux-files/findclass.php \
gnu/packages/aux-files/guix.vim \ gnu/packages/aux-files/guix.vim \
gnu/packages/aux-files/guix-nvim.vim \ gnu/packages/aux-files/guix-nvim.vim \
gnu/packages/aux-files/linux-libre/7.0-arm64.conf \
gnu/packages/aux-files/linux-libre/7.0-x86_64.conf \
gnu/packages/aux-files/linux-libre/6.19-arm64.conf \ gnu/packages/aux-files/linux-libre/6.19-arm64.conf \
gnu/packages/aux-files/linux-libre/6.19-i686.conf \ gnu/packages/aux-files/linux-libre/6.19-i686.conf \
gnu/packages/aux-files/linux-libre/6.19-x86_64.conf \ gnu/packages/aux-files/linux-libre/6.19-x86_64.conf \
+7 -7
View File
@@ -3256,8 +3256,8 @@ your Linode Summary section.) Now you can run the "install guix from
@example @example
sudo apt-get install gpg sudo apt-get install gpg
wget https://codeberg.org/efraim.gpg -qO - | gpg --import - wget https://sv.gnu.org/people/viewgpg.php?user_id=15145 -qO - | gpg --import -
wget https://guix.gnu.org/guix-install.sh wget https://git.savannah.gnu.org/cgit/guix.git/plain/etc/guix-install.sh
chmod +x guix-install.sh chmod +x guix-install.sh
./guix-install.sh ./guix-install.sh
guix pull guix pull
@@ -3436,7 +3436,7 @@ Now you can run the "install guix from @pxref{Binary Installation,,,
guix, GNU Guix}" steps: guix, GNU Guix}" steps:
@example @example
wget https://guix.gnu.org/guix-install.sh wget https://git.savannah.gnu.org/cgit/guix.git/plain/etc/guix-install.sh
chmod +x guix-install.sh chmod +x guix-install.sh
./guix-install.sh ./guix-install.sh
guix pull guix pull
@@ -4491,7 +4491,7 @@ network. Assuming your interface is named @samp{enp2s0}, the following
command can be used to do so: command can be used to do so:
@example sh @example sh
# nmcli con add type bridge-slave autoconnect yes ifname enp2s0 master br0 # nmcli con add type bridge-slave ifname enp2s0 master br0
@end example @end example
@quotation Important @quotation Important
@@ -4527,8 +4527,8 @@ bridge interface, as the default is to deny all. Add the following to
your list of services to do so: your list of services to do so:
@example lisp @example lisp
(extra-special-file "/etc/qemu/bridge.conf" (extra-special-file "/etc/qemu/host.conf"
(plain-file "bridge.conf" "allow br0\n")) (plain-file "host.conf" "allow br0\n"))
@end example @end example
@subsection Invoking QEMU with the right command line options @subsection Invoking QEMU with the right command line options
@@ -4546,7 +4546,7 @@ machine making use of the bridge would cause networking issues.
@example sh @example sh
$ qemu-system-x86_64 [...] \ $ qemu-system-x86_64 [...] \
-device virtio-net-pci,netdev=user0,mac=XX:XX:XX:XX:XX:XX \ -device virtio-net-pci,netdev=user0,mac=XX:XX:XX:XX:XX:XX \
-netdev bridge,helper=/run/privileged/bin/qemu-bridge-helper,id=user0,br=br0 \ -netdev bridge,id=user0,br=br0 \
[...] [...]
@end example @end example
+29 -85
View File
@@ -10,8 +10,8 @@
@include version.texi @include version.texi
@c Identifier of the OpenPGP key used to sign tarballs and such. @c Identifier of the OpenPGP key used to sign tarballs and such.
@set OPENPGP-SIGNING-KEY-ID A28BF40C3E551372662D14F741AAE7DCCA3D8351 @set OPENPGP-SIGNING-KEY-ID 3CE464558A84FDC69DB40CFB090B11993D9AEBB5
@set OPENPGP-SIGNING-KEY-URL https://codeberg.org/efraim.gpg @set OPENPGP-SIGNING-KEY-URL https://sv.gnu.org/people/viewgpg.php?user_id=15145
@c Base URL for downloads. @c Base URL for downloads.
@set BASE-URL https://ftpmirror.gnu.org/gnu/guix @set BASE-URL https://ftpmirror.gnu.org/gnu/guix
@@ -2658,13 +2658,12 @@ bootloaders.
Once you are done partitioning the target hard disk drive, you have to Once you are done partitioning the target hard disk drive, you have to
create a file system on the relevant partition(s)@footnote{Currently create a file system on the relevant partition(s)@footnote{Currently
Guix System can mount only ext4, btrfs, JFS, F2FS, and XFS file systems Guix System supports only ext4, btrfs, bcachefs, JFS, F2FS, and XFS
at boot time. In particular, code that reads file system UUIDs and file systems. In particular, code that reads file system UUIDs and
labels works only for these file system types. The code for bcachefs is labels works only for these file system types. For bcachefs, also add
in place, but support for loading out-of-tree kernel modules in the the @code{bcachefs-linux-module} to your @code{operating-system}'s
initrd is not.}. @code{initrd-modules}.}. For the ESP, if you have one and assuming it is
@file{/dev/sda1}, run:
For the ESP, if you have one and assuming it is @file{/dev/sda1}, run:
@example @example
mkfs.fat -F32 /dev/sda1 mkfs.fat -F32 /dev/sda1
@@ -4922,17 +4921,6 @@ information.
In addition, @command{guix pull} supports all the common build options In addition, @command{guix pull} supports all the common build options
(@pxref{Common Build Options}). (@pxref{Common Build Options}).
Every time the user invokes a Guix command, Guix detects if the current
installation has exceeded a certain duration (7 days by default) and
alerts the user to update with @command{guix pull} if necessary.
The duration can be configured with the following environment variable:
@defvr {Environment Variable} GUIX_DISTRO_AGE_WARNING
This environment variable, if set, should be a string representing a
duration. If the current Guix installation exceeds the duration, Guix
will raise a warning for outdated installation.
@end defvr
@node Invoking guix time-machine @node Invoking guix time-machine
@section Invoking @command{guix time-machine} @section Invoking @command{guix time-machine}
@@ -6602,21 +6590,6 @@ directory within the container. If this is undesirable,
be automatically shared and will change to the user's home directory be automatically shared and will change to the user's home directory
within the container instead. See also @option{--user}. within the container instead. See also @option{--user}.
@item --cwd=@var{directory}
For containers, change to @var{directory} inside the container instead
of the default location. The default location is the current working
directory when @option{--no-cwd} is not used, or the user's home
directory when @option{--no-cwd} is used. When @var{directory} is a
relative file name, it is interpreted relative to the current working
directory on the host. Note that @option{--cwd} does not automatically
share @var{directory}---you must ensure it is accessible via the default
current directory sharing or explicit @option{--share}/@option{--expose}
options. For example:
@example
guix shell --container --cwd=/tmp --share=/tmp coreutils
@end example
@item --writable-root @item --writable-root
When using @option{--container}, this option makes the root file system When using @option{--container}, this option makes the root file system
writable (it is read-only by default). writable (it is read-only by default).
@@ -7118,17 +7091,6 @@ directory within the container. If this is undesirable,
be automatically shared and will change to the user's home directory be automatically shared and will change to the user's home directory
within the container instead. See also @option{--user}. within the container instead. See also @option{--user}.
@item --cwd=@var{directory}
For containers, change to @var{directory} inside the container instead
of the default location. The default location is the current working
directory when @option{--no-cwd} is not used, or the user's home
directory when @option{--no-cwd} is used. When @var{directory} is a
relative file name, it is interpreted relative to the current working
directory on the host. Note that @option{--cwd} does not automatically
share @var{directory}---you must ensure it is accessible via the default
current directory sharing or explicit @option{--share}/@option{--expose}
options.
@item --expose=@var{source}[=@var{target}] @item --expose=@var{source}[=@var{target}]
@itemx --share=@var{source}[=@var{target}] @itemx --share=@var{source}[=@var{target}]
For containers, @option{--expose} (resp. @option{--share}) exposes the For containers, @option{--expose} (resp. @option{--share}) exposes the
@@ -19253,7 +19215,7 @@ Partitioning}, for an example.
When using GRUB as the bootloader, the LUKS password is only requested When using GRUB as the bootloader, the LUKS password is only requested
once: GRUB passes the master key to the initial RAM disk automatically. once: GRUB passes the master key to the initial RAM disk automatically.
@xref{grub-luks-root-device-key, Automatic LUKS Master Key Passing}, for @xref{Bootloader Configuration, Automatic LUKS Master Key Passing}, for
details. details.
@end defvar @end defvar
@@ -20716,9 +20678,6 @@ The syslog configuration file to use.
@xref{syslogd invocation,,, inetutils, GNU Inetutils}, for more @xref{syslogd invocation,,, inetutils, GNU Inetutils}, for more
information on the configuration file syntax. information on the configuration file syntax.
@item @code{pid-file} (default: @code{"/var/run/syslog.pid"})
The pid file for @command{syslogd}.
@item @code{extra-options} (default: @code{'()}) @item @code{extra-options} (default: @code{'()})
List of extra command-line options for @command{syslog}. List of extra command-line options for @command{syslog}.
@@ -45291,12 +45250,6 @@ Extra command line options for @code{guix-data-service}.
@item @code{extra-process-jobs-options} (default: @var{'()}) @item @code{extra-process-jobs-options} (default: @var{'()})
Extra command line options for @code{guix-data-service-process-jobs}. Extra command line options for @code{guix-data-service-process-jobs}.
@item @code{extra-environment-variables} (default: @var{'()})
Extra environment variables for @code{guix-data-service}.
@item @code{extra-process-jobs-environment-variables} (default: @var{'()})
Extra environment variables for @code{guix-data-service-process-jobs}.
@item @code{git-repositories} (default: @var{#f}) @item @code{git-repositories} (default: @var{#f})
List of git-repository information to insert into the database. List of git-repository information to insert into the database.
@@ -49006,28 +48959,8 @@ This option in enabled by default. In some cases involving the
in RAM, it can be handy to disable the option by setting it to in RAM, it can be handy to disable the option by setting it to
@code{#f}. @code{#f}.
@item @code{extra-initrd} (default: @code{#f}) @subsubheading Automatic LUKS Master Key Passing
File name of an additional initrd to load during the boot. It may or
may not point to a file in the store, but the main use case is for
out-of-store files containing secrets.
For any use case not involving secrets, you should use regular initrd
(@pxref{operating-system Reference, @code{initrd}}) instead.
Be careful when using this option, since pointing to a file that is not
readable by the grub while booting will cause the boot to fail and
require a manual edit of the initrd line in the grub menu.
Currently only supported by GRUB.
@end table
@end deftp
@anchor{grub-luks-root-device-key}
@unnumberedsubsec Automatic LUKS Master Key Passing
@cindex LUKS, root file system encryption
@cindex passphrase, for LUKS-encrypted root
When booting from a LUKS-encrypted device using GRUB, the password is When booting from a LUKS-encrypted device using GRUB, the password is
normally requested twice: once by GRUB to access @file{/boot}, and a normally requested twice: once by GRUB to access @file{/boot}, and a
second time by the initial RAM disk to mount the root file system. second time by the initial RAM disk to mount the root file system.
@@ -49068,7 +49001,22 @@ No configuration is required: GRUB's @code{procfs} and @code{luks}
modules are loaded automatically when encrypted devices are declared modules are loaded automatically when encrypted devices are declared
via @code{luks-device-mapping} (@pxref{Mapped Devices}). via @code{luks-device-mapping} (@pxref{Mapped Devices}).
@unnumberedsubsec Additional Boot Entries @item @code{extra-initrd} (default: @code{#f})
File name of an additional initrd to load during the boot. It may or
may not point to a file in the store, but the main use case is for
out-of-store files containing secrets.
For any use case not involving secrets, you should use regular initrd
(@pxref{operating-system Reference, @code{initrd}}) instead.
Be careful when using this option, since pointing to a file that is not
readable by the grub while booting will cause the boot to fail and
require a manual edit of the initrd line in the grub menu.
Currently only supported by GRUB.
@end table
@end deftp
@cindex dual boot @cindex dual boot
@cindex boot menu @cindex boot menu
@@ -49197,13 +49145,9 @@ example of chainloading a different GNU/Linux system.
@end table @end table
@end deftp @end deftp
@unnumberedsubsec Themes
@cindex HDPI @cindex HDPI
@cindex HiDPI @cindex HiDPI
@cindex resolution @cindex resolution
@cindex themes, for GRUB
@cindex bootloader themes
@c FIXME: Write documentation once it's stable. @c FIXME: Write documentation once it's stable.
For now only GRUB has theme support. GRUB themes are created using For now only GRUB has theme support. GRUB themes are created using
the @code{grub-theme} form, which is not fully documented yet. the @code{grub-theme} form, which is not fully documented yet.
@@ -49223,8 +49167,8 @@ Return the default GRUB theme used by the operating system if no
@code{theme} field is specified in @code{bootloader-configuration} @code{theme} field is specified in @code{bootloader-configuration}
record. record.
It comes with a fancy background image displaying the Guix It comes with a fancy background image displaying the GNU and Guix
logo. logos.
@end deffn @end deffn
For example, to override the default resolution, you may use something For example, to override the default resolution, you may use something
@@ -49598,7 +49542,7 @@ how to generate an image that uses the @code{grub-efi-bootloader}
bootloader and boot it with QEMU: bootloader and boot it with QEMU:
@example @example
image=$(guix system image --image-type=qcow2-gpt \ image=$(guix system image --image-type=qcow2 \
gnu/system/examples/lightweight-desktop.tmpl) gnu/system/examples/lightweight-desktop.tmpl)
cp $image /tmp/my-image.qcow2 cp $image /tmp/my-image.qcow2
chmod +w /tmp/my-image.qcow2 chmod +w /tmp/my-image.qcow2
+11 -11
View File
@@ -30,7 +30,7 @@ COOKBOOK_LANGUAGES = de es fr it ko pt_BR ru sk sv ta zh_CN
# Arg1: A list of languages codes. # Arg1: A list of languages codes.
# Arg2: The file name stem. # Arg2: The file name stem.
lang_to_texinfo = $(foreach lang,$(1),$(srcdir)/%D%/$(2).$(lang).texi) lang_to_texinfo = $(foreach lang,$(1),%D%/$(2).$(lang).texi)
# Automake does not understand GNU Make non-standard extensions, # Automake does not understand GNU Make non-standard extensions,
# unfortunately, so we cannot use the above patsubst-based function here. # unfortunately, so we cannot use the above patsubst-based function here.
@@ -104,7 +104,7 @@ MAINTAINERCLEANFILES = $(OS_CONFIG_EXAMPLES_TEXI) $(TRANSLATED_INFO)
# reference is not translated, which means it references a section that does not # reference is not translated, which means it references a section that does not
# exist. # exist.
define xref_command define xref_command
$(top_builddir)/pre-inst-env $(GUILE) --no-auto-compile \ $(top_srcdir)/pre-inst-env $(GUILE) --no-auto-compile \
"$(top_srcdir)/build-aux/convert-xref.scm" \ "$(top_srcdir)/build-aux/convert-xref.scm" \
$@.tmp $< $@.tmp $<
endef endef
@@ -116,21 +116,21 @@ dummy_pot = $(shell mktemp --suffix=.pot)
$(srcdir)/%D%/guix.%.texi: po/doc/guix-manual.%.po $(srcdir)/%D%/contributing.%.texi guix/build/po.go $(srcdir)/%D%/guix.%.texi: po/doc/guix-manual.%.po $(srcdir)/%D%/contributing.%.texi guix/build/po.go
-$(AM_V_PO4A)$(PO4A) --no-update \ -$(AM_V_PO4A)$(PO4A) --no-update \
--variable localized="$@.tmp" \ --variable localized="$@.tmp" \
--variable master="$(srcdir)/%D%/guix.texi" \ --variable master="%D%/guix.texi" \
--variable po="$<" \ --variable po="$<" \
--variable pot=$(dummy_pot) \ --variable pot=$(dummy_pot) \
$(srcdir)/po/doc/po4a.cfg po/doc/po4a.cfg
-sed -i "s|guix\.info|$$(basename "$@" | sed 's|texi$$|info|')|" "$@.tmp" -sed -i "s|guix\.info|$$(basename "$@" | sed 's|texi$$|info|')|" "$@.tmp"
-$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command) -$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command)
-mv "$@.tmp" "$@" -mv "$@.tmp" "$@"
$(srcdir)/%D%/guix-cookbook.%.texi: po/doc/guix-cookbook.%.po guix/build/po.go $(srcdir)/%D%/guix-cookbook.%.texi: po/doc/guix-cookbook.%.po guix/build/po.go
-$(AM_V_PO4A)$(PO4A) --no-update \ -$(AM_V_PO4A)$(PO4A) --no-update \
--variable localized="$@.tmp" \ --variable localized="$@.tmp" \
--variable master="$(srcdir)/%D%/guix-cookbook.texi" \ --variable master="%D%/guix-cookbook.texi" \
--variable po="$<" \ --variable po="$<" \
--variable pot=$(dummy_pot) \ --variable pot=$(dummy_pot) \
$(srcdir)/po/doc/po4a.cfg po/doc/po4a.cfg
-sed -i "s|guix-cookbook\.info|$$(basename "$@" | sed 's|texi$$|info|')|" "$@.tmp" -sed -i "s|guix-cookbook\.info|$$(basename "$@" | sed 's|texi$$|info|')|" "$@.tmp"
-$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command) -$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command)
-mv "$@.tmp" "$@" -mv "$@.tmp" "$@"
@@ -138,10 +138,10 @@ $(srcdir)/%D%/guix-cookbook.%.texi: po/doc/guix-cookbook.%.po guix/build/po.go
$(srcdir)/%D%/contributing.%.texi: po/doc/guix-manual.%.po guix/build/po.go $(srcdir)/%D%/contributing.%.texi: po/doc/guix-manual.%.po guix/build/po.go
-$(AM_V_PO4A)$(PO4A) --no-update \ -$(AM_V_PO4A)$(PO4A) --no-update \
--variable localized="$@.tmp" \ --variable localized="$@.tmp" \
--variable master="$(srcdir)/%D%/contributing.texi" \ --variable master="%D%/contributing.texi" \
--variable po="$<" \ --variable po="$<" \
--variable pot=$(dummy_pot) \ --variable pot=$(dummy_pot) \
$(srcdir)/po/doc/po4a.cfg po/doc/po4a.cfg
-$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command) -$(AM_V_POXREF)LC_ALL=en_US.UTF-8 $(xref_command)
-mv "$@.tmp" "$@" -mv "$@.tmp" "$@"
+398 -1961
View File
File diff suppressed because it is too large Load Diff
+2 -9
View File
@@ -828,7 +828,6 @@ and the maven-build-system."
(make-regexp* "^gnu/packages/java(-.+|)\\.scm$") (make-regexp* "^gnu/packages/java(-.+|)\\.scm$")
;; Match maven.scm and maven-*.scm ;; Match maven.scm and maven-*.scm
(make-regexp* "^gnu/packages/maven(-.+|)\\.scm$") (make-regexp* "^gnu/packages/maven(-.+|)\\.scm$")
"gnu/packages/netbeans.scm"
"guix/build/ant-build-system.scm" "guix/build/ant-build-system.scm"
"guix/build/clojure-build-system.scm" "guix/build/clojure-build-system.scm"
"guix/build/clojure-utils.scm" "guix/build/clojure-utils.scm"
@@ -845,8 +844,7 @@ and the maven-build-system."
#:name "JavaScript team" #:name "JavaScript team"
#:description #:description
"JavaScript/Node.js packages, the node build system." "JavaScript/Node.js packages, the node build system."
#:scope (list "gnu/packages/javascript.scm" #:scope (list "gnu/packages/node-xyz.scm"
"gnu/packages/node-xyz.scm"
"gnu/packages/node.scm" "gnu/packages/node.scm"
"guix/build-system/node.scm" "guix/build-system/node.scm"
"guix/build/node-build-system.scm" "guix/build/node-build-system.scm"
@@ -1639,7 +1637,7 @@ the \"texlive\" importer."
(define-member (person "Thanos Apollo" (define-member (person "Thanos Apollo"
"public@thanosapollo.org" "public@thanosapollo.org"
"thanosapollo") "thanosapollo")
vcs emacs) vcs)
(define-member (person "Ashish SHUKLA" (define-member (person "Ashish SHUKLA"
"ashish.is@lostca.se" "ashish.is@lostca.se"
@@ -1661,11 +1659,6 @@ the \"texlive\" importer."
"tok") "tok")
electronics) electronics)
(define-member (person "gemmaro"
"gemmaro.dev@gmail.com"
"gemmaro")
ruby)
(define (find-team name) (define (find-team name)
(or (hash-ref %teams (string->symbol name)) (or (hash-ref %teams (string->symbol name))
+2 -4
View File
@@ -1226,12 +1226,10 @@ file name or an nfs-root containing ':/')."
(match spec (match spec
((? string?) ((? string?)
(if (string-match "^/dev/[a-zA-Z0-9]+$" spec) (if (string-prefix? "/dev/" spec)
;; Nothing to do, but wait until SPEC shows up. ;; Nothing to do, but wait until SPEC shows up.
(resolve device-exists? spec identity) (resolve device-exists? spec identity)
;; Do not resolve NFS / CIFS / tmpfs devices spec)) ; do not resolve NFS / CIFS / tmpfs devices
;; or bcachefs multi-device specifications.
spec))
((? file-system-label?) ((? file-system-label?)
;; Resolve the label. ;; Resolve the label.
(resolve find-partition-by-label (resolve find-partition-by-label
+3 -7
View File
@@ -445,14 +445,10 @@ load path must be adjusted as needed."
;; Behave like an init process: create a sub-process that calls ;; Behave like an init process: create a sub-process that calls
;; THUNK, and wait for child processes. Furthermore, forward ;; THUNK, and wait for child processes. Furthermore, forward
;; RELAYED-SIGNALS to the child process. ;; RELAYED-SIGNALS to the child process.
;; We presently use `safe-clone` here due to a bug in the interaction (match (primitive-fork)
;; between Guix and `primitive-fork` in Guile 3.0.11: (0
;; https://codeberg.org/guix/guix/issues/7690#issuecomment-12744123
(safe-clone
SIGCHLD
(lambda ()
(call-with-clean-exit thunk)) (call-with-clean-exit thunk))
(lambda (pid) (pid
(install-signal-handlers pid) (install-signal-handlers pid)
(let loop () (let loop ()
(match (wait-child-process) (match (wait-child-process)
+8 -36
View File
@@ -57,7 +57,7 @@
# Copyright © 2022 ( <paren@disroot.org> # Copyright © 2022 ( <paren@disroot.org>
# Copyright © 2022, 2026 jgart <jgart@dismail.de> # Copyright © 2022, 2026 jgart <jgart@dismail.de>
# Copyright © 2022-2023, 2025-2026 Denis 'GNUtoo' Carikli <GNUtoo@cyberdimension.org> # Copyright © 2022-2023, 2025-2026 Denis 'GNUtoo' Carikli <GNUtoo@cyberdimension.org>
# Copyright © 2023-2026 Zheng Junjie <z572@z572.online> # Copyright © 2023-2025 Zheng Junjie <z572@z572.online>
# Copyright © 2023 Ivana Drazovic <iv.dra@hotmail.com> # Copyright © 2023 Ivana Drazovic <iv.dra@hotmail.com>
# Copyright © 2023 Andy Tai <atai@atai.org> # Copyright © 2023 Andy Tai <atai@atai.org>
# Copyright © 2023 B. Wilson <elaexuotee@wilsonb.com> # Copyright © 2023 B. Wilson <elaexuotee@wilsonb.com>
@@ -502,7 +502,6 @@ GNU_SYSTEM_MODULES = \
%D%/packages/myrddin.scm \ %D%/packages/myrddin.scm \
%D%/packages/ncdu.scm \ %D%/packages/ncdu.scm \
%D%/packages/ncurses.scm \ %D%/packages/ncurses.scm \
%D%/packages/netbeans.scm \
%D%/packages/netpbm.scm \ %D%/packages/netpbm.scm \
%D%/packages/nettle.scm \ %D%/packages/nettle.scm \
%D%/packages/networking.scm \ %D%/packages/networking.scm \
@@ -1094,7 +1093,6 @@ dist_patch_DATA = \
%D%/packages/patches/catdoc-CVE-2017-11110.patch \ %D%/packages/patches/catdoc-CVE-2017-11110.patch \
%D%/packages/patches/chez-irregex-import-cond-expand.patch \ %D%/packages/patches/chez-irregex-import-cond-expand.patch \
%D%/packages/patches/chez-scheme-bin-sh.patch \ %D%/packages/patches/chez-scheme-bin-sh.patch \
%D%/packages/patches/cianna-remove-error-for-missing-cuda.patch \
%D%/packages/patches/circos-remove-findbin.patch \ %D%/packages/patches/circos-remove-findbin.patch \
%D%/packages/patches/cdparanoia-fpic.patch \ %D%/packages/patches/cdparanoia-fpic.patch \
%D%/packages/patches/cdrkit-libre-cross-compile.patch \ %D%/packages/patches/cdrkit-libre-cross-compile.patch \
@@ -1180,7 +1178,6 @@ dist_patch_DATA = \
%D%/packages/patches/curlftpfs-fix-no_verify_hostname.patch \ %D%/packages/patches/curlftpfs-fix-no_verify_hostname.patch \
%D%/packages/patches/cursynth-wave-rand.patch \ %D%/packages/patches/cursynth-wave-rand.patch \
%D%/packages/patches/cvc5-reproducible-build.patch \ %D%/packages/patches/cvc5-reproducible-build.patch \
%D%/packages/patches/cvc5-symfpu-compatibility.patch \
%D%/packages/patches/cvs-CVE-2017-12836.patch \ %D%/packages/patches/cvs-CVE-2017-12836.patch \
%D%/packages/patches/cyrus-sasl-fix-time-h.patch \ %D%/packages/patches/cyrus-sasl-fix-time-h.patch \
%D%/packages/patches/d-feet-drop-unused-meson-argument.patch \ %D%/packages/patches/d-feet-drop-unused-meson-argument.patch \
@@ -1243,7 +1240,7 @@ dist_patch_DATA = \
%D%/packages/patches/python-treelib-remove-python2-compat.patch \ %D%/packages/patches/python-treelib-remove-python2-compat.patch \
%D%/packages/patches/elm-offline-package-registry.patch \ %D%/packages/patches/elm-offline-package-registry.patch \
%D%/packages/patches/elm-reactor-static-files.patch \ %D%/packages/patches/elm-reactor-static-files.patch \
%D%/packages/patches/emacs-agent-shell-fix-tests.patch \ %D%/packages/patches/emacs-buttercup-1.38-native-comp-spy-on-trampoline-scope.patch \
%D%/packages/patches/emacs-deferred-fix-number-of-arguments.patch \ %D%/packages/patches/emacs-deferred-fix-number-of-arguments.patch \
%D%/packages/patches/emacs-disable-jit-compilation.patch \ %D%/packages/patches/emacs-disable-jit-compilation.patch \
%D%/packages/patches/emacs-doc-toc-shell-commands.patch \ %D%/packages/patches/emacs-doc-toc-shell-commands.patch \
@@ -1588,11 +1585,8 @@ dist_patch_DATA = \
%D%/packages/patches/gtk2-theme-paths.patch \ %D%/packages/patches/gtk2-theme-paths.patch \
%D%/packages/patches/gtk3-respect-GUIX_GTK3_PATH.patch \ %D%/packages/patches/gtk3-respect-GUIX_GTK3_PATH.patch \
%D%/packages/patches/gtk3-respect-GUIX_GTK3_IM_MODULE_FILE.patch \ %D%/packages/patches/gtk3-respect-GUIX_GTK3_IM_MODULE_FILE.patch \
%D%/packages/patches/gtk3-treeview-test-fix.patch \
%D%/packages/patches/gtk-doc-respect-xml-catalog.patch \ %D%/packages/patches/gtk-doc-respect-xml-catalog.patch \
%D%/packages/patches/gtk-doc-mkhtml-test-fix.patch \ %D%/packages/patches/gtk-doc-mkhtml-test-fix.patch \
%D%/packages/patches/gtk4-demo-reproducible.patch \
%D%/packages/patches/gtk4-needs-udmabuf.patch \
%D%/packages/patches/gtk4-respect-GUIX_GTK4_PATH.patch \ %D%/packages/patches/gtk4-respect-GUIX_GTK4_PATH.patch \
%D%/packages/patches/gtkglext-disable-disable-deprecated.patch \ %D%/packages/patches/gtkglext-disable-disable-deprecated.patch \
%D%/packages/patches/gtksourceview-2-add-default-directory.patch \ %D%/packages/patches/gtksourceview-2-add-default-directory.patch \
@@ -1681,7 +1675,6 @@ dist_patch_DATA = \
%D%/packages/patches/java-commons-collections-fix-java8.patch \ %D%/packages/patches/java-commons-collections-fix-java8.patch \
%D%/packages/patches/java-guava-remove-annotation-deps.patch \ %D%/packages/patches/java-guava-remove-annotation-deps.patch \
%D%/packages/patches/java-jeromq-fix-tests.patch \ %D%/packages/patches/java-jeromq-fix-tests.patch \
%D%/packages/patches/java-jtidy-remove-xerces-dependency.patch \
%D%/packages/patches/java-openjfx-build-jdk_version.patch \ %D%/packages/patches/java-openjfx-build-jdk_version.patch \
%D%/packages/patches/java-powermock-fix-java-files.patch \ %D%/packages/patches/java-powermock-fix-java-files.patch \
%D%/packages/patches/java-simple-xml-fix-tests.patch \ %D%/packages/patches/java-simple-xml-fix-tests.patch \
@@ -1690,8 +1683,6 @@ dist_patch_DATA = \
%D%/packages/patches/java-xerces-build_dont_unzip.patch \ %D%/packages/patches/java-xerces-build_dont_unzip.patch \
%D%/packages/patches/java-xerces-xjavac_taskdef.patch \ %D%/packages/patches/java-xerces-xjavac_taskdef.patch \
%D%/packages/patches/jbr-17-xcursor-no-dynamic.patch \ %D%/packages/patches/jbr-17-xcursor-no-dynamic.patch \
%D%/packages/patches/jbr-25-wayland-drag-icon.patch \
%D%/packages/patches/jbr-25-wayland-intra-jvm-dnd.patch \
%D%/packages/patches/jdk-currency-time-bomb.patch \ %D%/packages/patches/jdk-currency-time-bomb.patch \
%D%/packages/patches/jdk-currency-time-bomb2.patch \ %D%/packages/patches/jdk-currency-time-bomb2.patch \
%D%/packages/patches/jfsutils-add-sysmacros.patch \ %D%/packages/patches/jfsutils-add-sysmacros.patch \
@@ -1722,6 +1713,7 @@ dist_patch_DATA = \
%D%/packages/patches/libretro-dolphin-emu-libusb-assert.patch \ %D%/packages/patches/libretro-dolphin-emu-libusb-assert.patch \
%D%/packages/patches/libretro-dolphin-emu-vulkan-headers.patch \ %D%/packages/patches/libretro-dolphin-emu-vulkan-headers.patch \
%D%/packages/patches/libretranslate-use-flasgger.patch \ %D%/packages/patches/libretranslate-use-flasgger.patch \
%D%/packages/patches/librewolf-150.0-encoding_rs-rust-fix.patch \
%D%/packages/patches/librewolf-add-store-to-rdd-allowlist.patch \ %D%/packages/patches/librewolf-add-store-to-rdd-allowlist.patch \
%D%/packages/patches/librewolf-compare-paths.patch \ %D%/packages/patches/librewolf-compare-paths.patch \
%D%/packages/patches/librewolf-neuter-locale-download.patch \ %D%/packages/patches/librewolf-neuter-locale-download.patch \
@@ -1916,7 +1908,6 @@ dist_patch_DATA = \
%D%/packages/patches/mcrypt-CVE-2012-4527.patch \ %D%/packages/patches/mcrypt-CVE-2012-4527.patch \
%D%/packages/patches/mono-msbuild-15.7.179-fix-build.patch \ %D%/packages/patches/mono-msbuild-15.7.179-fix-build.patch \
%D%/packages/patches/mono-msbuild-15.7.179-fix-resources.patch \ %D%/packages/patches/mono-msbuild-15.7.179-fix-resources.patch \
%D%/packages/patches/mozjs-xp-win.patch \
%D%/packages/patches/libmemcached-build-with-gcc7.patch \ %D%/packages/patches/libmemcached-build-with-gcc7.patch \
%D%/packages/patches/libmhash-hmac-fix-uaf.patch \ %D%/packages/patches/libmhash-hmac-fix-uaf.patch \
%D%/packages/patches/libmodbus-disable-networking-test.patch \ %D%/packages/patches/libmodbus-disable-networking-test.patch \
@@ -1929,8 +1920,6 @@ dist_patch_DATA = \
%D%/packages/patches/mediasdk-gcc-14.patch \ %D%/packages/patches/mediasdk-gcc-14.patch \
%D%/packages/patches/memtest86+-build-reproducibly.patch \ %D%/packages/patches/memtest86+-build-reproducibly.patch \
%D%/packages/patches/mercurial-hg-extension-path.patch \ %D%/packages/patches/mercurial-hg-extension-path.patch \
%D%/packages/patches/meson-keep-rpath-vicinity.patch \
%D%/packages/patches/meson-gir-fallback-path.patch \
%D%/packages/patches/mhash-keygen-test-segfault.patch \ %D%/packages/patches/mhash-keygen-test-segfault.patch \
%D%/packages/patches/mia-fix-boost-headers.patch \ %D%/packages/patches/mia-fix-boost-headers.patch \
%D%/packages/patches/mia-gcc11.patch \ %D%/packages/patches/mia-gcc11.patch \
@@ -1986,11 +1975,6 @@ dist_patch_DATA = \
%D%/packages/patches/netcdf-date-time.patch \ %D%/packages/patches/netcdf-date-time.patch \
%D%/packages/patches/netdde-build-fix.patch \ %D%/packages/patches/netdde-build-fix.patch \
%D%/packages/patches/netdde-csum.patch \ %D%/packages/patches/netdde-csum.patch \
%D%/packages/patches/java-apache-xml-commons-resolver-1.2-netbeans.patch \
%D%/packages/patches/java-simplevalidation-1.14.1.patch \
%D%/packages/patches/netbeans-25-nativeexecution-paths.patch \
%D%/packages/patches/netbeans-25-terminal-no-login-shell.patch \
%D%/packages/patches/netbeans-25-source-only-build.patch \
%D%/packages/patches/netpbm-CVE-2017-2586.patch \ %D%/packages/patches/netpbm-CVE-2017-2586.patch \
%D%/packages/patches/netpbm-CVE-2017-2587.patch \ %D%/packages/patches/netpbm-CVE-2017-2587.patch \
%D%/packages/patches/netsurf-message-timestamp.patch \ %D%/packages/patches/netsurf-message-timestamp.patch \
@@ -2085,7 +2069,6 @@ dist_patch_DATA = \
%D%/packages/patches/open-zwave-hidapi.patch \ %D%/packages/patches/open-zwave-hidapi.patch \
%D%/packages/patches/opusfile-CVE-2022-47021.patch \ %D%/packages/patches/opusfile-CVE-2022-47021.patch \
%D%/packages/patches/orbit2-fix-array-allocation-32bit.patch \ %D%/packages/patches/orbit2-fix-array-allocation-32bit.patch \
%D%/packages/patches/orca-fix-gst-init-check-call.patch \
%D%/packages/patches/orpheus-cast-errors-and-includes.patch \ %D%/packages/patches/orpheus-cast-errors-and-includes.patch \
%D%/packages/patches/ots-no-include-missing-file.patch \ %D%/packages/patches/ots-no-include-missing-file.patch \
%D%/packages/patches/owncloud-disable-updatecheck.patch \ %D%/packages/patches/owncloud-disable-updatecheck.patch \
@@ -2188,8 +2171,6 @@ dist_patch_DATA = \
%D%/packages/patches/perl-www-curl-remove-symbol.patch \ %D%/packages/patches/perl-www-curl-remove-symbol.patch \
%D%/packages/patches/perl-xml-libxml-fix-function-prototypes.patch \ %D%/packages/patches/perl-xml-libxml-fix-function-prototypes.patch \
%D%/packages/patches/phoronix-test-suite-fsdg.patch \ %D%/packages/patches/phoronix-test-suite-fsdg.patch \
%D%/packages/patches/php-01-fix-expired-certificate.patch \
%D%/packages/patches/php-02-fix-sni-tests.patch \
%D%/packages/patches/picprog-non-intel-support.patch \ %D%/packages/patches/picprog-non-intel-support.patch \
%D%/packages/patches/pidgin-add-search-path.patch \ %D%/packages/patches/pidgin-add-search-path.patch \
%D%/packages/patches/pinball-system-ltdl.patch \ %D%/packages/patches/pinball-system-ltdl.patch \
@@ -2293,6 +2274,8 @@ dist_patch_DATA = \
%D%/packages/patches/qtbase-5-use-TZDIR.patch \ %D%/packages/patches/qtbase-5-use-TZDIR.patch \
%D%/packages/patches/qtscript-disable-tests.patch \ %D%/packages/patches/qtscript-disable-tests.patch \
%D%/packages/patches/quagga-reproducible-build.patch \ %D%/packages/patches/quagga-reproducible-build.patch \
%D%/packages/patches/quickjs-ng-64-bits-precision-on-i686.patch \
%D%/packages/patches/quickjs-ng-fix-atomics.pause-on-32-bit.patch \
%D%/packages/patches/quilt-grep-compat.patch \ %D%/packages/patches/quilt-grep-compat.patch \
%D%/packages/patches/qmk-firmware-fix-hacker-dvorak.patch \ %D%/packages/patches/qmk-firmware-fix-hacker-dvorak.patch \
%D%/packages/patches/qtwayland-update-wayland-xml.patch \ %D%/packages/patches/qtwayland-update-wayland-xml.patch \
@@ -2366,16 +2349,8 @@ dist_patch_DATA = \
%D%/packages/patches/renpy-fix-integer-slots.patch \ %D%/packages/patches/renpy-fix-integer-slots.patch \
%D%/packages/patches/reposurgeon-add-missing-docbook-files.patch \ %D%/packages/patches/reposurgeon-add-missing-docbook-files.patch \
%D%/packages/patches/rdkit-unbundle-external-dependencies.patch \ %D%/packages/patches/rdkit-unbundle-external-dependencies.patch \
%D%/packages/patches/r-biostrings-r4.6.0-compat.patch \
%D%/packages/patches/r-h5mread-0001-h5mread-1.3.2-Get-rid-of-non-API-calls-to-R.patch \
%D%/packages/patches/r-httpuv-1.6.6-unvendor-libuv.patch \ %D%/packages/patches/r-httpuv-1.6.6-unvendor-libuv.patch \
%D%/packages/patches/r-mscoreutils-0001-fix-non-API-call-to-R-SETLENGTH-by-using-lengthgets.patch \
%D%/packages/patches/r-rsamtools-r-4.6.0-compat.patch \
%D%/packages/patches/r-snpstats-0001-fixed-non-API-except-for-IS_S4_OBJECT.patch \
%D%/packages/patches/r-snpstats-0002-fixed-IS_S4_OBJECT.patch \
%D%/packages/patches/r-sapa-lapack.patch \ %D%/packages/patches/r-sapa-lapack.patch \
%D%/packages/patches/r-shortread-0001-ShortRead-1.69.3-Get-rid-of-non-API-calls-to-R.patch \
%D%/packages/patches/r-sparsearray-r-4.6.0-compat.patch \
%D%/packages/patches/ripperx-missing-file.patch \ %D%/packages/patches/ripperx-missing-file.patch \
%D%/packages/patches/rpcbind-CVE-2017-8779.patch \ %D%/packages/patches/rpcbind-CVE-2017-8779.patch \
%D%/packages/patches/rtosc-0.3.1-fix-invalid-comparison-operator.patch \ %D%/packages/patches/rtosc-0.3.1-fix-invalid-comparison-operator.patch \
@@ -2425,9 +2400,6 @@ dist_patch_DATA = \
%D%/packages/patches/rust-codex-0.120.0-connectors-cache-test-race.patch \ %D%/packages/patches/rust-codex-0.120.0-connectors-cache-test-race.patch \
%D%/packages/patches/rust-codex-0.120.0-remove-libwebrtc.patch \ %D%/packages/patches/rust-codex-0.120.0-remove-libwebrtc.patch \
%D%/packages/patches/rust-codex-0.120.0-test-timeout.patch \ %D%/packages/patches/rust-codex-0.120.0-test-timeout.patch \
%D%/packages/patches/rust-codex-0.124.0-code-mode-stub-toolname.patch \
%D%/packages/patches/rust-codex-0.124.0-remove-patch-sections.patch \
%D%/packages/patches/rust-librocksdb-sys-unbundled-sources.patch \
%D%/packages/patches/rust-ring-0.17-ring-core.patch \ %D%/packages/patches/rust-ring-0.17-ring-core.patch \
%D%/packages/patches/rw-igraph-0.10.patch \ %D%/packages/patches/rw-igraph-0.10.patch \
%D%/packages/patches/rxvt-unicode-fix-cursor-position.patch \ %D%/packages/patches/rxvt-unicode-fix-cursor-position.patch \
@@ -2623,9 +2595,9 @@ dist_patch_DATA = \
%D%/packages/patches/wcstools-extend-makefiles.patch \ %D%/packages/patches/wcstools-extend-makefiles.patch \
%D%/packages/patches/wdl-link-libs-and-fix-jnetlib.patch \ %D%/packages/patches/wdl-link-libs-and-fix-jnetlib.patch \
%D%/packages/patches/webkitgtk-adjust-bubblewrap-paths.patch \ %D%/packages/patches/webkitgtk-adjust-bubblewrap-paths.patch \
%D%/packages/patches/webrtc-audio-processing-abseil-cpp.patch \
%D%/packages/patches/webrtc-audio-processing-big-endian.patch \ %D%/packages/patches/webrtc-audio-processing-big-endian.patch \
%D%/packages/patches/webrtc-audio-processing-gcc-14.patch \ %D%/packages/patches/webrtc-audio-processing-byte-order-pointer-size.patch \
%D%/packages/patches/webrtc-audio-processing-x86-no-sse.patch \
%D%/packages/patches/websocketpp-fix-for-cmake-3.15.patch \ %D%/packages/patches/websocketpp-fix-for-cmake-3.15.patch \
%D%/packages/patches/wmctrl-64-fix.patch \ %D%/packages/patches/wmctrl-64-fix.patch \
%D%/packages/patches/wmfire-dont-inline-draw-fire.patch \ %D%/packages/patches/wmfire-dont-inline-draw-fire.patch \
+4 -10
View File
@@ -202,7 +202,7 @@ Have you run 'guix archive --generate-key'?")
(build-locally? hetzner-configuration-build-locally? ; boolean (build-locally? hetzner-configuration-build-locally? ; boolean
(default #t)) (default #t))
(delete? hetzner-configuration-delete? ; boolean (delete? hetzner-configuration-delete? ; boolean
(default #t)) (default #f))
(labels hetzner-configuration-labels ; list of strings (labels hetzner-configuration-labels ; list of strings
(default '())) (default '()))
(location hetzner-configuration-location ; #f | string (location hetzner-configuration-location ; #f | string
@@ -395,7 +395,9 @@ Available locations:~%~%~a~%~%For more details, see: ~a")
(type ,root-fs-type)) (type ,root-fs-type))
%base-file-systems)))) %base-file-systems))))
(services (services
(cons* (service dhcpcd-service-type) ;; guix 1.4.0 does not have dhcpcd-service-type,
;; so we use dhcp-client-service-type here.
(cons* (service dhcp-client-service-type)
(service openssh-service-type (service openssh-service-type
(openssh-configuration (openssh-configuration
(openssh openssh-sans-x) (openssh openssh-sans-x)
@@ -590,14 +592,6 @@ mkdir -p /gnu/store
mount --bind /mnt/tmp/gnu/store /gnu/store mount --bind /mnt/tmp/gnu/store /gnu/store
wget -O /tmp/guix-install.sh https://guix.gnu.org/guix-install.sh wget -O /tmp/guix-install.sh https://guix.gnu.org/guix-install.sh
# Modify the install script to point the systemd unit of the /gnu/store
# mountpoint to the same /mnt/tmp/gnu/store which was introduced above.
store_fix=\"sed -i 's#Where=/gnu/store#Where=/mnt/tmp/gnu/store#'
~~root/.config/guix/current/lib/systemd/system/gnu-store.mount\"
sed -i \"s@install_unit gnu-store.mount\"\\
\"@$(printf \"%q \" $store_fix)\\ninstall_unit gnu-store.mount@\" /tmp/guix-install.sh
chmod +x /tmp/guix-install.sh chmod +x /tmp/guix-install.sh
set +o pipefail # avoid hangup on 'yes' killing this script set +o pipefail # avoid hangup on 'yes' killing this script
yes '' | /tmp/guix-install.sh yes '' | /tmp/guix-install.sh
+1 -1
View File
@@ -185,7 +185,7 @@ terminals.")
(native-inputs (native-inputs
(append (append
(list clisp (list clisp
python-cython-0 ;; See https://bugzilla.redhat.com/show_bug.cgi?id=2231865 python-cython
doxygen doxygen
gettext-minimal) gettext-minimal)
;; icedtea doesn't build reliably on all architectures. ;; icedtea doesn't build reliably on all architectures.
+49 -58
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012-2026 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2012-2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com> ;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2014, 2015, 2016, 2018, 2019, 2020 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2015, 2016, 2018, 2019, 2020 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2014, 2015-2018, 2020-2023 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2014, 2015-2018, 2020-2023 Eric Bavier <bavier@posteo.net>
@@ -1158,7 +1158,7 @@ on memory usage on GNU/Linux systems.")
(define-public htop (define-public htop
(package (package
(name "htop") (name "htop")
(version "3.5.1") (version "3.5.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -1166,7 +1166,7 @@ on memory usage on GNU/Linux systems.")
(url "https://github.com/htop-dev/htop") (url "https://github.com/htop-dev/htop")
(commit version))) (commit version)))
(sha256 (sha256
(base32 "187gyj081n6qsidll5wdri3jkr4m2i4m461z3xv03y342f5yj3lv")) (base32 "1r07ri0dl9xz0jn1hc2g8q3l0q4clvnxs05yagpzsz0zigp4flj5"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
@@ -3751,68 +3751,59 @@ summarizes network bandwidth by process and remote host.")
(define-public munge (define-public munge
(package (package
(name "munge") (name "munge")
(version "0.5.18") (version "0.5.14")
(source (origin (source (origin
(method git-fetch) (method url-fetch)
(uri (git-reference (uri (string-append "https://github.com/dun/munge/releases/"
(url "https://github.com/dun/munge") "download/munge-" version "/munge-"
(commit (string-append "munge-" version)))) version ".tar.xz"))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1b7gm680dlvmgvj9vxy7n0cqmnv1rl9n4563vasxdxx54f78j30s")) "0h06sghb4rqvv1ywyd6mzsmbcgh712v6ygrff0gzm440y4ca41k6"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; Don't insist on write access to /var. '(begin
#~(substitute* "src/etc/Makefile.am" ;; Don't insist on write access to /var.
(("\\$\\(MKDIR_P\\) .*(local|run)statedir.*" all) (substitute* "src/etc/Makefile.in"
(string-append ": " all)))))) (("\\$\\(INSTALL\\)(.*)localstatedir" _ middle)
(string-append "-$(INSTALL)" middle "localstatedir"))
(("\\$\\(MKDIR_P\\) .*(local|run)statedir.*")
""))
#t))))
(inputs (inputs
(list openssl libgcrypt)) (list openssl libgcrypt))
(native-inputs
(list autoconf
automake
libtool
procps)) ;for tests
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list #:configure-flags `(#:configure-flags
#~(list "--localstatedir=/var" (list "--localstatedir=/var"
"--disable-static" (string-append "--with-pkgconfigdir="
#$@(if (%current-target-system) (assoc-ref %outputs "out") "/lib/pkgconfig")
;; Assume yes on pipes when cross compiling. (string-append "--with-libgcrypt-prefix="
`("ac_cv_file__dev_spx=yes" (assoc-ref %build-inputs "libgcrypt"))
"x_ac_cv_check_fifo_recvfd=yes") ,@(if (%current-target-system)
'()) ;; Assume yes on pipes when cross compiling.
`("ac_cv_file__dev_spx=yes"
;; The '.pc' file is not installed when omitting this flag. "x_ac_cv_check_fifo_recvfd=yes")
(string-append "--with-pkgconfigdir=" '()))
#$output "/lib/pkgconfig")) #:phases
#:phases (modify-phases %standard-phases
#~(modify-phases %standard-phases ;; XXX Many test series fail. Some might be fixable, others do no-no
(add-before 'bootstrap 'pre-bootstrap ;; things like invoking sudo.
(lambda _ (add-after 'unpack 'skip-failing-tests
(for-each patch-shebang (find-files "build-aux")))) (lambda _
(add-after 'unpack 'skip-failing-tests (for-each (lambda (test)
(lambda _ (substitute* "t/Makefile.in"
;; Pass '--force' to 'munged'; without it, it fails with "Socket (((string-append test "\\.t ")) "")))
;; is inaccessible" due to the build directory not being (list "0100-munged-lock"
;; world-readable. "0010-basic"
(substitute* "tests/sharness.d/03-munged.sh" "0011-munged-cmdline"
(("--group-update-time=-1" all) "0012-munge-cmdline"
(string-append all " --force"))) "0013-unmunge-cmdline"
"0101-munged-security-socket"
;; The tests below invoke 'sudo' or have special expectations "0102-munged-security-keyfile"
;; about network interfaces. "0103-munged-security-logfile"
(for-each (lambda (test) "0110-munged-origin-addr"))
(substitute* "tests/Makefile.am" #t)))))
(((string-append test "\\.t "))
"")))
(list "0100-munged-lock"
"0101-munged-security-socket"
"0102-munged-security-keyfile"
"0103-munged-security-logfile"
"0110-munged-origin-addr")))))))
(home-page "https://dun.github.io/munge/") (home-page "https://dun.github.io/munge/")
(synopsis "Cluster computing authentication service") (synopsis "Cluster computing authentication service")
(description (description
@@ -7052,7 +7043,7 @@ network, which causes enabled computers to power on.")
(define-public witr (define-public witr
(package (package
(name "witr") (name "witr")
(version "0.3.1") (version "0.1.7")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -7061,7 +7052,7 @@ network, which causes enabled computers to power on.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "03v9n4mdvqm0knqjl4s64321i5clqpmlrlkkdb87glzb9p28sg00")))) (base32 "18xx01lxd5j019gy9jmpms3awv4snlr028w01bfkyfid6hlwxbq2"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
(list (list
+1 -1
View File
@@ -458,7 +458,7 @@ precision.")
(inputs (inputs
;; TODO: Unbundle "libmicropython.a". ;; TODO: Unbundle "libmicropython.a".
(list ao (list ao
fltk fltk-1.3
glpk glpk
gmp gmp
gsl gsl
+6 -6
View File
@@ -238,12 +238,12 @@ contains the graphical user interface for synfig.")
(when tests? (when tests?
(invoke "./tests"))))))) (invoke "./tests")))))))
(native-inputs (native-inputs
(cons* gettext-minimal (list gettext-minimal
`(,glib "bin") `(,glib "bin")
perl nasm
pkg-config perl
python-wrapper pkg-config
(maybe-nasm))) python-wrapper))
(inputs (inputs
(list cairo (list cairo
curl curl
+1 -12
View File
@@ -2,7 +2,7 @@
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2013, 2015 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2016, 2020, 2021, 2025, 2026 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2020, 2021, 2025 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 20172022 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 20172022 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Guy Fleury Iteriteka <hoonandon@gmail.com> ;;; Copyright © 2019 Guy Fleury Iteriteka <hoonandon@gmail.com>
;;; Copyright © 2019, 2022, 2024 Andy Tai <atai@atai.org> ;;; Copyright © 2019, 2022, 2024 Andy Tai <atai@atai.org>
@@ -43,7 +43,6 @@
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix utils)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages admin) #:use-module (gnu packages admin)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
@@ -249,16 +248,6 @@ complex. It supports all currently known x86 architectural extensions, and
has strong support for macros.") has strong support for macros.")
(license license:bsd-2))) (license license:bsd-2)))
(define* (maybe-nasm #:optional
(system (or (%current-target-system)
(%current-system))))
;; For some packages nasm is only needed when compiling to/for x86/x86_64.
(if (target-x86? system)
(list nasm)
'()))
(export maybe-nasm)
(define-public yasm (define-public yasm
(package (package
(name "yasm") (name "yasm")
+306 -1049
View File
File diff suppressed because it is too large Load Diff
+28 -121
View File
@@ -11,7 +11,7 @@
;;; Copyright © 20162023 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 20162023 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018, 2020, 2024 Oleg Pykhalov <go.wigust@gmail.com> ;;; Copyright © 2018, 2020, 2024 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2018 okapi <okapi@firemail.cc> ;;; Copyright © 2018 okapi <okapi@firemail.cc>
;;; Copyright © 2018, 2020, 2022-2026 Maxim Cournoyer <maxim@guixotic.coop> ;;; Copyright © 2018, 2020, 2022-2025 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2018 Brett Gilio <brettg@gnu.org> ;;; Copyright © 2018 Brett Gilio <brettg@gnu.org>
;;; Copyright © 2018, 2019, 2022 Marius Bakke <marius@gnu.org> ;;; Copyright © 2018, 2019, 2022 Marius Bakke <marius@gnu.org>
@@ -51,7 +51,7 @@
;;; Copyright © 2024 Nikita Domnitskii <nikita@domnitskii.me> ;;; Copyright © 2024 Nikita Domnitskii <nikita@domnitskii.me>
;;; Copyright © 2024 Roman Scherer <roman@burningswell.com> ;;; Copyright © 2024 Roman Scherer <roman@burningswell.com>
;;; Copyright © 2024 Sughosha <sughosha@disroot.org> ;;; Copyright © 2024 Sughosha <sughosha@disroot.org>
;;; Copyright © 2025, 2026 Junker <dk@junkeria.club> ;;; Copyright © 2025 Junker <dk@junkeria.club>
;;; Copyright © 2025 Sughosha <sughosha@disroot.org> ;;; Copyright © 2025 Sughosha <sughosha@disroot.org>
;;; Copyright © 2025 Andrew Wong <wongandj@icloud.com> ;;; Copyright © 2025 Andrew Wong <wongandj@icloud.com>
;;; Copyright © 2025 Kjartan Oli Agustsson <kjartanoli@outlook.com> ;;; Copyright © 2025 Kjartan Oli Agustsson <kjartanoli@outlook.com>
@@ -127,7 +127,6 @@
#:use-module (gnu packages linphone) #:use-module (gnu packages linphone)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages llvm) #:use-module (gnu packages llvm)
#:use-module (gnu packages logging)
#:use-module (gnu packages machine-learning) #:use-module (gnu packages machine-learning)
#:use-module (gnu packages man) #:use-module (gnu packages man)
#:use-module (gnu packages maths) #:use-module (gnu packages maths)
@@ -195,45 +194,6 @@
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)
#:use-module (ice-9 match)) #:use-module (ice-9 match))
(define-public adplug
(package
(name "adplug")
(version "2.4")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/adplug/adplug")
(commit (string-append "adplug-" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0l31ya42g3q7ry2m0y5djgjb9ax8ciy8jn86252vdjkjswwqgscd"))))
(build-system cmake-build-system)
(arguments
(list #:configure-flags
#~(list "-DBUILD_SHARED_LIBS=ON")
#:modules
'((guix build cmake-build-system)
(guix build utils)
(srfi srfi-26)) ;for cute
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-headers
(lambda _
(for-each (cute install-file <>
(string-append #$output "/include/adplug"))
(find-files "../source/src" "\\.h$")))))))
(propagated-inputs
(list libbinio))
(home-page "https://adplug.github.io/")
(synopsis "AdLib sound player library")
(description
"AdPlug is a hardware independent AdLib sound player library, mainly
written in C++. AdPlug plays sound data, originally created for the AdLib
(OPL2/3) audio board, on top of an OPL2/3 emulator or by using the real
hardware. No OPL2/3 chips are required for playback.")
(license license:lgpl2.1+)))
(define-public opensles (define-public opensles
(package (package
(name "opensles") (name "opensles")
@@ -403,7 +363,7 @@ displays a histogram of the roundtrip time jitter.")
(define-public webrtc-audio-processing (define-public webrtc-audio-processing
(package (package
(name "webrtc-audio-processing") (name "webrtc-audio-processing")
(version "2.1") (version "1.3")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -411,14 +371,30 @@ displays a histogram of the roundtrip time jitter.")
(string-append "http://freedesktop.org/software/pulseaudio/" (string-append "http://freedesktop.org/software/pulseaudio/"
name "/" name "-" version ".tar.gz")) name "/" name "-" version ".tar.gz"))
(sha256 (sha256
(base32 "0lrjzhshwj1rkh4fxh7sq2dkkfimlyjs2ha7s3ribsh2dnc6ps1m")) (base32 "0xfvq5lxg612vfzk3zk6896zcb4cgrrb7fq76w9h40magz0jymcm"))))
(patches (search-patches "webrtc-audio-processing-abseil-cpp.patch"
"webrtc-audio-processing-gcc-14.patch"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list #:configure-flags (if (target-x86-32?) (list #:configure-flags (if (target-x86-32?)
#~(list "-Dc_args=-DPFFFT_SIMD_DISABLE") #~(list "-Dc_args=-DPFFFT_SIMD_DISABLE")
#~'()))) #~'())
#:phases
(if (or (target-x86-32?) (target-powerpc?))
#~(modify-phases %standard-phases
(add-after 'unpack 'apply-patches
(lambda _
(define (patch file)
(invoke "patch" "-p1" "--force" "-i" file))
;; https://gitlab.freedesktop.org/pulseaudio/webrtc-audio-processing/-/issues/5
;; TODO: Move to the 'patches' field of the origin on
;; the next rebuild.
(patch #$(local-file
(search-patch
"webrtc-audio-processing-byte-order-pointer-size.patch")))
(patch #$(local-file
(search-patch
"webrtc-audio-processing-x86-no-sse.patch"))))))
#~%standard-phases)))
(native-inputs (list pkg-config)) (native-inputs (list pkg-config))
(inputs (list abseil-cpp)) (inputs (list abseil-cpp))
(synopsis "WebRTC's Audio Processing Library") (synopsis "WebRTC's Audio Processing Library")
@@ -1234,7 +1210,7 @@ PulseAudio clients, featuring:
(define-public ardour (define-public ardour
(package (package
(name "ardour") (name "ardour")
(version "9.2") (version "9.1")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -1251,7 +1227,7 @@ PulseAudio clients, featuring:
namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \"\"; }"))))) namespace ARDOUR { const char* revision = \"" version "\" ; const char* date = \"\"; }")))))
(sha256 (sha256
(base32 (base32
"14s6cq3x7l7b682ah9k8cdr6plfirlgm882dc2nm51lxwl91zcfd")) "00bramm8dq0ihr376n7l9rg0mjzxmzw6lxvsbsdlrdsimfwsy16p"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system waf-build-system) (build-system waf-build-system)
(arguments (arguments
@@ -4489,33 +4465,6 @@ This includes device enumeration and initialization, file loading, and
streaming.") streaming.")
(license license:expat))) (license license:expat)))
(define-public wp-notifyd
(package
(name "wp-notifyd")
(version "1.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/LDAP/wp-notifyd")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1nkndz0li15maf0dc9x631p0dr8085wzz5358552wljv7chywrza"))))
(build-system meson-build-system)
(arguments
(list #:tests? #f)) ;there are no tests
(inputs (list libnotify
wireplumber-minimal
pipewire
spdlog))
(native-inputs (list pkg-config))
(home-page "https://github.com/LDAP/wp-notifyd")
(synopsis "Notification daemon for Wireplumber")
(description "@command{wp-notifyd} is a lightweight notification daemon for
@dfn{WirePlumber} (the session and policy manager for PipeWire).")
(license license:expat)))
(define-public pa-notify (define-public pa-notify
(package (package
(name "pa-notify") (name "pa-notify")
@@ -4920,42 +4869,6 @@ using Guix System.")
;; GNU Library (not Lesser) General Public License. ;; GNU Library (not Lesser) General Public License.
(license license:lgpl2.0+))) (license license:lgpl2.0+)))
(define-public hiir
(let ((commit "4a9a1e67fa6f8ce7688e1c0c8a2b017cecd206a3")
(revision "0"))
(package
(name "hiir")
(version (git-version "0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/LostRobotMusic/hiir")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1wzlg0di768mzcik6fij4pd6dnpmbw8q236h478c057d10qfp44g"))))
(build-system copy-build-system)
(arguments
(list
#:install-plan
#~`(("." "/include/hiir"))))
(home-page "https://github.com/LostRobotMusic/hiir")
(synopsis "Header-only version of Laurent de Soras's HIIR 1.40 library")
(description
"This package provides a header-only version of the
@uref{http://ldesoras.free.fr/prod.html#src_hiir, HIIR library by Laurent De
Soras}, updated to version 1.40. HIIR is a C++ library for changing the
sampling rate of a signal by a factor two, in both directions (upsampling and
downsampling), obtaining two signals with a π/2 phase difference (Hilbert
transform). It is made of a two-path polyphase IIR filter, implemented with
FPU, 3DNow!, SSE, SSE2, AVX, AVX-512 and NEON instruction sets.
This package contains the same as the original library, except with the
contents of one source file moved into a header file (and set as inline) to
make the library header-only, and with the test folder removed.")
(license license:wtfpl2))))
(define-public redumper (define-public redumper
(package (package
(name "redumper") (name "redumper")
@@ -7352,7 +7265,6 @@ as is the case with audio plugins.")
(find-files "bin"))))))))) (find-files "bin")))))))))
(inputs (inputs
(list alsa-lib (list alsa-lib
bash-minimal
ffmpeg ffmpeg
fluidsynth fluidsynth
file file
@@ -7410,8 +7322,8 @@ default and preferred audio driver but also supports native drivers like ALSA.")
;;; This package variant tracks the latest in-development 2.6 release. ;;; This package variant tracks the latest in-development 2.6 release.
(define-public carla-2.6 (define-public carla-2.6
(let ((commit "294a80145e39c0755ab9073d90fd8b9524fbfc84") (let ((commit "aa400535b31c67f4b6c1b28e6e20e4d4f82111a3")
(revision "1")) (revision "0"))
(package (package
(inherit carla) (inherit carla)
(name "carla") (name "carla")
@@ -7425,12 +7337,7 @@ default and preferred audio driver but also supports native drivers like ALSA.")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "053yfwf9l9vqvq95c354by6nm8ym0wgkv3fr1434x5w9n1344z0z")))) (base32 "0cnj2sgr60f5h6wdfmihc214wf3n74686sipl3iyzmylqrcyhbjn")))))))
(inputs
(modify-inputs (package-inputs carla)
(replace "python-pyqt" python-pyqt-6)
(replace "qtbase" qtbase)
(replace "qtwayland" qtwayland))))))
;; This source is a fork of vst3sdk with the documentation and VSTGUI ;; This source is a fork of vst3sdk with the documentation and VSTGUI
;; submodules removed and a dummy `meson.build` file that just lists all ;; submodules removed and a dummy `meson.build` file that just lists all
File diff suppressed because it is too large Load Diff
File diff suppressed because it is too large Load Diff
+43
View File
@@ -37,6 +37,8 @@
#:use-module (gnu packages elf) #:use-module (gnu packages elf)
#:use-module (gnu packages ncurses) #:use-module (gnu packages ncurses)
#:use-module (gnu packages readline) #:use-module (gnu packages readline)
#:use-module (gnu packages ruby-check)
#:use-module (gnu packages ruby-xyz)
#:use-module (gnu packages bison) #:use-module (gnu packages bison)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages libffi) #:use-module (gnu packages libffi)
@@ -53,6 +55,7 @@
#:use-module (guix store) #:use-module (guix store)
#:use-module (guix build-system copy) #:use-module (guix build-system copy)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system ruby)
#:use-module (guix build-system trivial) #:use-module (guix build-system trivial)
#:autoload (guix gnupg) (gnupg-verify*) #:autoload (guix gnupg) (gnupg-verify*)
#:autoload (guix base32) (bytevector->nix-base32-string) #:autoload (guix base32) (bytevector->nix-base32-string)
@@ -513,6 +516,46 @@ function interface (FFI) directly in your shell. In other words, it allows
you to call routines in shared libraries from within Bash.") you to call routines in shared libraries from within Bash.")
(license license:expat))) (license license:expat)))
(define-public bashly
(package
(name "bashly")
(version "1.3.5")
(source
(origin
(method url-fetch)
(uri (rubygems-uri "bashly" version))
(sha256
(base32 "17msjzca5ifx8biimdjps655w51yc82d5ys9hwn749bi2f3n8mcz"))))
(build-system ruby-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "rspec" "-c" "spec")))))))
(native-inputs (list ruby-rspec))
(propagated-inputs (list ruby-colsole
ruby-completely
ruby-filewatcher
ruby-gtx
ruby-logger
ruby-lp
ruby-mister-bin
ruby-ostruct
ruby-requires
ruby-tty-markdown))
(synopsis
"Create feature-rich Bash scrips using simple YAML configuration")
(description
"Bashly is a CLI for generating feature-rich Bash command line
tools. Bashly lets you focus on your specific code, without worrying about
command line argument parsing, usage texts, error messages and other functions
that are usually handled by a framework in other programming languages.")
(home-page "https://bashly.dev/")
(license license:expat)))
(define-public blesh (define-public blesh
(package (package
(name "blesh") (name "blesh")
+9 -10
View File
@@ -14,7 +14,6 @@
;;; Copyright © 2022 Tomasz Jeneralczyk <tj@schwi.pl> ;;; Copyright © 2022 Tomasz Jeneralczyk <tj@schwi.pl>
;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr> ;;; Copyright © 2024 Nicolas Graves <ngraves@ngraves.fr>
;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com> ;;; Copyright © 2025 Artyom V. Poptsov <poptsov.artyom@gmail.com>
;;; Copyright © 2026 Sughosha <sughosha@disroot.org>
;;; Copyright © 2023 Advanced Micro Devices, Inc. ;;; Copyright © 2023 Advanced Micro Devices, Inc.
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
@@ -42,7 +41,6 @@
#:use-module (guix amd-gpu) #:use-module (guix amd-gpu)
#:use-module (guix search-paths) #:use-module (guix search-paths)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system qt)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (guix build-system pyproject) #:use-module (guix build-system pyproject)
@@ -732,7 +730,7 @@ and options. With careful benchmarking, different hardware can be compared.")
(define-public kdiskmark (define-public kdiskmark
(package (package
(name "kdiskmark") (name "kdiskmark")
(version "3.2.0") (version "3.1.4")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -741,13 +739,14 @@ and options. With careful benchmarking, different hardware can be compared.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"161yyy4fcy5bnzhbcd7p90nlcslcsfp7n3m3bz9bygch7bdjw46g")))) "1x8vd6swmf0i7f6m6wl2154n6plx8jkmcqfq6zxbdy255f1da74c"))))
(build-system qt-build-system) (build-system cmake-build-system)
(arguments (arguments
(list (list
#:qtbase qtbase
#:configure-flags #:configure-flags
#~(list (string-append "-DPOLKITQT-1_INSTALL_DIR=" #$output)) ;; Drop runtime dependency on KDE's KFAuth.
#~(list "-DPERFORM_PAGECACHE_CLEARING_USING_KF5AUTH=no"
(string-append "-DPOLKITQT-1_INSTALL_DIR=" #$output))
#:tests? #f ;no test suite #:tests? #f ;no test suite
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
@@ -760,10 +759,10 @@ and options. With careful benchmarking, different hardware can be compared.")
(lambda _ (lambda _
(rmdir "src/singleapplication") (rmdir "src/singleapplication")
(symlink #$(package-source (symlink #$(package-source
(this-package-input "single-application")) (this-package-input "single-application-qt5"))
"src/singleapplication")))))) "src/singleapplication"))))))
(native-inputs (list extra-cmake-modules qttools)) (native-inputs (list extra-cmake-modules qttools-5))
(inputs (list fio polkit-qt6 single-application qtwayland)) (inputs (list fio polkit-qt qtbase-5 single-application-qt5))
(home-page "https://github.com/JonMagon/KDiskMark") (home-page "https://github.com/JonMagon/KDiskMark")
(synopsis "Simple disk benchmark tool") (synopsis "Simple disk benchmark tool")
(description "KDiskMark is an HDD and SSD benchmark tool. KDiskMark (description "KDiskMark is an HDD and SSD benchmark tool. KDiskMark
File diff suppressed because it is too large Load Diff
+80 -10
View File
@@ -913,7 +913,7 @@ suite native in R.")
(define-public r-bpcells (define-public r-bpcells
(package (package
(name "r-bpcells") (name "r-bpcells")
(version "0.3.1") (version "0.3.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -922,7 +922,7 @@ suite native in R.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0yqgcajq83g25mznwcngaw7pi6vcqxqdnynpgb95yci57k3wrp6j")) (base32 "12h1di45fg06nhsliii7v0h1z567pkpis1xm4ar1qr8ns1n8iljw"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
'(delete-file-recursively "r/src/vendor/highway")))) '(delete-file-recursively "r/src/vendor/highway"))))
@@ -931,15 +931,13 @@ suite native in R.")
(arguments (arguments
(list (list
#:phases #:phases
`(modify-phases %standard-phases '(modify-phases %standard-phases
(add-after 'unpack 'chdir (add-after 'unpack 'chdir
(lambda _ (chdir "r"))) (lambda _
,@(if (target-x86-32?) (substitute* "r/configure"
'((add-after 'chdir 'require-sse2 (("tools/hwy-test.cpp" m)
;; This avoids falling back to the scalar backend in (string-append m " $HWY_LIBS $HWY_CFLAGS")))
;; highway, which fails to build. (chdir "r"))))))
(lambda _ (setenv "CFLAGS" "-msse2"))))
'()))))
(propagated-inputs (propagated-inputs
(list r-dplyr (list r-dplyr
r-ggplot2 r-ggplot2
@@ -7651,6 +7649,78 @@ reads at a typical sensitivity of 90-99% relative to BLAST depending on the
data and settings.") data and settings.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public discrover
(package
(name "discrover")
(version "1.6.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/maaskola/discrover")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"173fwi2vb6a5kp406hm3jj6j7v4whww796f2qcygp4rpvamh307y"))))
(build-system cmake-build-system)
(arguments
`(#:tests? #f ; there are no tests
#:phases
(modify-phases %standard-phases
(add-before 'build 'set-force-source-date
;; for reproducible dates, texlive needs this to respect
;; SOURCE_DATE_EPOCH
(lambda _
(setenv "FORCE_SOURCE_DATE" "1")))
(add-before 'build 'use-writable-texmfvar
;; Use writable TEXMFVAR to generate fonts.
(lambda _
(setenv "TEXMFVAR" "/tmp")))
(add-after 'unpack 'fix-latex-errors
(lambda _
(with-fluids ((%default-port-encoding #f))
(substitute* "doc/references.bib"
(("\\{S\\}illanp[^,]+,")
"{S}illanp{\\\"a}{\\\"a},")))
;; XXX: I just can't get pdflatex to not complain about these
;; characters. They end up in the manual via the generated
;; discrover-cli-help.txt.
(substitute* "src/hmm/cli.cpp"
(("µ") "mu")
(("η") "eta")
(("≤") "<="))
;; This seems to be a syntax error.
(substitute* "doc/discrover-manual.tex"
(("theverbbox\\[t\\]") "theverbbox"))))
(add-after 'unpack 'add-missing-includes
(lambda _
(substitute* "src/executioninformation.hpp"
(("#define EXECUTIONINFORMATION_HPP" line)
(string-append line "\n#include <random>")))
(substitute* "src/plasma/fasta.hpp"
(("#define FASTA_HPP" line)
(string-append line "\n#include <random>"))))))))
(inputs
(list boost cairo rmath-standalone))
(native-inputs
(list (texlive-local-tree
(list texlive-doi
texlive-etoolbox
texlive-examplep
texlive-forloop
texlive-listofitems
texlive-natbib
texlive-pgf ;tikz
texlive-readarray
texlive-verbatimbox))
imagemagick))
(home-page "https://dorina.mdc-berlin.de/public/rajewsky/discrover/")
(synopsis "Discover discriminative nucleotide sequence motifs")
(description "Discrover is a motif discovery method to find binding sites
of nucleic acid binding proteins.")
(license license:gpl3+)))
(define-public eddylab-squid (define-public eddylab-squid
(package (package
(name "eddylab-squid") (name "eddylab-squid")
+4 -4
View File
@@ -328,15 +328,15 @@ with the @uref{https://keepassxc.org, KeePassXC} password manager.")
(define noscript (define noscript
(package (package
(name "noscript") (name "noscript")
(version "13.6.18.1984") (version "13.2.2")
(source (origin (source (origin
(method url-fetch/zipbomb) (method url-fetch/zipbomb)
(uri (string-append (uri (string-append
"https://archive.torproject.org/tor-package-archive/torbrowser/noscript/noscript-" "https://noscript.net/download/releases/noscript-" version
version ".xpi")) ".xpi"))
(sha256 (sha256
(base32 (base32
"0assv8v89hhg302q81vvv7ln3q8k9m6rzjkbprv2j05ghb23kkvm")))) "0w2w0a76dk01bkh83mqwgs9ky02rjqk15z5sxg4a6mw0hpr81bpm"))))
(build-system copy-build-system) (build-system copy-build-system)
(properties '((addon-id . "{73a6fe31-595d-460b-a920-fcc0f8843232}"))) (properties '((addon-id . "{73a6fe31-595d-460b-a920-fcc0f8843232}")))
(arguments (arguments
+1 -4
View File
@@ -427,10 +427,7 @@ files and generates build instructions for the Ninja build system.")
version ".tar.gz")) version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"13a9pj7d2mxgv5gbd78di4pb4w722vjis0vmk38m1vdm95v2f9yd")) "13a9pj7d2mxgv5gbd78di4pb4w722vjis0vmk38m1vdm95v2f9yd"))))
(patches
(search-patches "meson-gir-fallback-path.patch"
"meson-keep-rpath-vicinity.patch"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list (list
+19
View File
@@ -1327,6 +1327,25 @@ for the @acronym{AWS,Amazon Web Services} SDK.")
(home-page "https://github.com/awslabs/aws-c-sdkutils") (home-page "https://github.com/awslabs/aws-c-sdkutils")
(license license:asl2.0))) (license license:asl2.0)))
(define-public pcl
(package
(name "pcl")
(version "1.12")
(source
(origin
(method url-fetch)
(uri (string-append
"http://www.xmailserver.org/pcl-" version ".tar.gz"))
(sha256
(base32
"06ly65rq4iyj2p4704i215c8y4rgspwl8sxfaifmf4ahfr30bcz7"))))
(build-system gnu-build-system)
(home-page "http://www.xmailserver.org/libpcl.html")
(synopsis "Portable Coroutine Library")
(description "The @acronym{PCL, Portable Coroutine Library} implements the
low level functionality for coroutines.")
(license license:gpl2+)))
(define-public aws-c-http (define-public aws-c-http
(package (package
(name "aws-c-http") (name "aws-c-http")
+6 -6
View File
@@ -43,7 +43,6 @@
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system glib-or-gtk)
#:use-module (guix build-system meson)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix utils) #:use-module (guix utils)
#:use-module (gnu packages) #:use-module (gnu packages)
@@ -1001,17 +1000,18 @@ Supported extensions to ISO 9660 are Rock Ridge, Joliet, AAIP, zisofs.")
(define-public libudfread (define-public libudfread
(package (package
(name "libudfread") (name "libudfread")
(version "1.2.0") (version "1.1.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://download.videolan.org/pub/videolan/libudfread/" "https://download.videolan.org/pub/videolan/libudfread/"
name "-" version ".tar.xz")) name "-" version ".tar.bz2"))
(sha256 (sha256
(base32 (base32
"03q5b1wm90vygx4rf4mzzrf0yhvhbvp72nyhv63pgz7v9jypqixv")))) "05c943ymw94nzjxf7v102916frqk7icgw4gb244wx23jn8cnz56m"))))
(build-system meson-build-system) (build-system gnu-build-system)
(native-inputs (list pkg-config)) (native-inputs
(list automake autoconf libtool pkg-config))
(home-page "https://code.videolan.org/videolan/libudfread") (home-page "https://code.videolan.org/videolan/libudfread")
(synopsis "C library to read UDF file systems") (synopsis "C library to read UDF file systems")
(description "@code{libudfread} is a C library for reading (description "@code{libudfread} is a C library for reading
+14 -20
View File
@@ -400,7 +400,7 @@
;; run the Blink performance tests, just remove everything to save ~70MiB. ;; run the Blink performance tests, just remove everything to save ~70MiB.
'("third_party/blink/perf_tests")) '("third_party/blink/perf_tests"))
(define %chromium-version "147.0.7727.137") (define %chromium-version "147.0.7727.55")
(define %ungoogled-revision (string-append %chromium-version "-1")) (define %ungoogled-revision (string-append %chromium-version "-1"))
(define %debian-revision (string-append "debian/" %ungoogled-revision)) (define %debian-revision (string-append "debian/" %ungoogled-revision))
@@ -412,7 +412,7 @@
(file-name (git-file-name "ungoogled-chromium" %ungoogled-revision)) (file-name (git-file-name "ungoogled-chromium" %ungoogled-revision))
(sha256 (sha256
(base32 (base32
"1ha84j3zckdv2l8dpicqhmr6a8mq3bqwalw0bmgamvlmns9i7nrj")))) "0l6v4wf16067igawjlh90f3d287mkw0cq4j5lvrxxy17y1skynzc"))))
(define %debian-origin (define %debian-origin
(origin (origin
@@ -425,7 +425,7 @@
((_ version) version)))) ((_ version) version))))
(sha256 (sha256
(base32 (base32
"04lqbclkvn9nsksgjpjilh78a8y17mwwq4pmhr6h8gvpp2y3bhhc")))) "0gqarll08i7rcs1amapciv263xvzglc8p44ikavq3xd12yyvcd98"))))
(define (origin-file origin file) (define (origin-file origin file)
(computed-file (computed-file
@@ -570,7 +570,7 @@
%chromium-version "-lite.tar.xz")) %chromium-version "-lite.tar.xz"))
(sha256 (sha256
(base32 (base32
"1m22whg5n9lw9gqhalm95jwfm45lqp4a7cs3mn3f4n8w0rvr0r5j")) "1salvlw5sykx3zmsbp7cgmf7y8yy6jlgb4b4zswzsbjrprk4jnap"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (force ungoogled-chromium-snippet)))) (snippet (force ungoogled-chromium-snippet))))
(build-system gnu-build-system) (build-system gnu-build-system)
@@ -596,7 +596,6 @@
"use_custom_libcxx=false" ; support for this is deprecated and to be removed. "use_custom_libcxx=false" ; support for this is deprecated and to be removed.
"optimize_webui=false" "optimize_webui=false"
"webnn_use_tflite=false" "webnn_use_tflite=false"
"build_tflite_with_xnnpack=false"
"safe_browsing_use_unrar=false" "safe_browsing_use_unrar=false"
"chrome_pgo_phase=0" "chrome_pgo_phase=0"
"use_sysroot=false" "use_sysroot=false"
@@ -689,7 +688,7 @@
"use_gnome_keyring=false" ;deprecated by libsecret "use_gnome_keyring=false" ;deprecated by libsecret
"use_pulseaudio=true" "use_pulseaudio=true"
"link_pulseaudio=true" "link_pulseaudio=true"
"icu_use_data_file=true" "icu_use_data_file=false"
;; VA-API acceleration is currently only supported on x86_64-linux. ;; VA-API acceleration is currently only supported on x86_64-linux.
#$@(if (string-prefix? "x86_64" (or (%current-target-system) #$@(if (string-prefix? "x86_64" (or (%current-target-system)
@@ -697,13 +696,6 @@
'("use_vaapi=true") '("use_vaapi=true")
'()) '())
#$@(if (string-prefix? "aarch64" (or (%current-target-system)
(%current-system)))
'("use_v4l2_codec=true"
"use_vaapi=false"
"use_av1_hw_decoder=true")
'())
;; Do not artificially restrict formats supported by system ffmpeg. ;; Do not artificially restrict formats supported by system ffmpeg.
"proprietary_codecs=true" "proprietary_codecs=true"
"ffmpeg_branding=\"Chrome\"" "ffmpeg_branding=\"Chrome\""
@@ -777,7 +769,12 @@
(string-append libclang "clang_base_path")) (string-append libclang "clang_base_path"))
(("(_rustfmt_path = \")\\$\\{rust_bindgen_root\\}" _ rustfmt) (("(_rustfmt_path = \")\\$\\{rust_bindgen_root\\}" _ rustfmt)
(string-append rustfmt "${rust_sysroot_absolute}")))))) (string-append rustfmt "${rust_sysroot_absolute}"))))))
(add-after 'patch-stuff 'add-absolute-references (add-after 'patch-stuff 'include-pthreadpool
;; FIXME: Somehow the build system cannot locate this header.
(lambda _
(copy-file "third_party/pthreadpool/src/include/pthreadpool.h"
"pthreadpool.h")))
(add-after 'include-pthreadpool 'add-absolute-references
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((cups-config (search-input-file inputs "/bin/cups-config")) (let ((cups-config (search-input-file inputs "/bin/cups-config"))
(libnssckbi.so (search-input-file inputs (libnssckbi.so (search-input-file inputs
@@ -895,7 +892,6 @@
"resources.pak" "resources.pak"
"v8_context_snapshot.bin" "v8_context_snapshot.bin"
"chrome_crashpad_handler" "chrome_crashpad_handler"
"icudtl.dat"
;; Swiftshader ICD. ;; Swiftshader ICD.
"libvk_swiftshader.so" "libvk_swiftshader.so"
@@ -918,11 +914,9 @@
(substitute* '("chrome/app/resources/manpage.1.in" (substitute* '("chrome/app/resources/manpage.1.in"
"chrome/installer/linux/common/desktop.template") "chrome/installer/linux/common/desktop.template")
(("@@MENUNAME") "Chromium") (("@@MENUNAME@@") "Chromium")
(("@@PACKAGE") "chromium") (("@@PACKAGE@@") "chromium")
(("/usr/bin/@@usr_bin_symlink_name") exe) (("/usr/bin/@@USR_BIN_SYMLINK_NAME@@") exe))
(("@@uri_scheme") "x-scheme-handler/chromium")
(("@@extra_desktop_entries") ""))
(mkdir-p man) (mkdir-p man)
(copy-file "chrome/app/resources/manpage.1.in" (copy-file "chrome/app/resources/manpage.1.in"
+23 -231
View File
@@ -18,10 +18,10 @@
;;; This module is separate from (gnu packages rust-apps) to avoid a ;;; This module is separate from (gnu packages rust-apps) to avoid a
;;; circular module dependency: (gnu packages rust-sources), which ;;; circular module dependency: (gnu packages rust-sources), which
;;; defines rust-codex-0.124.0, transitively loads (gnu packages ;;; defines rust-codex-0.120.0, transitively loads (gnu packages
;;; rust-apps) through its #:use-module chain. If the codex package ;;; rust-apps) through its #:use-module chain. If the codex package
;;; lived in rust-apps.scm, loading rust-sources would trigger loading ;;; lived in rust-apps.scm, loading rust-sources would trigger loading
;;; rust-apps before rust-codex-0.124.0 is defined, causing an unbound ;;; rust-apps before rust-codex-0.120.0 is defined, causing an unbound
;;; variable error. ;;; variable error.
(define-module (gnu packages codex) (define-module (gnu packages codex)
@@ -54,14 +54,14 @@
(define-public codex (define-public codex
(package (package
(name "codex") (name "codex")
(version (package-version rust-codex-0.124.0)) (version (package-version rust-codex-0.120.0))
(source (source
(origin (origin
(inherit (package-source rust-codex-0.124.0)) (inherit (package-source rust-codex-0.120.0))
(patches (search-patches (patches (search-patches
"codex-acp-0.11.1-disable-code-mode.patch" "codex-acp-0.11.1-disable-code-mode.patch"
"rust-codex-0.124.0-code-mode-stub-toolname.patch" "rust-codex-0.117.0-remove-patch-sections.patch"
"rust-codex-0.124.0-remove-patch-sections.patch" "rust-codex-0.120.0-connectors-cache-test-race.patch"
"rust-codex-0.120.0-remove-libwebrtc.patch" "rust-codex-0.120.0-remove-libwebrtc.patch"
"rust-codex-0.98.0-test-shebangs.patch" "rust-codex-0.98.0-test-shebangs.patch"
"rust-codex-0.120.0-test-timeout.patch")))) "rust-codex-0.120.0-test-timeout.patch"))))
@@ -69,12 +69,7 @@
(arguments (arguments
(list (list
#:install-source? #f #:install-source? #f
;; exec-server is library-only in 0.124 (no [[bin]] in #:cargo-install-paths '(list "cli" "exec" "exec-server"
;; exec-server/Cargo.toml); cargo install --path exec-server fails
;; with "no packages found with binaries or examples". Drop it
;; from the install paths -- the library is consumed via the
;; workspace by other binaries here, not installed standalone.
#:cargo-install-paths '(list "cli" "exec"
"linux-sandbox" "mcp-server" "linux-sandbox" "mcp-server"
"app-server" "tui") "app-server" "tui")
;; schema_fixtures_match_generated (upstream fixture is stale: ;; schema_fixtures_match_generated (upstream fixture is stale:
@@ -322,164 +317,7 @@
;; (chatgpt.com, api.github.com) wait ;; (chatgpt.com, api.github.com) wait
;; for TCP timeout instead of failing ;; for TCP timeout instead of failing
;; instantly at TLS, eating the budget. ;; instantly at TLS, eating the budget.
"--skip" "mcp_server_status_list_tools_and_auth_only_skips_slow_inventory_calls" "--skip" "mcp_server_status_list_tools_and_auth_only_skips_slow_inventory_calls")
;;; BEGIN Stack overflow in 'current_thread'
;;; tokio runtime. The sibling tests in
;;; tracing_tests.rs use the local helper
;;; run_current_thread_test_with_stack
;;; (4 MiB) but this one uses bare
;;; #[tokio::test] on the 2 MiB default
;;; test-thread stack, and TurnStart's
;;; future graph exceeds it. With
;;; RUST_MIN_STACK raised the overflow is
;;; gone but the test then deterministically
;;; times out waiting for a span tagged
;;; codex.op = "user_input" on the remote
;;; trace that upstream never emits on that
;;; trace in our environment.
"--skip" "turn_start_jsonrpc_span_parents_core_turn_spans"
;;; END tracing test stack/timeout
;;; BEGIN The upstream loader resolves the
;;; MCP OAuth credentials store mode by
;;; calling
;;; resolve_mcp_oauth_credentials_store_mode
;;; with env!("CARGO_PKG_VERSION") -- which
;;; in the released 0.124.0 tarball is
;;; "0.124.0". These fixture tests
;;; construct the expected Config by
;;; passing the LOCAL_DEV_BUILD_VERSION
;;; constant ("0.0.0") to the same
;;; resolver, and the resolver only returns
;;; File for "0.0.0" -- Auto otherwise.
;;; Upstream CI builds from a checkout
;;; still carrying version = "0.0.0" so the
;;; tests pass there; they cannot pass
;;; against a released tag.
"--skip" "test_precedence_fixture_with_gpt3_profile"
"--skip" "test_precedence_fixture_with_gpt5_profile"
"--skip" "test_precedence_fixture_with_o3_profile"
"--skip" "test_precedence_fixture_with_zdr_profile"
;;; END LOCAL_DEV_BUILD_VERSION fixture mismatch
;;; BEGIN Verifies that Codex's user-shell
;;; spawn produces a child where
;;; CODEX_SANDBOX_NETWORK_DISABLED is unset
;;; (asserts stdout == "not-set"). We
;;; deliberately set that env var at the
;;; check phase to trigger upstream's
;;; skip_if_no_network! guards; the var then
;;; leaks into the spawned shell and the
;;; assertion fails. The guix skip is a
;;; direct cost of the network-gate fix --
;;; trading one broken test for two that
;;; now skip cleanly.
"--skip" "user_shell_command_does_not_set_network_sandbox_env_var"
;;; END CODEX_SANDBOX_NETWORK_DISABLED leak
;;; BEGIN The exec-server/tests/file_system
;;; integration tests invoke the real
;;; system bwrap, which tries to execvp the
;;; test binary at the cargo target path
;;; under the build dir. Same root cause
;;; as the existing
;;; sandbox_reenables_writable_subpaths_under_unreadable_parents
;;; skip: guix builds live under /tmp but
;;; bwrap's mount namespace excludes /tmp,
;;; making the binary invisible inside the
;;; namespace.
"--skip" "file_system_copy_preserves_symlink_source"
"--skip" "file_system_copy_rejects_symlink_escape_destination"
"--skip" "file_system_copy_rejects_symlink_escape_source"
"--skip" "file_system_create_directory_rejects_symlink_escape"
"--skip" "file_system_read_directory_rejects_symlink_escape"
"--skip" "file_system_remove_rejects_symlink_escape"
"--skip" "file_system_remove_removes_symlink_not_target"
"--skip" "file_system_sandboxed_read_allows_readable_root"
"--skip" "file_system_sandboxed_read_rejects_symlink_escape"
"--skip" "file_system_sandboxed_read_rejects_symlink_parent_dotdot_escape"
"--skip" "file_system_sandboxed_write_allows_additional_write_root"
"--skip" "file_system_sandboxed_write_rejects_symlink_escape"
"--skip" "file_system_sandboxed_write_rejects_unwritable_path"
;;; END bwrap-cant-see-/tmp file_system tests
;;; BEGIN Landlock is unavailable on Guix,
;;; so the sandbox cannot deny network
;;; syscalls. These tests expect
;;; SandboxErr::Denied for the nc, ping,
;;; ssh, getent, and dev_tcp_redirection
;;; commands but those commands instead
;;; block on connect() until the test's 2s
;;; timeout fires (Timeout, exit 124).
;;; Same root cause as the Landlock skips
;;; at the top of this list; new test names
;;; in 0.124.
"--skip" "sandbox_blocks_nc"
"--skip" "sandbox_blocks_ping"
"--skip" "sandbox_blocks_dev_tcp_redirection"
"--skip" "sandbox_blocks_getent"
"--skip" "sandbox_blocks_ssh"
;;; END Landlock network block
;;; BEGIN Requires github.com network access.
;;; With no "extraKnownMarketplaces" entry
;;; in settings.json,
;;; collect_marketplace_import_sources
;;; inserts a fallback entry for the
;;; "claude-plugins-official" marketplace
;;; pointing at the github shorthand
;;; "anthropics/claude-plugins-official".
;;; add_marketplace -> parse_marketplace_source
;;; expands that to a github.com/.git URL
;;; and clone_git_source runs 'git clone'.
;;; The Guix build sandbox has no network,
;;; so the clone fails and the marketplace
;;; lands in failed_marketplaces. No mock
;;; cloner is injected via
;;; ExternalAgentConfigService::new_for_test,
;;; so there is no in-tree way to satisfy
;;; the test offline.
"--skip" "import_plugins_infers_claude_official_marketplace_when_missing_from_settings"
;;; END github.com network access
;;; BEGIN Async race between the rollout
;;; writer task and a direct SQLite read.
;;; The test calls
;;; update_memory_settings_with_app_server,
;;; which routes through the in-memory
;;; thread path on the app-server's
;;; ThreadMemoryModeSet handler ->
;;; Session::set_thread_memory_mode ->
;;; persist_thread_memory_mode_update,
;;; which writes a RolloutItem::SessionMeta
;;; with the new mode to the rollout file
;;; via recorder.record_items + flush. The
;;; rollout writer task then asynchronously
;;; calls sync_thread_state_after_write,
;;; which calls state_db::apply_rollout_items
;;; to mirror the SessionMeta into SQLite.
;;; flush() only awaits the rollout-file
;;; write, not the subsequent SQLite sync.
;;; The test opens a fresh StateRuntime and
;;; reads get_thread_memory_mode
;;; immediately, so it observes the creation
;;; default of "enabled" written by
;;; upsert_thread_with_creation_memory_mode
;;; instead of the new "disabled". Upstream
;;; CI wins this race; we lose.
"--skip" "update_memory_settings_updates_current_thread_memory_mode"
;;; END memory-mode rollout/sqlite race
;;; BEGIN The Stopwatch::new constructor in
;;; codex_shell_escalation anchors
;;; T0 = Instant::now() at construction;
;;; the spawned cancellation task fires at
;;; T0 + limit. The test captures
;;; start = Instant::now() at T1 > T0 (after
;;; cancellation_token() returns) and
;;; asserts start.elapsed() >= limit,
;;; i.e. (T0 + limit) - T1 >= limit, which
;;; is always false by the offset T1 - T0.
;;; The test only passes when scheduler
;;; jitter on the sleep wakeup happens to
;;; exceed that offset. Upstream wins the
;;; race; we don't always.
"--skip" "cancellation_receiver_fires_after_limit"
;;; END Stopwatch construction/start offset race
)
#:cargo-package-crates #:cargo-package-crates
''(;;; Tier 0: No internal deps. ''(;;; Tier 0: No internal deps.
"codex-ansi-escape" "codex-ansi-escape"
@@ -520,31 +358,22 @@
"codex-debug-client" "codex-debug-client"
"codex-analytics" "codex-analytics"
"codex-rollout" "codex-rollout"
"codex-rollout-trace"
"codex-terminal-detection" "codex-terminal-detection"
"codex-utils-approval-presets" "codex-utils-approval-presets"
"codex-utils-cli" "codex-utils-cli"
"codex-uds"
"codex-install-context"
"codex-device-key"
;;; Tier 2. ;;; Tier 2.
"codex-app-server-protocol" "codex-app-server-protocol"
"codex-rmcp-client" "codex-rmcp-client"
"codex-otel" "codex-otel"
"codex-thread-store"
"codex-state" "codex-state"
"codex-features" "codex-features"
"codex-model-provider"
"codex-config" "codex-config"
"codex-agent-identity"
"codex-aws-auth"
"codex-hooks" "codex-hooks"
"codex-instructions"
"codex-code-mode" "codex-code-mode"
"codex-feedback" "codex-feedback"
"codex-skills" "codex-skills"
"codex-test-binary-support"
"codex-core" "codex-core"
"codex-core-plugins"
"codex-utils-sandbox-summary" "codex-utils-sandbox-summary"
"codex-linux-sandbox" "codex-linux-sandbox"
"codex-sandboxing" "codex-sandboxing"
@@ -596,7 +425,7 @@
;; Update them to match the actual package version. ;; Update them to match the actual package version.
(let ((snap-files (find-files "." "\\.snap$"))) (let ((snap-files (find-files "." "\\.snap$")))
(substitute* snap-files (substitute* snap-files
(("\\(v0\\.0\\.0\\) ") "(v0.124.0) "))))) (("\\(v0\\.0\\.0\\) ") "(v0.120.0) ")))))
(add-after 'chdir-to-workspace 'patch-git-deps-to-vendor (add-after 'chdir-to-workspace 'patch-git-deps-to-vendor
(lambda _ (lambda _
;; Replace git dependencies with version references so cargo ;; Replace git dependencies with version references so cargo
@@ -607,55 +436,32 @@
(("runfiles = \\{ git = [^}]+\\}") (("runfiles = \\{ git = [^}]+\\}")
"runfiles = \"0.1.0\"")) "runfiles = \"0.1.0\""))
;; Remove workspace members that have unbuildable deps ;; Remove workspace members that have unbuildable deps
;; (v8-poc requires V8). code-mode stays a workspace member ;; (libwebrtc requires git fetch, v8-poc requires V8).
;; so its codex-protocol resolves to the same local copy as
;; the rest of the build; disabling its default features
;; (below) avoids pulling in V8.
(substitute* "Cargo.toml" (substitute* "Cargo.toml"
(("\"v8-poc\",") "")) (("\"v8-poc\",") "")
;; Disable V8 runtime in codex-code-mode by turning off (("\"code-mode\",") ""))
;; default features. Keep path= so code-mode is resolved ;; Disable V8 runtime in codex-code-mode: remove path
;; from the local source tree and shares codex-protocol ;; so cargo resolves it from the vendor (where it has
;; (and other workspace crates) with the rest of the build; ;; optional = true on v8) and disable default features.
;; resolving it from the vendor instead introduces a
;; duplicate codex-protocol and causes E0308 type
;; mismatches in codex-tools.
(substitute* "Cargo.toml" (substitute* "Cargo.toml"
(("codex-code-mode = \\{ path = \"code-mode\" \\}") (("codex-code-mode = \\{ path = \"code-mode\" \\}")
"codex-code-mode = { path = \"code-mode\", default-features = false }")) "codex-code-mode = { version = \"0.120.0\", default-features = false }"))))
;; cargo build at workspace root ignores per-dep
;; default-features=false and builds code-mode with its
;; own default features, which include v8-runtime and
;; would pull in V8. Make the default feature empty.
(substitute* "code-mode/Cargo.toml"
(("^default = \\[\"v8-runtime\"\\]") "default = []"))))
(add-after 'patch-git-deps-to-vendor 'add-version-to-workspace-deps (add-after 'patch-git-deps-to-vendor 'add-version-to-workspace-deps
(lambda _ (lambda _
;; cargo package requires all dependencies to have versions. ;; cargo package requires all dependencies to have versions.
;; Add version = "0.124.0" to internal path dependencies. ;; cargo package requires all dependencies to have versions.
;; Add version = "0.120.0" to internal path dependencies.
(let ((cargo-files (find-files "." "^Cargo\\.toml$"))) (let ((cargo-files (find-files "." "^Cargo\\.toml$")))
(substitute* cargo-files (substitute* cargo-files
;; Handle inline deps: name = { path = "..." } ;; Handle inline deps: name = { path = "..." }
(("(codex-[a-z0-9-]+) = \\{ path = " all name) (("(codex-[a-z0-9-]+) = \\{ path = " all name)
(string-append name " = { version = \"0.124.0\", path = ")) (string-append name " = { version = \"0.120.0\", path = "))
;; Handle inline deps with package: name = { package = "...", path = "..." } ;; Handle inline deps with package: name = { package = "...", path = "..." }
(("(codex-[a-z0-9-]+) = \\{ package = " all name) (("(codex-[a-z0-9-]+) = \\{ package = " all name)
(string-append name " = { version = \"0.124.0\", package = ")) (string-append name " = { version = \"0.120.0\", package = "))
;; Handle section deps: [dependencies.X] with path = "..." ;; Handle section deps: [dependencies.X] with path = "..."
(("^(path = \"\\.\\./[^\"]*\")" all path-line) (("^(path = \"\\.\\./[^\"]*\")" all path-line)
(string-append path-line "\nversion = \"0.124.0\"")))))) (string-append path-line "\nversion = \"0.120.0\""))))))
(add-after 'chdir-to-workspace 'use-gnu-store-in-sandbox
(lambda _
;; LINUX_PLATFORM_DEFAULT_READ_ROOTS in linux-sandbox/src/
;; bwrap.rs is the read-only baseline that codex's bwrap
;; sandbox bind-mounts so commands can read /usr/bin/ls,
;; libc, etc. Upstream lists "/nix/store" for NixOS;
;; Guix's equivalent is "/gnu/store". Without this swap,
;; the codex sandbox cannot locate any binaries on a Guix
;; system because every "system" path resolves into
;; /gnu/store/<hash>-pkg/bin/...
(substitute* "linux-sandbox/src/bwrap.rs"
(("\"/nix/store\"") "\"/gnu/store\""))))
(add-after 'chdir-to-workspace 'patch-hardcoded-paths (add-after 'chdir-to-workspace 'patch-hardcoded-paths
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let ((bash-bin (string-append (let ((bash-bin (string-append
@@ -755,12 +561,10 @@
;; double quotes. ;; double quotes.
(substitute* (substitute*
(list "core/src/plugins/startup_sync_tests.rs" (list "core/src/plugins/startup_sync_tests.rs"
"core/src/tools/runtimes/shell/unix_escalation_tests.rs"
"core/tests/suite/client.rs" "core/tests/suite/client.rs"
"core/tests/suite/js_repl.rs" "core/tests/suite/js_repl.rs"
"core/tests/suite/skill_approval.rs" "core/tests/suite/skill_approval.rs"
"core/tests/suite/user_notification.rs" "core/tests/suite/user_notification.rs"
"exec-server/tests/file_system.rs"
"login/src/auth/auth_tests.rs" "login/src/auth/auth_tests.rs"
"models-manager/src/manager_tests.rs" "models-manager/src/manager_tests.rs"
"sandboxing/src/bwrap_tests.rs") "sandboxing/src/bwrap_tests.rs")
@@ -809,17 +613,7 @@
;; ~/... and 30 snapshot tests fail. ;; ~/... and 30 snapshot tests fail.
(setenv "HOME" "/tmp/guix-home") (setenv "HOME" "/tmp/guix-home")
(mkdir-p "/tmp/guix-home") (mkdir-p "/tmp/guix-home")
(setenv "USER" "nixbld") (setenv "USER" "nixbld"))))))
;; Default libtest thread stack is 2 MiB, which is not
;; enough for tokio current_thread tests that drive
;; codex-core's full turn pipeline. Upstream gates such
;; tests through run_current_thread_test_with_stack (4 MiB)
;; in app-server/src/message_processor/tracing_tests.rs;
;; raise the global default so future additions that
;; forget the wrapper still pass.
(setenv "RUST_MIN_STACK" "8388608")
;; Disable network access.
(setenv "CODEX_SANDBOX_NETWORK_DISABLED" "1"))))))
(native-inputs `(("bubblewrap" ,bubblewrap) ;tests need bwrap on PATH (native-inputs `(("bubblewrap" ,bubblewrap) ;tests need bwrap on PATH
("clang" ,clang) ("clang" ,clang)
("cmake-minimal" ,cmake-minimal) ("cmake-minimal" ,cmake-minimal)
@@ -834,8 +628,6 @@
(inputs (cons* bash-minimal coreutils git-minimal sed (inputs (cons* bash-minimal coreutils git-minimal sed
libcap oniguruma openssl sqlite zlib `(,zstd "lib") libcap oniguruma openssl sqlite zlib `(,zstd "lib")
(cargo-inputs 'codex))) (cargo-inputs 'codex)))
(properties '((timeout . 108000) ; 30 hours
(max-silent-time . 54000))) ; 15 hours
(home-page "https://github.com/openai/codex") (home-page "https://github.com/openai/codex")
(synopsis "AI-assisted coding CLI and TUI") (synopsis "AI-assisted coding CLI and TUI")
(description (description
+1 -3
View File
@@ -2375,9 +2375,7 @@ non-Windows systems without running the actual installer using wine.")
(sha256 (sha256
(base32 "17k679glx05v23n8kxbg9vmbf89i2252g5xj6w3dkz19asmh1zd6")))) (base32 "17k679glx05v23n8kxbg9vmbf89i2252g5xj6w3dkz19asmh1zd6"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs (list autoconf automake libtool nasm))
(cons* autoconf automake libtool
(maybe-nasm)))
(home-page "https://github.com/intel/isa-l") (home-page "https://github.com/intel/isa-l")
(synopsis "Intelligent storage acceleration library") (synopsis "Intelligent storage acceleration library")
(description "ISA-L is a collection of optimized low-level functions (description "ISA-L is a collection of optimized low-level functions
+2 -109
View File
@@ -52,7 +52,6 @@
;;; Copyright © 2025 Philippe Swartvagher <phil.swart@gmx.fr> ;;; Copyright © 2025 Philippe Swartvagher <phil.swart@gmx.fr>
;;; Copyright © 2025 Murilo <murilo@disroot.org> ;;; Copyright © 2025 Murilo <murilo@disroot.org>
;;; Copyright © 2026 Justin Veilleux <terramorpha@cock.li> ;;; Copyright © 2026 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -134,7 +133,6 @@
#:use-module (gnu packages sdl) #:use-module (gnu packages sdl)
#:use-module (gnu packages tls) #:use-module (gnu packages tls)
#:use-module (gnu packages tex) #:use-module (gnu packages tex)
#:use-module (gnu packages texinfo)
#:use-module (gnu packages web) #:use-module (gnu packages web)
#:use-module (gnu packages webkit) #:use-module (gnu packages webkit)
#:use-module (gnu packages xdisorg) #:use-module (gnu packages xdisorg)
@@ -1673,38 +1671,6 @@ maintained anymore.")
concurrent queue for C++11.") concurrent queue for C++11.")
(license license:bsd-2))) (license license:bsd-2)))
(define-public ringbuffer
(package
(name "ringbuffer")
(version "0.9.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/JohannesLorenz/ringbuffer")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1c57hj6zyvcjpcbwrq8c1hj5brk1bnh69ayd88ny1p0gx031sjpk"))))
(build-system cmake-build-system)
(arguments
(list #:configure-flags
#~(list "-DCMAKE_CXX_FLAGS=-Wno-error=array-bounds"
(string-append "-DINSTALL_LIB_DIR=" #$output "/lib"))
#:phases
#~(modify-phases %standard-phases
(add-after 'install 'install-export-header
(lambda _
(install-file "src/lib/ringbuffer_export.h"
(string-append #$output
"/include/ringbuffer")))))))
(home-page "https://github.com/JohannesLorenz/ringbuffer")
(synopsis "Lock-free multi-reader ringbuffer")
(description
"@code{ringbuffer} is a library containing a ringbuffer. It is lock-free
(using atomics only), and allows multiple readers, but only one writer.")
(license license:gpl3+)))
(define-public spscqueue (define-public spscqueue
(package (package
(name "spscqueue") (name "spscqueue")
@@ -3226,7 +3192,8 @@ pointers, containers, compiler building blocks, etc.")
(native-inputs (native-inputs
(list build)) (list build))
(inputs (inputs
(list libcutl xerces-c)) `(("libcutl" ,libcutl)
("libxerces-c" ,xerces-c)))
(synopsis "XSD Front-end") (synopsis "XSD Front-end")
(description "@code{libxsd-frontend} is a compiler frontend for the W3C (description "@code{libxsd-frontend} is a compiler frontend for the W3C
XML Schema definition language. It includes a parser, semantic graph types XML Schema definition language. It includes a parser, semantic graph types
@@ -3701,39 +3668,6 @@ computing Fast Fourier transformations. It supports multidimensional arrays,
different floating point sizes and complex transformations.") different floating point sizes and complex transformations.")
(license license:bsd-3)))) (license license:bsd-3))))
(define-public libbinio
;; The latest tagged version does not support CMake build. This commit has
;; builds with CMake and has updated CMake version support.
(let ((commit "e88dad086265e179ab6aef7f479e19f3917c7a98")
(revision "0"))
(package
(name "libbinio")
(version (git-version "1.5" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/adplug/libbinio")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0rb33jl6gpxb88zymzl996m43b7r6wyw4lq0ib3626kna3baqnha"))))
(native-inputs
(list autoconf automake libtool texinfo))
(build-system cmake-build-system)
(arguments
(list #:tests? #f ;no tests
#:configure-flags
#~(list "-DBUILD_SHARED_LIBS=ON")))
(home-page "http://adplug.github.io/libbinio/")
(synopsis "Binary I/O stream class library")
(description
"This binary I/O stream class library presents a platform-independent
way to access binary data streams in C++. The library is hardware independent
in the form that it transparently converts between the different forms of
machine-internal binary data representation.")
(license license:lgpl2.1+))))
(define-public priocpp (define-public priocpp
;; Latest release is from 2022-08-14. ;; Latest release is from 2022-08-14.
(let ((commit "ea15402adcd0d9191dc29ca6f7e4dd0bff67b9b5") (let ((commit "ea15402adcd0d9191dc29ca6f7e4dd0bff67b9b5")
@@ -4560,47 +4494,6 @@ meta data function.")
;; or the CECILL-C license: ;; or the CECILL-C license:
(license (list license:lgpl3 license:cecill-c)))) (license (list license:lgpl3 license:cecill-c))))
(define-public tcbrindle-span
(let ((commit "836dc6a0efd9849cb194e88e4aa2387436bb079b")
(revision "0"))
(package
(name "tcbrindle-span")
(version (git-version "0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/tcbrindle/span")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1v3x1mj4if8jrr7cmrcbhv8n8ygla0liqb0dic6g6ji7px2pr6jf"))
(modules '((guix build utils)))
;; Unbundle catch.
(snippet
'(with-directory-excursion "test"
(delete-file "catch.hpp")
(substitute* (find-files "." "\\.cpp$")
(("\"catch\\.hpp\"") "<catch.hpp>"))))))
(build-system cmake-build-system)
(native-inputs (list catch-framework))
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(mkdir-p (string-append #$output))
(copy-recursively "../source/include"
(string-append #$output "/include")))))))
(home-page "https://github.com/tcbrindle/span")
(synopsis "Implementation of C++20's @code{std::span} for older compilers")
(description
"This package provides a single-header implementation of C++20's
@code{std::span}, conforming to the C++20 committee draft. It is compatible
with C++11, but will use newer language features if they are available.")
(license license:boost1.0))))
(define-public tsl-hopscotch-map (define-public tsl-hopscotch-map
(package (package
(name "tsl-hopscotch-map") (name "tsl-hopscotch-map")
+341 -1173
View File
File diff suppressed because it is too large Load Diff
+2 -3
View File
@@ -71,7 +71,6 @@
;;; Copyright © 2026 Spencer King <spencer.king@wustl.edu> ;;; Copyright © 2026 Spencer King <spencer.king@wustl.edu>
;;; Copyright © 2026 Peter Polidoro <peter@polidoro.io> ;;; Copyright © 2026 Peter Polidoro <peter@polidoro.io>
;;; Copyright © 2026 Josep Bigorra <jjbigorra@gmail.com> ;;; Copyright © 2026 Josep Bigorra <jjbigorra@gmail.com>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -4160,8 +4159,8 @@ programmatically or as a standalone CLI application.")
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
(list openssl `(("libcrypto" ,openssl)
tcl)) ;for tests ("libtcl8.6" ,tcl))) ; required for running the tests
(native-inputs (native-inputs
(list tcl)) (list tcl))
(arguments (arguments
+2 -3
View File
@@ -266,14 +266,14 @@ tmpfs/ramfs filesystems.")
(define-public parted (define-public parted
(package (package
(name "parted") (name "parted")
(version "3.7") (version "3.6")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnu/parted/parted-" (uri (string-append "mirror://gnu/parted/parted-"
version ".tar.xz")) version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0yzga4cjq3yplqs47dl9714vwc3v3v8nxrj80rdc5wx4c5syb380")))) "04p6b4rygrfd1jrskwrx3bn2icajg1mvbfhyc0c9l3ya7kixnhrv"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list (list
@@ -296,7 +296,6 @@ tmpfs/ramfs filesystems.")
(,util-linux "lib"))) (,util-linux "lib")))
(native-inputs (native-inputs
(list gettext-minimal (list gettext-minimal
pkg-config
;; For the tests. ;; For the tests.
e2fsprogs e2fsprogs
+2 -2
View File
@@ -51,7 +51,7 @@
(define-public boinc-client (define-public boinc-client
(package (package
(name "boinc-client") (name "boinc-client")
(version "8.2.12") (version "8.2.9")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -62,7 +62,7 @@
(file-name (git-file-name "boinc" version)) (file-name (git-file-name "boinc" version))
(sha256 (sha256
(base32 (base32
"0531n0yij1gh06xy6plwivbpmhqfq15jizg3rdgri40nz41rzbgr")))) "0ik9423ii6kal29jdn907pxy8w86zpi8n158qx1gcsh8lsaif1v5"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list (list
+18 -2
View File
@@ -201,13 +201,13 @@ your project into different processes.")
(define-public python-django (define-public python-django
(package (package
(name "python-django") (name "python-django")
(version "5.2.13") (version "5.2.11")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "django" version)) (uri (pypi-uri "django" version))
(sha256 (sha256
(base32 "1i1vlffzhwbzp6r6y8ycvwklc45diy4c6i897z379l48a7dqj5d3")))) (base32 "1lq2dynfw6jmvzrzgfrlij2qnxcksaxgnrfr0pj3bvmrv0m2jbbz"))))
(build-system pyproject-build-system) (build-system pyproject-build-system)
(arguments (arguments
'(#:test-flags '(#:test-flags
@@ -298,6 +298,22 @@ to the @dfn{don't repeat yourself} (DRY) principle.")
;; This CVE is fixed in 4.1.9. ;; This CVE is fixed in 4.1.9.
"CVE-2023-31047")))))) "CVE-2023-31047"))))))
(define-public python-django-4
(package
(inherit python-django)
(name "python-django-4")
(version "4.2.28")
(source
(origin
(method url-fetch)
(uri (pypi-uri "django" version))
(sha256
(base32 "1znc2q1m9p2kxz1rkfkh2hg2sx6i3aqv72zsraad7bci364cvfd4"))))
(arguments
(substitute-keyword-arguments arguments
((#:phases phases)
#~(modify-phases #$phases (delete 'delete-sitecustomize)))))))
(define-public python-django-cache-url (define-public python-django-cache-url
(package (package
(name "python-django-cache-url") (name "python-django-cache-url")
+5 -6
View File
@@ -10,7 +10,6 @@
;;; Copyright © 2022 ( <paren@disroot.org> ;;; Copyright © 2022 ( <paren@disroot.org>
;;; Copyright © 2022 Esther Flashner <esther@flashner.co.il> ;;; Copyright © 2022 Esther Flashner <esther@flashner.co.il>
;;; Copyright © 2025-2026 Jonas Meeuws <jonas.meeuws@gmail.com> ;;; Copyright © 2025-2026 Jonas Meeuws <jonas.meeuws@gmail.com>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -321,11 +320,11 @@ integration tests...\n")
"|core.thread.osthread-debug-shared"))) "|core.thread.osthread-debug-shared")))
(#t `(""))))))))))))) (#t `("")))))))))))))
(native-inputs (native-inputs
(modify-inputs native-inputs (append (delete "llvm"
(delete "llvm") (alist-replace "ldc" (list ldc-bootstrap)
(replace "ldc" ldc-bootstrap) (package-native-inputs ldc-bootstrap)))
(append clang-17 ;propagates llvm and clang-runtime `(("clang" ,clang-17) ;propagates llvm and clang-runtime
python-lit))) ("python-lit" ,python-lit))))
(properties (properties
(alist-delete 'hidden? (package-properties ldc-bootstrap))))) (alist-delete 'hidden? (package-properties ldc-bootstrap)))))
-1
View File
@@ -115,7 +115,6 @@
(uri (git-reference (uri (git-reference
(url "git://git.chiark.greenend.org.uk/~ianmdlvl/adns.git") (url "git://git.chiark.greenend.org.uk/~ianmdlvl/adns.git")
(commit (string-append "adns-" version)))) (commit (string-append "adns-" version))))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0ln3l5j7wb1xazrzl76p9xar52p6l2k1cwy7jazxw1acl71k9h5n")))) "0ln3l5j7wb1xazrzl76p9xar52p6l2k1cwy7jazxw1acl71k9h5n"))))
+2 -2
View File
@@ -148,13 +148,13 @@ system.")
(define-public r-duckdb (define-public r-duckdb
(package (package
(name "r-duckdb") (name "r-duckdb")
(version "1.5.2") (version "1.5.1")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
(uri (cran-uri "duckdb" version)) (uri (cran-uri "duckdb" version))
(sha256 (sha256
(base32 "1dldlfwvc33czvlxfmwaj4p9y6sjjj5iqy98yda47a8kclrqmyam")) (base32 "177621m08whqqk4yhj3zrr08l3d9hhlqh3gm9jzhi5cplg47cksq"))
;; This package bundles the duckdb sources and builds a custom variant ;; This package bundles the duckdb sources and builds a custom variant
;; of duckdb. I'd be happy to link it with our duckdb library instead, ;; of duckdb. I'd be happy to link it with our duckdb library instead,
;; but it does not seem possible to do that. ;; but it does not seem possible to do that.
+6 -6
View File
@@ -2331,7 +2331,7 @@ Automation}, portable and vendor neutral FPGA place and route tool.")
(define-public nvc (define-public nvc
(package (package
(name "nvc") (name "nvc")
(version "1.20.1") (version "1.19.3")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -2340,7 +2340,7 @@ Automation}, portable and vendor neutral FPGA place and route tool.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1b38x2ch468s4p6mrq6c8s0d95vb84p6w4v8in79l4w7sfy8jnr0")))) "1zizz2dafm53lzpjayy6vig5pz5ri9cszdivg0jzzh8s3ggkpy1i"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list #:out-of-source? #t (list #:out-of-source? #t
@@ -3461,7 +3461,7 @@ form of AXI, AXI lite, and AXI stream modules.")
(define-public python-edalize (define-public python-edalize
(package (package
(name "python-edalize") (name "python-edalize")
(version "0.6.8") (version "0.6.6")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -3470,7 +3470,7 @@ form of AXI, AXI lite, and AXI stream modules.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "04m2lhkclw9fj92k43c06j003qnq9i1yhy2131fvcnkkr0d9438m")))) (base32 "115nc15n2cx4x9irjim07zkg0287418djqd6ja7rm8jrnyldvln9"))))
(build-system pyproject-build-system) (build-system pyproject-build-system)
(arguments (arguments
(list (list
@@ -4516,7 +4516,7 @@ unique design feature of Trilinos is its focus on packages.")
(define-public verilator (define-public verilator
(package (package
(name "verilator") (name "verilator")
(version "5.048") (version "5.046")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -4525,7 +4525,7 @@ unique design feature of Trilinos is its focus on packages.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "16c1x66kqmc5ldqjij81kypj471fibfihcqn6kz4wbxvnn0smyn6")))) (base32 "1gr1qhxvl4856hnmnx46dqd2qp0jhdh959zm2qfmxzzh19np7xkm"))))
(native-inputs (native-inputs
(list autoconf (list autoconf
automake automake
+4 -2
View File
@@ -62,7 +62,7 @@ as bold, underscore or italic.")
(define-public emacs-buttercup (define-public emacs-buttercup
(package (package
(name "emacs-buttercup") (name "emacs-buttercup")
(version "1.40") (version "1.38")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -72,7 +72,9 @@ as bold, underscore or italic.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1b55cfh4wr40max2c42crvaa6wid7a83g28yximsin98i32q5f5r")))) "09n8skr5wi8bs7x81d5bi6z89dd8s1zi9a5f4r2qadaz69slncxq"))
(patches
(search-patches "emacs-buttercup-1.38-native-comp-spy-on-trampoline-scope.patch"))))
(build-system emacs-build-system) (build-system emacs-build-system)
(arguments (arguments
(list (list
+397 -628
View File
File diff suppressed because it is too large Load Diff
+1 -2
View File
@@ -28,7 +28,6 @@
;;; Copyright © 2025 Nicolas Graves <ngraves@ngraves.fr> ;;; Copyright © 2025 Nicolas Graves <ngraves@ngraves.fr>
;;; Copyright © 2025 Jake Forster <jakecameron.forster@gmail.com> ;;; Copyright © 2025 Jake Forster <jakecameron.forster@gmail.com>
;;; Copyright © 2025 John Kehayias <john@guixotic.coop> ;;; Copyright © 2025 John Kehayias <john@guixotic.coop>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -870,7 +869,7 @@ Started in 2014 as a GSOC project, Guile-Emacs was resurrected in 2024.")
"0vfw7z9i2s9np6nmx1d4dlsywm044rkaqarn7akffmb6bf1j6zv5")))) "0vfw7z9i2s9np6nmx1d4dlsywm044rkaqarn7akffmb6bf1j6zv5"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
(list gettext-minimal)) `(("gettext" ,gettext-minimal)))
(arguments (arguments
`(#:configure-flags `(#:configure-flags
(list (string-append "--with-charmaps=" (list (string-append "--with-charmaps="
+4 -5
View File
@@ -1264,8 +1264,7 @@ Enjoy all of your favorite Atari 2600 games on your PC thanks to Stella!")
(base32 "1xf15b6c3i0vv92b420a92pfvfaxhji56ivin8pn5r7fajkqyfb7")))) (base32 "1xf15b6c3i0vv92b420a92pfvfaxhji56ivin8pn5r7fajkqyfb7"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
(cons* pkg-config which (list pkg-config nasm which))
(maybe-nasm)))
(inputs (inputs
(list freetype (list freetype
glu glu
@@ -1290,6 +1289,8 @@ Enjoy all of your favorite Atari 2600 games on your PC thanks to Stella!")
(list "all" (string-append "PREFIX=" out))) (list "all" (string-append "PREFIX=" out)))
;; There are no tests. ;; There are no tests.
#:tests? #f)) #:tests? #f))
;; As per the Makefile (in projects/unix/Makefile):
(supported-systems '("i686-linux" "x86_64-linux"))
(home-page "https://www.mupen64plus.org/") (home-page "https://www.mupen64plus.org/")
(synopsis "Nintendo 64 emulator core library") (synopsis "Nintendo 64 emulator core library")
(description (description
@@ -2163,9 +2164,7 @@ as RetroArch.")
(lambda _ (lambda _
(install-file "mupen64plus_next_libretro.so" (install-file "mupen64plus_next_libretro.so"
(string-append #$output "/lib/libretro/"))))))) (string-append #$output "/lib/libretro/")))))))
(native-inputs (native-inputs (list nasm pkg-config))
(cons* pkg-config
(maybe-nasm)))
(inputs (list mesa libpng minizip unzip xxhash zlib)) (inputs (list mesa libpng minizip unzip xxhash zlib))
(home-page "https://github.com/libretro/mupen64plus-libretro-nx") (home-page "https://github.com/libretro/mupen64plus-libretro-nx")
(synopsis "Improved Mupen64Plus libretro core") (synopsis "Improved Mupen64Plus libretro core")
+4 -18
View File
@@ -2,7 +2,7 @@
;;; Copyright © 2017 Dave Love <fx@gnu.org> ;;; Copyright © 2017 Dave Love <fx@gnu.org>
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2019 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2019, 2023, 2026 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2019, 2023 Ludovic Courtès <ludo@gnu.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -226,19 +226,15 @@ testing InfiniBand networks.")
(string-append "--with-rdmacm=" (string-append "--with-rdmacm="
#$(this-package-input "rdma-core")) #$(this-package-input "rdma-core"))
(string-append "--with-rocm="
#$@(if (this-package-input "rocr-runtime") #$(this-package-input "rocr-runtime")))
#~((string-append "--with-rocm="
#$(this-package-input
"rocr-runtime")))
#~()))
;; Be verbose so that compiler flags are displayed. ;; Be verbose so that compiler flags are displayed.
#:make-flags #~'("V=1"))) #:make-flags #~'("V=1")))
(native-inputs (native-inputs
(list autoconf automake libtool pkg-config)) (list autoconf automake libtool pkg-config))
(inputs (inputs
(list numactl rdma-core)) (list numactl rdma-core rocr-runtime))
(synopsis "Optimized communication layer for message passing in HPC") (synopsis "Optimized communication layer for message passing in HPC")
(description (description
"Unified Communication X (UCX) provides an optimized communication layer "Unified Communication X (UCX) provides an optimized communication layer
@@ -254,13 +250,3 @@ memory mechanisms for efficient intra-node communication.")
;; and x86_64 as supported. ;; and x86_64 as supported.
(supported-systems '("x86_64-linux" "aarch64-linux" "powerpc64le-linux" (supported-systems '("x86_64-linux" "aarch64-linux" "powerpc64le-linux"
"riscv64-linux")))) "riscv64-linux"))))
;; Note: ROCm support is kept separate to avoid a significant increase in
;; closure size: <https://codeberg.org/guix/guix/issues/7225>.
(define-public ucx-rocm
(package/inherit ucx
(name "ucx-rocm")
(inputs (modify-inputs inputs
(append rocr-runtime)))
(synopsis "Optimized communication layer for message passing in HPC (with
ROCm support)")))
+21 -17
View File
@@ -20,7 +20,6 @@
;;; Copyright © 2025 45mg <45mg.writes@gmail.com> ;;; Copyright © 2025 45mg <45mg.writes@gmail.com>
;;; Copyright © 2025 Janneke Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2026 Giacomo Leidi <therewasa@fishinthecalculator.me> ;;; Copyright © 2026 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -1129,8 +1128,8 @@ transaction log.
(inherit jfsutils) (inherit jfsutils)
(name "jfsutils-static") (name "jfsutils-static")
(inputs (inputs
(modify-inputs inputs `(("util-linux:static" ,util-linux "static")
(prepend (list util-linux "static"))))))) ,@(package-inputs jfsutils))))))
(define-public jfs_fsck/static (define-public jfs_fsck/static
(package (package
@@ -1139,23 +1138,28 @@ transaction log.
(source #f) (source #f)
(build-system trivial-build-system) (build-system trivial-build-system)
(arguments (arguments
(list `(#:modules ((guix build utils))
#:modules '((guix build utils)) #:builder
#:builder (begin
#~(begin (use-modules (guix build utils)
(use-modules (guix build utils)) (ice-9 ftw)
(let* ((sbin (string-append #$output "/sbin")) (srfi srfi-26))
(fsck (string-append sbin "/jfs_fsck"))) (let* ((jfsutils (assoc-ref %build-inputs "jfsutils"))
(install-file (search-input-file %build-inputs "sbin/jfs_fsck") (fsck "jfs_fsck")
sbin) (out (assoc-ref %outputs "out"))
(remove-store-references fsck) (sbin (string-append out "/sbin")))
(chmod fsck #o555))))) (mkdir-p sbin)
(with-directory-excursion sbin
(install-file (string-append jfsutils "/sbin/" fsck)
".")
(remove-store-references fsck)
(chmod fsck #o555))
#t))))
(inputs (inputs
(list jfsutils/static)) `(("jfsutils" ,jfsutils/static)))
(home-page (package-home-page jfsutils)) (home-page (package-home-page jfsutils))
(synopsis "Statically-linked jfs_fsck command from jfsutils") (synopsis "Statically-linked jfs_fsck command from jfsutils")
(description (description "This package provides statically-linked jfs_fsck command taken
"This package provides statically-linked jfs_fsck command taken
from the jfsutils package. It is meant to be used in initrds.") from the jfsutils package. It is meant to be used in initrds.")
(license (package-license jfsutils)))) (license (package-license jfsutils))))
+1 -1
View File
@@ -1159,10 +1159,10 @@ Executables included are:
(native-inputs (native-inputs
(append (append
(list acpica (list acpica
nasm
perl perl
python-3 python-3
(list util-linux "lib")) (list util-linux "lib"))
(maybe-nasm (string-append arch "-" arch))
(if (not (string-prefix? arch (%current-system))) (if (not (string-prefix? arch (%current-system)))
(if (string=? arch "armhf") (if (string=? arch "armhf")
(list (cross-gcc "arm-linux-gnueabihf") (list (cross-gcc "arm-linux-gnueabihf")
+5 -6
View File
@@ -12,7 +12,7 @@
;;; Copyright © 2019, 2020, 2022 Marius Bakke <marius@gnu.org> ;;; Copyright © 2019, 2020, 2022 Marius Bakke <marius@gnu.org>
;;; Copyright © 2020 Roel Janssen <roel@gnu.org> ;;; Copyright © 2020 Roel Janssen <roel@gnu.org>
;;; Copyright © 2020, 2021, 2024 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; Copyright © 2020, 2021, 2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2021-2026 Maxim Cournoyer <maxim@guixotic.coop> ;;; Copyright © 2021-2025 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev> ;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev>
;;; Copyright © 2022 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2022 Eric Bavier <bavier@posteo.net>
;;; Copyright © 2022 Felipe Balbi <balbi@kernel.org> ;;; Copyright © 2022 Felipe Balbi <balbi@kernel.org>
@@ -1382,15 +1382,14 @@ Font Format (WOFF).")
(hidden-package (hidden-package
(package (package
(name "fontconfig-minimal") (name "fontconfig-minimal")
(version "2.17.1") (version "2.16.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://gitlab.freedesktop.org/api/v4/projects/890" "https://www.freedesktop.org/software/"
"/packages/generic/fontconfig/" version "/fontconfig-" "fontconfig/release/fontconfig-" version ".tar.xz"))
version ".tar.xz"))
(sha256 (base32 (sha256 (base32
"0hd5dw15q0i7518w1zqjcvyhvmlcf3ycv6df0ny1zz7zyj9swp4z")) "086jdsdxmc9ryr0n0dmgs0vfnkhkxxw5hsgpr888pfn9biaxqcva"))
(patches (search-patches "fontconfig-cache-ignore-mtime.patch")))) (patches (search-patches "fontconfig-cache-ignore-mtime.patch"))))
(build-system gnu-build-system) (build-system gnu-build-system)
;; In Requires or Requires.private of fontconfig.pc. ;; In Requires or Requires.private of fontconfig.pc.
+47 -89
View File
@@ -43,8 +43,6 @@
;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2025 wvlab <me@wvlab.xyz> ;;; Copyright © 2025 wvlab <me@wvlab.xyz>
;;; Copyright © 2025 jgart <jgart@dismail.de> ;;; Copyright © 2025 jgart <jgart@dismail.de>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; Copyright © 2026 Luis Guilherme Coelho <lgcoelho@disroot.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -794,16 +792,16 @@ the freedesktop.org XDG Base Directory specification.")
(define-public elogind (define-public elogind
(package (package
(name "elogind") (name "elogind")
(version "257.14") (version "255.17")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/elogind/elogind") (url "https://github.com/elogind/elogind")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"16cbkkia2wmcjwqxgzl714igi9sgpcl4sdvag388vlh941136bs9")))) "0cb6p559281dzh24is91v6d4v4kz45yhyizibi4sfql9nign865h"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:configure-flags `(#:configure-flags
@@ -3055,10 +3053,10 @@ useful with system integration.")
"0zs4z7l9b57jldwz0ban77f3c2zq43ambd0dssf5qg9i216f9lmj")))) "0zs4z7l9b57jldwz0ban77f3c2zq43ambd0dssf5qg9i216f9lmj"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
(list dbus-test-runner `(("dbus-test-runner" ,dbus-test-runner)
(list glib "bin") ("glib:bin" ,glib "bin")
pkg-config ("pkg-config" ,pkg-config)
xorg-server-for-tests)) ("xvfb" ,xorg-server-for-tests)))
(inputs (inputs
(list gtk+ glib)) (list gtk+ glib))
(arguments (arguments
@@ -3302,7 +3300,6 @@ compatible with the well-known scripts of the same name.")
(list gettext-minimal (list gettext-minimal
`(,glib "bin") `(,glib "bin")
gst-plugins-good ;for wavparse plugin gst-plugins-good ;for wavparse plugin
(librsvg-for-system) ;SVG loader needed for one test
pkg-config pkg-config
python python
python-dbusmock python-dbusmock
@@ -3420,50 +3417,50 @@ interfaces.")
(define-public xdg-desktop-portal-wlr (define-public xdg-desktop-portal-wlr
(package (package
(name "xdg-desktop-portal-wlr") (name "xdg-desktop-portal-wlr")
(version "0.8.2") (version "0.7.1")
(source (source (origin
(origin (method git-fetch)
(method git-fetch) (uri (git-reference
(uri (git-reference (url "https://github.com/emersion/xdg-desktop-portal-wlr")
(url "https://github.com/emersion/xdg-desktop-portal-wlr") (commit (string-append "v" version))))
(commit (string-append "v" version)))) (file-name (git-file-name name version))
(file-name (git-file-name name version)) (sha256
(sha256 (base32
(base32 "1jj0a9s3h3i04qsxkhcpxjzbb17hs9ngdy7wkypja09233zdz10w")) "1mbq3czka9swwmfaasnaj89y2m254p3qa522ayclh688jdwh70hq"))
(patches (search-patches "xdg-desktop-portal-wlr-harcoded-length.patch")))) (patches (search-patches "xdg-desktop-portal-wlr-harcoded-length.patch"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list `(#:configure-flags
#:configure-flags '("-Dsystemd=disabled"
#~(list "-Dsystemd=disabled" "-Dsd-bus-provider=libelogind")
"-Dsd-bus-provider=libelogind") #:phases
#:phases (modify-phases %standard-phases
#~(modify-phases %standard-phases (add-after 'unpack 'hardcode-binaries
(add-after 'unpack 'hardcode-binaries (lambda* (#:key inputs #:allow-other-keys)
(lambda* (#:key inputs #:allow-other-keys) (let ((sh (search-input-file inputs "/bin/sh"))
(let ((sh (search-input-file inputs "/bin/sh")) (grim (search-input-file inputs "/bin/grim"))
(grim (search-input-file inputs "/bin/grim")) (slurp (search-input-file inputs "/bin/slurp")))
(slurp (search-input-file inputs "/bin/slurp"))) (substitute* "src/screenshot/screenshot.c"
(substitute* '("src/screencast/chooser.c" (("grim") grim)
"src/screenshot/screenshot.c") (("slurp") slurp)
(("grim") grim) (("execl\\(\"/bin/sh\", \"/bin/sh\"")
(("slurp") slurp) (string-append "execl(\"" sh "\", \"" sh "\"")))
(("/bin/sh") sh)) (substitute* "src/screencast/screencast.c"
(substitute* "src/screencast/screencast.c" (("execvp\\(\"sh")
(("execvp\\(\"sh") (string-append "execvp(\"" sh))))))
(format #f "execvp(\"~a" sh)))))) (add-after 'install 'install-documentation
(add-after 'install 'install-documentation (lambda* (#:key outputs #:allow-other-keys)
(lambda _ (install-file "../source/README.md"
(install-file "../source/README.md" (string-append (assoc-ref outputs "out")
(string-append #$output "/share/doc/" "/share/doc/" ,name)))))))
#$name))))))) (native-inputs
(native-inputs (list cmake-minimal pkg-config scdoc)) (list cmake-minimal pkg-config scdoc))
(inputs (list bash-minimal (inputs (list elogind
elogind bash-minimal
grim grim
iniparser iniparser
libinih
mesa mesa
libinih
pipewire pipewire
slurp slurp
wayland wayland
@@ -3477,45 +3474,6 @@ remote-desktop @code{xdg-desktop-portal} interfaces for wlroots based
compositors.") compositors.")
(license license:expat))) (license license:expat)))
(define-public xdg-desktop-portal-termfilechooser
(package
(name "xdg-desktop-portal-termfilechooser")
(version "1.3.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/hunkyburrito/xdg-desktop-portal-termfilechooser")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1wvmwl678fr5pxz7x248pm5v4jd3bycz8nqa2q87akys5b9d1xpd"))))
(build-system meson-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(add-after 'install 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(let ((sed (search-input-file inputs "/bin/sed")))
(substitute* (find-files #$output "-wrapper\\.sh")
((" sed") (string-append " " sed)))))))))
(native-inputs
(list cmake-minimal
pkg-config
scdoc))
(inputs
(list basu
libinih
sed))
(home-page "https://github.com/hunkyburrito/xdg-desktop-portal-termfilechooser")
(synopsis "@code{xdg-desktop-portal} backend for choosing files with your
favorite terminal file chooser")
(description
"This package provides a backend implementation for xdg-desktop-portal that
allows using your preferred terminal file manager as file chooser in other
applications.")
(license license:expat)))
(define-public poweralertd (define-public poweralertd
(package (package
(name "poweralertd") (name "poweralertd")
+50 -134
View File
@@ -227,7 +227,6 @@
#:use-module (gnu packages shells) #:use-module (gnu packages shells)
#:use-module (gnu packages sqlite) #:use-module (gnu packages sqlite)
#:use-module (gnu packages squirrel) #:use-module (gnu packages squirrel)
#:use-module (gnu packages stb)
#:use-module (gnu packages swig) #:use-module (gnu packages swig)
#:use-module (gnu packages tcl) #:use-module (gnu packages tcl)
#:use-module (gnu packages terminals) #:use-module (gnu packages terminals)
@@ -553,14 +552,14 @@ use with @code{udev-service-type}.")
(define-public armagetronad (define-public armagetronad
(package (package
(name "armagetronad") (name "armagetronad")
(version "0.2.9.3.0") (version "0.2.9.2.3")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://sourceforge/armagetronad/stable/" (uri (string-append "mirror://sourceforge/armagetronad/stable/"
version "/armagetronad-" version ".tbz")) version "/armagetronad-" version ".tbz"))
(sha256 (sha256
(base32 (base32
"1q1zlbhbcimr6bw0ms1pr8hz4q850ivi3hvxn3467jfgiq22f3cy")))) "0a6rlp2lj5bp7pg1yf8brjyb3mw7nqp3amj19wvz3xni21bbc31k"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
(list #:configure-flags (list #:configure-flags
@@ -577,7 +576,6 @@ use with @code{udev-service-type}.")
(("^install_link .*BINDIR.*") ""))))))) (("^install_link .*BINDIR.*") "")))))))
(native-inputs (list pkg-config)) (native-inputs (list pkg-config))
(inputs (list libxml2 (inputs (list libxml2
curl
(sdl-union (list sdl sdl-image sdl-mixer)) (sdl-union (list sdl sdl-image sdl-mixer))
freeglut freeglut
libpng libpng
@@ -1235,11 +1233,11 @@ original rogue game found on 4.2BSD.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public sgt-puzzles (define-public sgt-puzzles
(let ((commit "06e37f1e334d85c7c779f79ef9e484ff2f708269") (let ((commit "28032bd5a0d3dc409eb225b8bdb23fd0b18a28d7")
(revision "0")) (revision "0"))
(package (package
(name "sgt-puzzles") (name "sgt-puzzles")
(version (git-version "20260308" revision commit)) (version (git-version "20251120" revision commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -1248,7 +1246,7 @@ original rogue game found on 4.2BSD.")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "141d57s1va2ng7nxjzdgmsqh5mdb0mpy3yiqaj4rplya8xlhm34h")))) (base32 "0533fzzagmi7g7sw1fdgpzy6gjpif77gxf3avz1qnjsma5gq7f2l"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
(list (list
@@ -3409,8 +3407,7 @@ and defeat them with your bubbles!")
"SamTSE/Sources/Engine/Engine.cpp") "SamTSE/Sources/Engine/Engine.cpp")
(("@OUTPUT_DIR@") #$output))))))) (("@OUTPUT_DIR@") #$output)))))))
(inputs (list sdl2 libvorbis)) (inputs (list sdl2 libvorbis))
(native-inputs (cons* flex bison imagemagick (native-inputs (list flex bison nasm imagemagick))
(maybe-nasm)))
(home-page "https://github.com/tx00100xt/SeriousSamClassic") (home-page "https://github.com/tx00100xt/SeriousSamClassic")
(synopsis "SeriousSam engine and Serious Sam: TFE and TSE") (synopsis "SeriousSam engine and Serious Sam: TFE and TSE")
(description (description
@@ -4131,7 +4128,7 @@ a C library, so they can easily be integrated into other programs.")
(define-public taisei (define-public taisei
(package (package
(name "taisei") (name "taisei")
(version "1.4.4") (version "1.4.2")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -4139,7 +4136,7 @@ a C library, so they can easily be integrated into other programs.")
"taisei/releases/download/v" version "taisei/releases/download/v" version
"/taisei-" version ".tar.xz")) "/taisei-" version ".tar.xz"))
(sha256 (sha256
(base32 "13b2ha8nsdzbydirvc7hw1q46jzhn6cx9b9spgk777swjlgx2vph")))) (base32 "19sgm175clkvpcv0b9p4jkjpfxqw0kyl2i5p8w63kwzqcjp9m1jx"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -4148,8 +4145,7 @@ a C library, so they can easily be integrated into other programs.")
"-Dr_gles30=enabled" "-Dr_gles30=enabled"
"-Dshader_transpiler=enabled"))) "-Dshader_transpiler=enabled")))
(native-inputs (native-inputs
(list cmake-minimal (list pkg-config
pkg-config
python python
python-docutils python-docutils
python-pygments python-pygments
@@ -4157,29 +4153,24 @@ a C library, so they can easily be integrated into other programs.")
(inputs (inputs
(list cglm (list cglm
freetype freetype
glslang
libdecor ; XXX: for sdl3
libpng libpng
libwebp libwebp
libzip libzip
mesa mesa
openssl openssl
opusfile opusfile
sdl3 sdl2
sdl2-mixer
shaderc shaderc
spirv-cross spirv-cross
spirv-tools ; for glslang
vulkan-loader ; XXX: for sdl3?
zlib zlib
(list zstd "lib"))) (list zstd "lib")))
(home-page "https://taisei-project.org/") (home-page "https://taisei-project.org/")
(synopsis "Shoot'em up fangame and libre clone of Touhou Project") (synopsis "Shoot'em up fangame and libre clone of Touhou Project")
(description (description
"Taisei is a vertical shoot'em up game, in which the player controls "The player controls a character (one of three: Good, Bad, and Dead),
one of three characters. While moving through stages, a large number of dodges the missiles (lots of it cover the screen, but the character's hitbox
enemies and even larger amounts of bullets appear that require careful is very small), and shoot at the adversaries that keep appear on the screen.")
maneuvers to dodge. By shooting the enemies, players receive powerups
for their characters, allowing them to shoot even more.")
(license (list (license (list
;; game ;; game
license:expat license:expat
@@ -4732,10 +4723,6 @@ for common mesh file formats, and collision detection.")
(url "https://github.com/thelaui/M.A.R.S.") (url "https://github.com/thelaui/M.A.R.S.")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(modules '((guix build utils)))
(snippet
#~(begin
(delete-file-recursively "ext_libs_for_windows")))
(sha256 (sha256
(base32 (base32
"0bdi4ja39rark742qvqixm8khai5k8qd84z5kzim9jcjdvvwyqj9")))) "0bdi4ja39rark742qvqixm8khai5k8qd84z5kzim9jcjdvvwyqj9"))))
@@ -4762,8 +4749,7 @@ for common mesh file formats, and collision detection.")
attractive physics. Players can battle each other or computer controlled attractive physics. Players can battle each other or computer controlled
enemies in different game modes such as space ball, death match, team death enemies in different game modes such as space ball, death match, team death
match, cannon keep, and grave-itation pit.") match, cannon keep, and grave-itation pit.")
(license (list license:gpl3+ (license license:gpl3+))))
license:cc-by-sa3.0))))) ;/data/audio/music
(define-public alienblaster (define-public alienblaster
(package (package
@@ -5349,124 +5335,54 @@ also available.")
(sha256 (sha256
(base32 "05aj09rm50xb6910zx6imarj8k728x9bpvpa7ydwgb4sj1nypil8")) (base32 "05aj09rm50xb6910zx6imarj8k728x9bpvpa7ydwgb4sj1nypil8"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet '(begin
'(begin (with-directory-excursion "thirdparty"
(with-directory-excursion "thirdparty" (delete-file-recursively "glm")
;; Delete third party ibraries, except these libraries: (substitute* "CMakeLists.txt"
;; glad: header file is not available in the system glad package. (("add_subdirectory\\(glm\\)")
;; imgui: configured with "srb2_imconfig.h". "find_package(glm REQUIRED)")))
;; libwebm: Not available in Guix. (with-directory-excursion "src"
;; renamenoise: Not available in Guix. (substitute* "CMakeLists.txt"
;; tracy: header files are not available in the system tracy (("glm::glm")
;; package. "glm")))))))
(for-each delete-file-recursively
'("discord-rpc"
"glm"
"nlohmann-json"
"overlay-ports/libyuv"
"tcbrindle_span"
"vma"
"volk"
"vulkan-headers"
"xmp-lite"))
;; Unbundle stb.
(with-directory-excursion "stb"
(for-each delete-file
'("include/stb_rect_pack.h"
"stb_vorbis.c"))
(substitute* "stb_rect_pack.c"
(("\"include\\/stb_rect_pack\\.h\"") "<stb_rect_pack.h>"))
(substitute* "CMakeLists.txt"
(("include\\/stb_rect_pack\\.h ") "")))
;; Find third party libraries from the system and do not add the
;; deleted directories.
(substitute* "CMakeLists.txt"
(("add_subdirectory\\((glm|discord-rpc|xmp-lite|fmt|volk)\\)"
_ keep)
(string-append "find_package(" keep " REQUIRED)"))
(("xmp-lite") "libxmp")
((".*nlohmann-json.*") "")
((".*tcbrindle_span.*") "")
((".*vulkan-headers.*") "")
((".*vma.*") "")))
(with-directory-excursion "src"
;; Link the system libraries instead of the unbundled ones.
(substitute* "CMakeLists.txt"
((".*tcbrindle::span.*") "")
(("glm::glm") "glm")
(("xmp-lite::xmp-lite") "xmp")
(("fmt::fmt-header-only") "fmt")
((".*nlohmann_json::nlohmann_json.*") "")))
;; Rename the icon to match with the executable file.
(rename-file "srb2.png" "ringracers.png")))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
(list (list
#:tests? #f ;There are no tests. #:tests? #f ;There are no tests.
#:configure-flags #:configure-flags
#~(list "-DSRB2_CONFIG_ENABLE_DISCORDRPC=OFF" #~(list "-DCMAKE_C_FLAGS_RELWITHDEBINFO='-O3 -g -DNDEBUG'"
"-DCMAKE_C_FLAGS_RELWITHDEBINFO='-O3 -g -DNDEBUG'"
"-DCMAKE_CXX_FLAGS_RELWITHDEBINFO='-O3 -g -DNDEBUG'") "-DCMAKE_CXX_FLAGS_RELWITHDEBINFO='-O3 -g -DNDEBUG'")
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'copy-stb_vorbis.c (add-after 'install 'move-and-wrap-binary
;; Install executable to $out/bin.
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(install-file (search-input-file inputs "/stb_vorbis.c") (with-directory-excursion #$output
"thirdparty/stb"))) (mkdir "bin")
(replace 'install (rename-file "ringracers" "bin/ringracers")
(lambda _ (wrap-program "bin/ringracers"
(install-file "bin/ringracers" (string-append #$output "/bin")) `("RINGRACERSWADDIR" =
(install-file "../source/ringracers.png" (,(assoc-ref inputs "ring-racers-data"))))))))))
(string-append #$output "/share/pixmaps")))) (native-inputs (list pkg-config))
(add-after 'install 'wrap-program (inputs (list glm
(lambda* (#:key inputs #:allow-other-keys)
(wrap-program (string-append #$output "/bin/ringracers")
`("RINGRACERSWADDIR" =
(,(assoc-ref inputs "ring-racers-data"))))))
(add-after 'wrap-program 'create-desktop-entry
(lambda _
(let* ((datadir (string-append #$output "/share"))
(appdir (string-append datadir "/applications")))
(mkdir-p appdir)
(make-desktop-entry-file (string-append appdir
"/ringracers.desktop")
#:name "Dr. Robotnik's Ring Racers"
#:comment "Technical kart racing game"
#:icon "ringracers"
#:exec (string-append #$output "/bin/ringracers")
#:startup-notify #f
#:categories '("Application" "Game"))))))))
(native-inputs
(list pkg-config
(package-source stb)))
(inputs (list bash-minimal
curl
fmt
glm
libogg libogg
libpng libpng
libvorbis libvorbis
libvpx libvpx
libxmp
libyuv libyuv
nlohmann-json
opus opus
ring-racers-data ring-racers-data
sdl2 sdl2
stb-rect-pack zlib
tcbrindle-span curl))
vulkan-headers (home-page "https://kartkrew.org")
vulkan-memory-allocator
vulkan-volk
zlib))
(home-page "https://www.kartkrew.org/")
(synopsis "Technical kart racing game") (synopsis "Technical kart racing game")
(description (description
"Dr.@: Robotnik's Ring Racers is a kart racing game drawing inspiration "Dr. Robotnik's Ring Racers is a kart racing game drawing inspiration from
from \"anti-gravity\" racers, fighting games, and traditional-style kart ``anti-gravity'' racers, fighting games, and traditional-style kart racing.
racing. Ring Racers is designed with an emphasis on player agency in the face Ring Racers is designed with an emphasis on player agency in the face of highly
of highly technical game-play challenges in both single-player and online technical game-play challenges in both single-player and online multiplayer
multiplayer modes.") modes.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public unknown-horizons (define-public unknown-horizons
@@ -5797,14 +5713,14 @@ world}, @uref{http://evolonline.org, Evol Online} and
(define-public openttd-engine (define-public openttd-engine
(package (package
(name "openttd-engine") (name "openttd-engine")
(version "15.3") (version "15.2")
(source (source
(origin (method url-fetch) (origin (method url-fetch)
(uri (string-append "https://cdn.openttd.org/openttd-releases/" (uri (string-append "https://cdn.openttd.org/openttd-releases/"
version "/openttd-" version "-source.tar.xz")) version "/openttd-" version "-source.tar.xz"))
(sha256 (sha256
(base32 (base32
"1rrvjxsr2dp9zr6b35ifiw41c0dwqqcaq90r0x18misrgpm1x8jy")))) "0xpzschcf562giqh3p8jj9gbi8chqrikdwgqqipabyn0nwbvd6nj"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(inputs (inputs
(list allegro (list allegro
@@ -6038,7 +5954,7 @@ Transport Tycoon Deluxe.")
(package (package
(inherit openttd) (inherit openttd)
(name "openttd-jgrpp") (name "openttd-jgrpp")
(version "0.72.0") (version "0.71.1")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -6047,7 +5963,7 @@ Transport Tycoon Deluxe.")
(commit (string-append "jgrpp-" version)))) (commit (string-append "jgrpp-" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0xbnnx03y8vhbgi6s7hsxhiqhsy6rhj7fypq6dfqh0z74m5bldkf")))) (base32 "1cy1ghc1mc61hdz8lykx2ggs5nld30jdgj8y4vdli2v1ffhy7xy9"))))
(inputs (modify-inputs inputs (inputs (modify-inputs inputs
(append zstd harfbuzz))) (append zstd harfbuzz)))
(arguments (arguments
@@ -10225,7 +10141,7 @@ their own levels.")
(define-public libmanette (define-public libmanette
(package (package
(name "libmanette") (name "libmanette")
(version "0.2.13") (version "0.2.12")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/libmanette/" (uri (string-append "mirror://gnome/sources/libmanette/"
@@ -10233,7 +10149,7 @@ their own levels.")
"libmanette-" version ".tar.xz")) "libmanette-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"1bnqfxd9b5vff9256f8vxd404fkvbvc5gxva6qcjj2fyw3yw4z18")))) "1n513s8ksjbrwqq7k46f3550avx11gly3a85shsdrwc0f4k4kcs8"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (native-inputs
(list `(,glib "bin") ; for glib-compile-resources (list `(,glib "bin") ; for glib-compile-resources
+14 -82
View File
@@ -425,29 +425,14 @@ hierarchical hexagonal geospatial indexing system")
(base32 (base32
"00qdk9a4048pzfj2rhzkfw3lvm642znf6kr4x29i3d94494pxsnn")))) "00qdk9a4048pzfj2rhzkfw3lvm642znf6kr4x29i3d94494pxsnn"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments `(#:phases
`(#:phases (modify-phases %standard-phases
(modify-phases %standard-phases (add-after
,@(if (or (target-x86-32?) (target-arm32?)) 'unpack 'patch-test-shebangs
'((add-after 'unpack 'disable-broken-tests (lambda _
(lambda _ (substitute* '("tests/xmltester/testrunner.sh"
;; This test fails due to limited accuracy. "tests/xmltester/safe_to_xml.sh")
(delete-file "tests/xmltester/tests/general/TestCentroid.xml") (("/bin/sh") (which "sh"))))))))
(with-directory-excursion "tests/unit"
;; These also fail due to limited accuracy.
(delete-file "algorithm/MinimumAreaRectangleTest.cpp")
(delete-file "capi/GEOSMinimumRotatedRectangleTest.cpp")
;; It is unclear why these fail, but I'm guessing:
;; limited accuracy.
(delete-file "linearref/LengthIndexedLineTest.cpp")
(delete-file "math/DDTest.cpp")))))
'())
(add-after
'unpack 'patch-test-shebangs
(lambda _
(substitute* '("tests/xmltester/testrunner.sh"
"tests/xmltester/safe_to_xml.sh")
(("/bin/sh") (which "sh"))))))))
(inputs (inputs
(list glib)) (list glib))
(home-page "https://libgeos.org/") (home-page "https://libgeos.org/")
@@ -970,29 +955,6 @@ hydrology and waste deposition.")
(base32 (base32
"03r6mspfv22fs4x4jcgv25v9gsj5k6zy8incvyf94qf50g47s2bc")))) "03r6mspfv22fs4x4jcgv25v9gsj5k6zy8incvyf94qf50g47s2bc"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments
(if (target-32bit?)
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'patch-tests
(lambda _
;; These regression tests fail due to accuracy problems.
(substitute* "test/unit/test_factory.cpp"
(("^TEST\\(factory, AuthorityFactory_createUnitOfMeasure_linear_us_survey_foot\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
(substitute* "test/unit/test_grids.cpp"
(("^TEST_F\\(GridTest, VerticalShiftGridSet_gtx\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
(substitute* "test/unit/test_defmodel.cpp"
(("^TEST\\(defmodel, evaluator_horizontal_unit_metre\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
;; These regression tests fail due to accuracy problems.
(substitute* "test/CMakeLists.txt"
(("proj_add_gie_test\\(\"4D-API-cs2cs-style\".+") "")
(("proj_add_gie_test\\(\"Builtins\".+") "")
(("proj_add_gie_test\\(\"peirce_q\".+") ""))))))
'()))
(native-inputs (list googletest pkg-config)) (native-inputs (list googletest pkg-config))
(propagated-inputs (list curl libtiff sqlite)) ;required by proj.pc (propagated-inputs (list curl libtiff sqlite)) ;required by proj.pc
(home-page "https://proj.org/") (home-page "https://proj.org/")
@@ -1022,34 +984,7 @@ lets developers use the functionality of Proj in their own software.")
version ".tar.gz")) version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"1g0hkpiablvhsmw0kn5frwgdir3q7avc45p6lc1zhhhzkv5ikydh")))) "1g0hkpiablvhsmw0kn5frwgdir3q7avc45p6lc1zhhhzkv5ikydh"))))))
(arguments
(if (target-32bit?)
(list
#:phases
'(modify-phases %standard-phases
(add-after 'unpack 'patch-tests
(lambda _
;; These regression tests fail due to accuracy problems.
(substitute* "test/unit/test_factory.cpp"
(("^TEST\\(factory, AuthorityFactory_createUnitOfMeasure_linear_us_survey_foot\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
(substitute* "test/unit/test_grids.cpp"
(("^TEST_F\\(GridTest, VerticalShiftGridSet_gtx\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
(substitute* "test/unit/test_defmodel.cpp"
(("^TEST\\(defmodel, evaluator_horizontal_unit_metre\\) \\{" m)
(string-append m "\nGTEST_SKIP();\n")))
;; These regression tests fail due to accuracy problems.
(substitute* "test/CMakeLists.txt"
(("proj_add_gie_test\\(\"4D-API-cs2cs-style\".+") "")
(("proj_add_gie_test\\(\"Builtins\".+") "")
(("proj_add_gie_test\\(\"peirce_q\".+") "")
(("proj_add_gie_test\\(\"adams_ws2\".+") ""))
(substitute* "test/cli/CMakeLists.txt"
(("proj_add_test_script_sh\\(\"testvarious\" CS2CS_BIN\\)") ""))))))
'()))))
(define-public python-obspy (define-public python-obspy
(package (package
@@ -1284,23 +1219,20 @@ readily with other Python GIS packages such as pyproj, Rtree, and Shapely.")
(define-public python-geopack (define-public python-geopack
(package (package
(name "python-geopack") (name "python-geopack")
(version "1.0.12") (version "1.0.10")
(source (source
(origin (origin
(method git-fetch) (method url-fetch)
(uri (git-reference (uri (pypi-uri "geopack" version))
(url "https://github.com/tsssss/geopack")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 "0ap5j4359xxjkbz06y097yq5d37sxcwlnlsfwrv6dvza7ydmgcgg")))) (base32 "0mryjp7m4h99qlpvnn40s81sygr73qcv8rkmjp9pcli1gz829kjf"))))
(build-system pyproject-build-system) (build-system pyproject-build-system)
(arguments (arguments
(list (list
;; XXX Reported upstream <https://github.com/tsssss/geopack/issues/21>. ;; XXX Reported upstream <https://github.com/tsssss/geopack/issues/21>.
#:tests? #f)) #:tests? #f))
(native-inputs (native-inputs
(list python-setuptools)) (list python-pytest python-setuptools python-wheel))
(propagated-inputs (propagated-inputs
(list python-numpy python-scipy)) (list python-numpy python-scipy))
(home-page "https://github.com/tsssss/geopack") (home-page "https://github.com/tsssss/geopack")
+22 -11
View File
@@ -50,15 +50,15 @@
(define-public lcms (define-public lcms
(package (package
(name "lcms") (name "lcms")
(version "2.16.0") (version "2.13.1")
(source (source (origin
(origin (method url-fetch)
(method url-fetch) (uri (string-append "mirror://sourceforge/lcms/lcms/"
(uri (string-append "mirror://sourceforge/lcms/lcms/" (version-major+minor version)
(version-major+minor version) "/lcms2-" version ".tar.gz"))
"/lcms2-" (version-major+minor version) ".tar.gz")) (sha256
(sha256 (base32
(base32 "0lasskcj7k0sp0z7cpnwwisp826j51i1l7v322hcxd5rv15d6wyq")))) "121v414bg2zk0fcwx0kigr2l6nxl88nmblfn3gq5lz5jwybffwyl"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:configure-flags '("--disable-static"))) '(#:configure-flags '("--disable-static")))
@@ -73,8 +73,19 @@ Consortium standard (ICC), approved as ISO 15076-1.")
(home-page "https://www.littlecms.com/") (home-page "https://www.littlecms.com/")
(properties '((cpe-name . "little_cms_color_engine"))))) (properties '((cpe-name . "little_cms_color_engine")))))
;; Can be removed after 2027/05/01. (define-public lcms-next
(define-deprecated-package lcms-next lcms) (package
(inherit lcms)
(name "lcms-next")
(version "2.16.0")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://sourceforge/lcms/lcms/"
(version-major+minor version)
"/lcms2-" (version-major+minor version) ".tar.gz"))
(sha256
(base32 "0lasskcj7k0sp0z7cpnwwisp826j51i1l7v322hcxd5rv15d6wyq"))))))
(define-public libpaper (define-public libpaper
(package (package
+2 -2
View File
@@ -994,7 +994,7 @@ useful for C++.")
(define-public python-pygobject (define-public python-pygobject
(package (package
(name "python-pygobject") (name "python-pygobject")
(version "3.54.5") (version "3.54.3")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -1003,7 +1003,7 @@ useful for C++.")
"/pygobject-" version ".tar.gz")) "/pygobject-" version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"11dm5yi80v143dn21bayqxb53w67hk1lishmrw35c97m91inyrdn")))) "1rxsj85xl73a14vz7s30sy8lx9sswd2j2hgj3i4mcz8g989hknm8"))))
(build-system meson-build-system) (build-system meson-build-system)
;; The tests require mutter, which would introduce a circular dependency. ;; The tests require mutter, which would introduce a circular dependency.
(arguments (list #:tests? #f)) (arguments (list #:tests? #f))
+4 -4
View File
@@ -682,7 +682,7 @@ and a high score table.")
(define-public komikku (define-public komikku
(package (package
(name "komikku") (name "komikku")
(version "50.3.0") (version "50.1.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -692,7 +692,7 @@ and a high score table.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0hm1infvdsms193g2yp7qw7lrsxjsx5zziib8hgch34y6dbhfhf1")))) "0q858zvpqy32nb2lxdfy1k6fgal46kp634534fg983192fyk1pqp"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -780,7 +780,7 @@ developed with the aim of being used with the Librem 5 phone.")
(define-public komikku-servers (define-public komikku-servers
(package (package
(name "komikku-servers") (name "komikku-servers")
(version "50.3.0") (version "50.1.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -790,7 +790,7 @@ developed with the aim of being used with the Librem 5 phone.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0hm1infvdsms193g2yp7qw7lrsxjsx5zziib8hgch34y6dbhfhf1")))) "0q858zvpqy32nb2lxdfy1k6fgal46kp634534fg983192fyk1pqp"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list (list
+169 -232
View File
@@ -215,7 +215,6 @@
#:use-module (gnu packages readline) #:use-module (gnu packages readline)
#:use-module (gnu packages ruby-xyz) #:use-module (gnu packages ruby-xyz)
#:use-module (gnu packages rust) #:use-module (gnu packages rust)
#:use-module (gnu packages rust-apps)
#:use-module (gnu packages samba) #:use-module (gnu packages samba)
#:use-module (gnu packages scanner) #:use-module (gnu packages scanner)
#:use-module (gnu packages sdl) #:use-module (gnu packages sdl)
@@ -2085,7 +2084,7 @@ offline sources, providing a centralized place for managing your contacts.")
(define-public gnome-desktop (define-public gnome-desktop
(package (package
(name "gnome-desktop") (name "gnome-desktop")
(version "44.5") (version "44.4")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -2094,16 +2093,11 @@ offline sources, providing a centralized place for managing your contacts.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0br33ma7l45nr8yp9bcjqgy9zrj57yy2fnkc0b0yh0rsdrd9kq10")))) "1129nh32ga5vv869fwby3n2lvj2chd9wys8j1jdnisr8lg3bk30x"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
'(#:phases '(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'disable-problematic-tests
(lambda _
;; The languages test fails due to Guix defaulting to C.UTF-8.
(substitute* "tests/meson.build"
((".*'languages':.*") ""))))
(add-before 'configure 'patch-path (add-before 'configure 'patch-path
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(substitute* "libgnome-desktop/gnome-languages.c" (substitute* "libgnome-desktop/gnome-languages.c"
@@ -2693,7 +2687,7 @@ and single page document formats like PDF and DejaVu.")
(define-public gsettings-desktop-schemas (define-public gsettings-desktop-schemas
(package (package
(name "gsettings-desktop-schemas") (name "gsettings-desktop-schemas")
(version "49.1") (version "48.0")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -2702,7 +2696,7 @@ and single page document formats like PDF and DejaVu.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0qqfxml3kqg87ly5w8rhqalin6qv20jcn2gqkdmhga75sn1pyykp")))) "1lqv5mn7r1c8nxm6dfxgvk56r2sqfgafkj5jm1jzh65z2dc1b3z6"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:phases (modify-phases %standard-phases `(#:phases (modify-phases %standard-phases
@@ -2880,7 +2874,7 @@ GNOME and KDE desktops to the icon names proposed in the specification.")
(define-public adwaita-icon-theme (define-public adwaita-icon-theme
(package (package
(name "adwaita-icon-theme") (name "adwaita-icon-theme")
(version "49.0") (version "48.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -2888,7 +2882,7 @@ GNOME and KDE desktops to the icon names proposed in the specification.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0p3mj6bl8wp1cri2qdszqrqqs47irh7qvajr5yaaly5js5hn85k5")))) "04kfi8qpvghhmj83p03k509pnsp8ywlrii1qm0xv056dxf39pznb"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list #:phases (list #:phases
@@ -3227,7 +3221,6 @@ API add-ons to make GTK+ widgets OpenGL-capable.")
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
#:glib-or-gtk? #t
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'skip-gtk-update-icon-cache (add-after 'unpack 'skip-gtk-update-icon-cache
@@ -3235,13 +3228,17 @@ API add-ons to make GTK+ widgets OpenGL-capable.")
(lambda _ (lambda _
(substitute* "meson_post_install.py" (substitute* "meson_post_install.py"
(("gtk-update-icon-cache") "true")))) (("gtk-update-icon-cache") "true"))))
(add-after 'unpack 'skip-modules-test
;; This test fails with 'GLib-GObject-FATAL-CRITICAL: cannot #$@(if (this-package-input "gjs")
;; register existing type 'GIRepository' since the GNOME 49 '()
;; upgrades. '((add-after 'unpack 'skip-gjs-test
(lambda _ (lambda _
(substitute* "tests/meson.build" ;; When the optional dependency on GJS is missing, skip
((".*'modules', .*") "")))) ;; the GJS plugin tests.
(substitute* "tests/modules.c"
(("g_test_add.*JavaScript.*" all)
(string-append "// " all "\n")))
(delete-file "tests/catalogs/gjsplugin.xml")))))
(add-before 'check 'pre-check (add-before 'check 'pre-check
(lambda _ (lambda _
(setenv "HOME" "/tmp") (setenv "HOME" "/tmp")
@@ -3497,7 +3494,7 @@ XML/CSS rendering engine.")
(define-public libgsf (define-public libgsf
(package (package
(name "libgsf") (name "libgsf")
(version "1.14.55") (version "1.14.54")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -3505,7 +3502,7 @@ XML/CSS rendering engine.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0c91l0l3camxpanpgp634nd68vz3v0jbk9bxs5dfmlsvl6xhmmkl")))) "08vny43clswk95djch50z17hdnns2p8qc93if6qcy4r598k6k26i"))))
(build-system glib-or-gtk-build-system) (build-system glib-or-gtk-build-system)
(outputs '("out" "bin" "doc")) (outputs '("out" "bin" "doc"))
(arguments (arguments
@@ -3553,7 +3550,7 @@ for dealing with different structured file formats.")
(define-public librsvg (define-public librsvg
(package (package
(name "librsvg") (name "librsvg")
(version "2.61.4") (version "2.58.5")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/librsvg/" (uri (string-append "mirror://gnome/sources/librsvg/"
@@ -3561,31 +3558,45 @@ for dealing with different structured file formats.")
"librsvg-" version ".tar.xz")) "librsvg-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"036afbhd2h4brbd491kmgig0ib1df3s7j9bx8349b3zjs4lfm87w")))) "0ym2yg94sc7ralh1kwqqrhz3wcc51079z90mbx0qrls7wfh36hi2"))))
(build-system meson-build-system) (build-system gnu-build-system)
(outputs '("out" "doc" "debug")) (outputs '("out" "doc" "debug"))
(arguments (arguments
(list (list
#:configure-flags #:configure-flags
#~(list #$@(if (%current-target-system) #~(list "--disable-static"
#~( ;; g-ir-scanner can't import its modules #$@(if (%current-target-system)
#~(;; g-ir-scanner can't import its modules
;; and vala currently can't be cross-compiled. ;; and vala currently can't be cross-compiled.
"-Dintrospection=false" "--enable-introspection=no"
"-Dvala=false" "--enable-vala=no"
;; These two are necessary for cross-compiling.
(string-append
"--build=" #$(nix-system->gnu-triplet
(%current-system)))
(string-append
"--host=" #$(%current-target-system))
;; This is needed when cross-compiling for some ;; This is needed when cross-compiling for some
;; architectures as autoconf and rust disagree about ;; architectures as autoconf and rust disagree about
;; the target triplet. ;; the target triplet.
(string-append "-Dtriplet=" (string-append "RUST_TARGET="
#$(platform-rust-target #$(platform-rust-target
(lookup-platform-by-target (lookup-platform-by-target
(%current-target-system))))) (%current-target-system)))))
#~()) #~("--enable-vala")))
"-Dpixbuf-loader=enabled") ;disabled since 2.61.2 #:make-flags
#:imported-modules (append %cargo-build-system-modules #~(list (string-append "CC=" #$(cc-for-target))
%meson-build-system-modules) (string-append "PKG_CONFIG=" #$(pkg-config-for-target))
#$@(if (%current-target-system)
#~((string-append "RUST_TARGET="
#$(platform-rust-target
(lookup-platform-by-target
(%current-target-system)))))
#~()))
#:imported-modules %cargo-build-system-modules
#:modules #:modules
'(((guix build cargo-build-system) #:prefix cargo:) '(((guix build cargo-build-system) #:prefix cargo:)
(guix build meson-build-system) (guix build gnu-build-system)
(guix build utils)) (guix build utils))
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
@@ -3602,19 +3613,12 @@ for dealing with different structured file formats.")
(lambda _ (lambda _
;; Something about the build environment resists building ;; Something about the build environment resists building
;; successfully with the '--locked' flag. ;; successfully with the '--locked' flag.
(substitute* "meson/cargo_wrapper.py" (substitute* '("Makefile.am" "Makefile.in")
(("\"--locked\",?") "")) (("--locked") ""))))
;; This is needed so Cargo embeds the correct RUNPATH (add-after 'unpack 'loosen-test-boundaries
;; information to the binaries it produces,
;; e.g. libpixbufloader_svg.so.
(setenv "RUSTFLAGS"
(string-append "-C link-arg=-Wl,-rpath,"
#$output "/lib"))))
(add-after 'unpack 'prepare-for-tests
(lambda _ (lambda _
(setenv "HOME" "/tmp") ;placate fontconfig errors
;; Increase reftest tolerance a bit to account for different ;; Increase reftest tolerance a bit to account for different
;; libraries like pango, etc. ;; harfbuzz, pango, etc.
(setenv "RSVG_TEST_TOLERANCE" "20") (setenv "RSVG_TEST_TOLERANCE" "20")
;; These tests fail even after loosening the tolerance. ;; These tests fail even after loosening the tolerance.
(substitute* "rsvg/tests/reference.rs" (substitute* "rsvg/tests/reference.rs"
@@ -3622,16 +3626,19 @@ for dealing with different structured file formats.")
((".*rtl_tspan_svg.*") "")))) ((".*rtl_tspan_svg.*") ""))))
(add-before 'configure 'pre-configure (add-before 'configure 'pre-configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(substitute* "gdk-pixbuf-loader/meson.build" (substitute* "gdk-pixbuf-loader/Makefile.in"
;; By default the gdk-pixbuf loader is installed under ;; By default the gdk-pixbuf loader is installed under
;; gdk-pixbuf's prefix. Work around that. ;; gdk-pixbuf's prefix. Work around that.
(("pixbuf_dep.get_variable.*'gdk_pixbuf_moduledir'.*),") (("gdk_pixbuf_moduledir = .*$")
(format #f "get_option('prefix') / '~a'," (string-append "gdk_pixbuf_moduledir = "
#$%gdk-pixbuf-loaders-directory)) "$(prefix)/"
(("pixbuf_dep.get_variable.*'gdk_pixbuf_query_loaders'.*),") #$(dirname %gdk-pixbuf-loaders-cache-file) "/"
(format #f "'~a'," (which "gdk-pixbuf-query-loaders"))) "loaders\n")))
(("pixbuf_dep.get_variable.*'gdk_pixbuf_cache_file'.*)") (substitute* "configure"
(format #f "prefix / '~a'" #$%gdk-pixbuf-loaders-cache-file))))) (("gdk_pixbuf_cache_file=.*")
(string-append "gdk_pixbuf_cache_file="
#$output "/"
#$%gdk-pixbuf-loaders-cache-file "\n")))))
(add-after 'unpack 'prepare-cargo-build-system (add-after 'unpack 'prepare-cargo-build-system
(lambda args (lambda args
(for-each (for-each
@@ -3643,30 +3650,23 @@ for dealing with different structured file formats.")
'(unpack-rust-crates '(unpack-rust-crates
configure configure
check-for-pregenerated-files check-for-pregenerated-files
patch-cargo-checksums)))) patch-cargo-checksums)))))))
(add-after 'install 'sanitize-pkg-config-files
(lambda _
(substitute* (find-files #$output "\\.pc$")
(("^Requires.private:.*") "")))))))
(native-inputs (native-inputs
(append (append
(list gdk-pixbuf (list gdk-pixbuf
gi-docgen
`(,glib "bin") `(,glib "bin")
gobject-introspection gobject-introspection
pkg-config pkg-config
python
python-docutils ;for rst2man
rust rust
rust-cargo-c `(,rust "cargo")
vala) vala)
(or (and=> (%current-target-system) (or (and=> (%current-target-system)
(compose list make-rust-sysroot)) (compose list make-rust-sysroot))
'()))) '())))
(inputs (inputs
(cons* dav1d (cons* freetype
freetype
gobject-introspection gobject-introspection
harfbuzz
libxml2 libxml2
pango pango
(cargo-inputs 'librsvg))) (cargo-inputs 'librsvg)))
@@ -4667,7 +4667,7 @@ and RDP protocols.")
(define-public dconf (define-public dconf
(package (package
(name "dconf") (name "dconf")
(version "0.49.0") (version "0.40.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
@@ -4676,7 +4676,7 @@ and RDP protocols.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0dkc7nbd0byibf6i5gm9xqclr7i94n1p1qbqcnwxnml1lm4px90n")))) "0cs5nayg080y8pb9b7qccm1ni8wkicdmqp1jsgc22110r6j24zyg"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -4685,8 +4685,7 @@ and RDP protocols.")
;; there and loaded without having to set GCONF_PROFILE, which cannot be ;; there and loaded without having to set GCONF_PROFILE, which cannot be
;; safely set globally (as a gconf profile is a per-user thing). ;; safely set globally (as a gconf profile is a per-user thing).
#:configure-flags #~(list "--sysconfdir=/etc" #:configure-flags #~(list "--sysconfdir=/etc"
"-Dgtk_doc=true" "-Dgtk_doc=true")
"--wrap-mode=nodownload") ;for gvdb
#:phases #~(modify-phases %standard-phases #:phases #~(modify-phases %standard-phases
(add-after 'unpack 'increase-test-timeout (add-after 'unpack 'increase-test-timeout
(lambda _ (lambda _
@@ -5212,26 +5211,17 @@ and other secrets. It communicates with the \"Secret Service\" using DBus.")
(define-public gi-docgen (define-public gi-docgen
(package (package
(name "gi-docgen") (name "gi-docgen")
(version "2026.1") (version "2025.4")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (pypi-uri "gi_docgen" version)) (uri (pypi-uri "gi_docgen" version))
(sha256 (sha256
(base32 (base32
"1df7yb6d5zsr4wks4p2lf40a2v4v2dasx3pv2v3d2ma25d7krb35")))) "1i9dlwirizc0n5sw9w60yscaj14x9x06fdq64kwxqkia13d6dq3z"))))
(build-system pyproject-build-system) (build-system pyproject-build-system)
(arguments (native-inputs
(list (list python-pytest-bootstrap
#:phases #~(modify-phases %standard-phases python-setuptools))
(add-after 'unpack 'patch-commands
(lambda* (#:key inputs #:allow-other-keys)
(substitute* '("gidocgen/config.py"
"gidocgen/utils.py")
(("find_program\\(['\"]dot['\"])")
(format #f "find_program(~s)"
(search-input-file inputs "bin/dot")))))))))
(native-inputs (list python-pytest-bootstrap python-setuptools))
(inputs (list graphviz-14))
(propagated-inputs (list python-jinja2 (propagated-inputs (list python-jinja2
python-markdown python-markdown
python-markupsafe python-markupsafe
@@ -6988,10 +6978,10 @@ side panel;
(license license:gpl2+))) (license license:gpl2+)))
;; Also update (@ (gnu packages rust-sources) rust-glycin-3) when updating this. ;; Also update (@ (gnu packages rust-sources) rust-glycin-3) when updating this.
(define-public libglycin (define-public glycin-loaders
(package (package
(name "libglycin") (name "glycin-loaders")
(version "2.1.1") (version "2.0.7")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -7001,16 +6991,12 @@ side panel;
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"1mrv733xhbxydww4szskv7jc0hif908aavh8h4kjcxp0zgy13blf")) "0v6szxk5h8a4b28xb0lrhqrq6b4vka2ha4qgpdp35f6c49v9pdyp"))
(patches (search-patches "glycin-sandbox-Adapt-bwrap-invocation.patch")))) (patches (search-patches "glycin-sandbox-Adapt-bwrap-invocation.patch"))))
(outputs '("out" "debug")) (outputs '("out" "debug"))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
#:configure-flags #~(list "-Dglycin-loaders=false"
"-Dglycin-thumbnailer=true"
"-Dlibglycin=true"
"-Dlibglycin-gtk4=true")
#:imported-modules `(,@%meson-build-system-modules #:imported-modules `(,@%meson-build-system-modules
,@%cargo-build-system-modules) ,@%cargo-build-system-modules)
#:modules `(((guix build cargo-build-system) #:prefix cargo:) #:modules `(((guix build cargo-build-system) #:prefix cargo:)
@@ -7096,15 +7082,18 @@ side panel;
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://gitlab.gnome.org/sophie-h/test-images.git") (url "https://gitlab.gnome.org/sophie-h/test-images.git")
(commit "b3a107267cc4f1d136b7007938556250ce06fc4f"))) (commit "b148bcf70847d6f126a8e83e27e1c59d2e474adf")))
(file-name "glycin-test-images") (file-name "glycin-test-images")
(sha256 (sha256
(base32 (base32
"1jvra75kjqkndxzzpmi5lb8d3q4fi3yc4hha0r1g9brdsnbhsp6f"))))) "16s3lss4cbny5d0ixhc0vaxxcvq2n7rcnbklrxdm84p2m21192vm")))))
(inputs (cons* bubblewrap (inputs (cons* bubblewrap
libheif
libjxl
librsvg
(cargo-inputs 'glycin))) (cargo-inputs 'glycin)))
;; The following inputs are 'Required' in the pkg-config files. ;; The following inputs are 'Required' in the pkg-config files.
(propagated-inputs (list fontconfig glib gtk lcms libseccomp)) (propagated-inputs (list fontconfig glib gtk lcms-next libseccomp))
(home-page "https://gitlab.gnome.org/GNOME/glycin") (home-page "https://gitlab.gnome.org/GNOME/glycin")
(synopsis "Rust library for sandboxed image decoding") (synopsis "Rust library for sandboxed image decoding")
(description "Glycin is a sandbox image decoder for image viewers and (description "Glycin is a sandbox image decoder for image viewers and
@@ -7112,22 +7101,6 @@ thumbnails to display untrusted content safely. This package provides the
runtime image loader executables that are used inside the sandbox.") runtime image loader executables that are used inside the sandbox.")
(license (list license:mpl2.0 license:lgpl2.1+)))) (license (list license:mpl2.0 license:lgpl2.1+))))
(define-public glycin-loaders
(package/inherit libglycin
(name "glycin-loaders")
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags original-flags #~(list))
#~(list "-Dglycin-loaders=true"
"-Dglycin-thumbnailer=false"
"-Dlibglycin=false"
"-Dlibglycin-gtk4=false"))))
(inputs
(modify-inputs inputs
(prepend libheif
libjxl
librsvg)))))
(define-public loupe (define-public loupe
(package (package
(name "loupe") (name "loupe")
@@ -7198,7 +7171,6 @@ runtime image loader executables that are used inside the sandbox.")
gtk gtk
lcms lcms
libadwaita libadwaita
libglycin
libgweather libgweather
libseccomp libseccomp
(cargo-inputs 'loupe))) (cargo-inputs 'loupe)))
@@ -7239,14 +7211,14 @@ part of udev-extras, then udev, then systemd. It's now a project on its own.")
(define-public msgraph (define-public msgraph
(package (package
(name "msgraph") (name "msgraph")
(version "0.3.4") (version "0.3.3")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/msgraph/" (uri (string-append "mirror://gnome/sources/msgraph/"
(version-major+minor version) "/" (version-major+minor version) "/"
"msgraph-" version ".tar.xz")) "msgraph-" version ".tar.xz"))
(sha256 (sha256
(base32 "1iyn0jdqgw238cxaxvji0v9ds0xwfzffz65xpgzywcibn3kfqc87")))) (base32 "04j00lf0aqiccgbg95jh9sxmx48bgsrg110ilap9014r58py3mrp"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (list gi-docgen gobject-introspection pkg-config uhttpmock)) (native-inputs (list gi-docgen gobject-introspection pkg-config uhttpmock))
(inputs (list gnome-online-accounts json-glib libsoup librest)) (inputs (list gnome-online-accounts json-glib libsoup librest))
@@ -7259,7 +7231,7 @@ MS Graph APIs.")
(define-public gvfs (define-public gvfs
(package (package
(name "gvfs") (name "gvfs")
(version "1.58.1") (version "1.58.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/gvfs/" (uri (string-append "mirror://gnome/sources/gvfs/"
@@ -7267,7 +7239,7 @@ MS Graph APIs.")
"gvfs-" version ".tar.xz")) "gvfs-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0fywnla2xwyi44jfipyixcczxh5h34c4lzfzf9lsgzxip9mpslzw")))) "0bqq9z1y31yk3c8wz8i8fql7dr8cfxsd5a49xc4v7z6hfdlf76yx"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -7617,7 +7589,7 @@ environments.")
(define-public yelp-xsl (define-public yelp-xsl
(package (package
(name "yelp-xsl") (name "yelp-xsl")
(version "49.0") (version "42.4")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -7626,7 +7598,7 @@ environments.")
(version-major version) "/" (version-major version) "/"
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 "1v7va1xa80pyj0dyfraalvsag4m0lza4v87r2i7phyz6iy7kmm2r")))) (base32 "1lfpmdc4y46a528q5filn6xs8add921avrnwl2vpysp6n9zb1szx"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (native-inputs
(list mallard-ducktype (list mallard-ducktype
@@ -7654,7 +7626,7 @@ jQuery.Syntax JavaScript libraries.")
(define-public yelp (define-public yelp
(package (package
(name "yelp") (name "yelp")
(version "49.0") (version "42.3")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -7662,7 +7634,7 @@ jQuery.Syntax JavaScript libraries.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0mrlqsbr2wb0k2p3dmywzdb0c0rzcx1dv6qlimxzx9ab3w5lwqg6")))) "18w95bfhq3d364af1qqb63rgaixkrl7xk0x079x6m7lscwic9k16"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list #:phases (list #:phases
@@ -7687,9 +7659,7 @@ jQuery.Syntax JavaScript libraries.")
`("PATH" ":" prefix `("PATH" ":" prefix
(,(dirname (search-input-file inputs "bin/groff")))))))))) (,(dirname (search-input-file inputs "bin/groff"))))))))))
(native-inputs (native-inputs
(list desktop-file-utils (list `(,glib "bin") ; for glib-genmarshal, etc.
`(,glib "bin") ;for glib-genmarshal, etc.
`(,gtk "bin")
intltool intltool
itstool itstool
pkg-config)) pkg-config))
@@ -7698,14 +7668,13 @@ jQuery.Syntax JavaScript libraries.")
(inputs (inputs
(list bash-minimal (list bash-minimal
gsettings-desktop-schemas gsettings-desktop-schemas
libadwaita
libhandy libhandy
libxslt libxslt
man-db ;for URIs like "man:ls" man-db ;for URIs like "man:ls"
groff-minimal ;ditto groff-minimal ;ditto
gtk gtk+
sqlite sqlite
webkitgtk webkitgtk-for-gtk3
yelp-xsl)) yelp-xsl))
(home-page "https://wiki.gnome.org/Apps/Yelp") (home-page "https://wiki.gnome.org/Apps/Yelp")
(synopsis "GNOME help browser") (synopsis "GNOME help browser")
@@ -7994,88 +7963,57 @@ configuration program to choose applications starting on login.")
(define-public gjs (define-public gjs
(package (package
(name "gjs") (name "gjs")
(version "1.88.0") (version "1.84.2")
(source (source (origin
(origin (method url-fetch)
(method url-fetch) (uri (string-append "mirror://gnome/sources/" name "/"
(uri (string-append "mirror://gnome/sources/" name "/" (version-major+minor version) "/"
(version-major+minor version) "/" name "-" version ".tar.xz"))
name "-" version ".tar.xz")) (sha256
(sha256 (base32
(base32 "0rh1fkkb35aa1zrhzbizzxllkwc3snkw67i901in61ap6kgjw51m"))
"0ly43lcpafl0an3k4g4mvwrwvc78f0y91ckdi6qn13ky67rvk81h")) (modules '((guix build utils)))
(modules '((guix build utils) (snippet
(ice-9 ftw) '(begin
(srfi srfi-26))) (substitute* "installed-tests/scripts/testCommandLine.sh"
(snippet (("Valentín") "")
#~(begin (("☭") ""))
;; XXX: 'delete-all-but' is copied from the turbovnc package. (substitute* "modules/script/package.js"
(define (delete-all-but directory . preserve) (("type_default_interface_ref")
(with-directory-excursion directory "type_default_interface_get"))))))
(let* ((pred (negate (cut member <>
(cons* "." ".." preserve))))
(items (scandir "." pred)))
(for-each (cut delete-file-recursively <>) items))))
(delete-all-but "subprojects"
"gobject-introspection-tests")))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list '(#:configure-flags '("-Dinstalled_tests=false")
#:modules '((guix build meson-build-system) #:phases
(guix build utils) (modify-phases %standard-phases
(ice-9 match)) (add-before 'check 'pre-check
#:configure-flags #~(list "-Dinstalled_tests=false") (lambda _
#:phases ;; The test suite requires a running X server.
#~(modify-phases %standard-phases (system "Xvfb :1 &")
(add-after 'install 'wrap-gi (setenv "DISPLAY" ":1")
(lambda* (#:key inputs #:allow-other-keys)
(wrap-program (string-append #$output "/bin/gjs") ;; For the missing /etc/machine-id.
`("GI_TYPELIB_PATH" suffix (setenv "DBUS_FATAL_WARNINGS" "0")
(,(dirname (setenv "HOME" (getcwd))))
(search-input-file (add-after 'unpack 'skip-failing-tests
inputs (lambda _
"lib/girepository-1.0/GObject-2.0.typelib")) ;; Expects to test against 2.84, but we're using 2.86.
,(dirname (substitute* "installed-tests/js/testIntrospection.js"
(search-input-file (("const skip = imports.gi.versions.GioUnix !== '2\\.0';")
inputs "const skip = true;"))))
"lib/girepository-1.0/GIRepository-2.0.typelib"))))))) (add-after 'install 'wrap-gi
(replace 'check (lambda* (#:key inputs outputs #:allow-other-keys)
(lambda* (#:key tests? parallel-tests? #:allow-other-keys) (wrap-program (string-append (assoc-ref outputs "out")
(when tests? "/bin/gjs")
;; For the missing /etc/machine-id. `("GI_TYPELIB_PATH" suffix
(setenv "DBUS_FATAL_WARNINGS" "0") (,(dirname
(setenv "HOME" (getcwd)) (search-input-file
;; In Guix, gobject-introspection is patched to always embed inputs
;; the absolute path of a typelib library; unfortunately it "lib/girepository-1.0/GObject-2.0.typelib"))
;; does this also for test typelibs not meant to be installed; ,(dirname
;; work around it via temporary symlinks. (search-input-file
(let* ((test-libraries (find-files (getcwd) inputs
"\\.so(\\.[0-9]*)?$")) "lib/girepository-1.0/GIRepository-2.0.typelib"))))))))))
(test-library-links (map (lambda (x)
(cons x (string-append
#$output "/lib/"
(basename x))))
test-libraries)))
(for-each (match-lambda
((old . new)
(symlink old new)))
test-library-links)
(invoke "xvfb-run" "--" "dbus-run-session"
"meson" "test" "--print-errorlogs" "-t" "0"
"-j" (if parallel-tests?
(number->string (parallel-job-count))
"1"))
(for-each delete-file (map cdr test-library-links))))))
(add-after 'install 'delete-installed-tests
(lambda _
;; Installed tests libraries are installed despite
;; -Dinstalled_tests=false.
(delete-file-recursively
(string-append #$output "/libexec/installed-tests"))))
(add-after 'install 'sanitize-pkg-config-files
(lambda _
(substitute* (find-files #$output "\\.pc$")
(("^Requires.private:.*") "")))))))
(native-inputs (native-inputs
(list `(,glib "bin") ;for glib-compile-resources (list `(,glib "bin") ;for glib-compile-resources
pkg-config pkg-config
@@ -8083,16 +8021,16 @@ configuration program to choose applications starting on login.")
;; For testing ;; For testing
dbus dbus
dconf ;required to properly store settings dconf ;required to properly store settings
gtk+
sysprof
util-linux util-linux
xvfb-run)) xorg-server-for-tests))
(inputs (list mozjs readline))
(propagated-inputs (propagated-inputs
;; These are all in the Requires field of gjs-1.0.pc. ;; These are all in the Requires.private field of gjs-1.0.pc.
(list glib gobject-introspection)) ;; Check the version of mozjs required in meson.build.
(list cairo gobject-introspection mozjs-128))
(inputs
(list gtk+ readline))
(synopsis "Javascript bindings for GNOME") (synopsis "Javascript bindings for GNOME")
(home-page "https://gitlab.gnome.org/GNOME/gjs") (home-page "https://wiki.gnome.org/Gjs")
(description (description
"Gjs is a javascript binding for GNOME. It's mainly based on spidermonkey "Gjs is a javascript binding for GNOME. It's mainly based on spidermonkey
javascript engine and the GObject introspection framework.") javascript engine and the GObject introspection framework.")
@@ -8414,7 +8352,7 @@ window manager.")
(define-public gnome-online-accounts (define-public gnome-online-accounts
(package (package
(name "gnome-online-accounts") (name "gnome-online-accounts")
(version "3.56.4") (version "3.54.9")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -8422,7 +8360,7 @@ window manager.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"1cv1l757g4iac39l0ccwvqhibyjdjhy9q8p86fp8mqs5mfnix0ra")))) "10bwrc50aqaf7j3qabv7zpfnf2dmf9mwbmnjpgqfqsmny2ba80pb"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -9943,7 +9881,7 @@ easy, safe, and automatic.")
(define-public tinysparql (define-public tinysparql
(package (package
(name "tinysparql") (name "tinysparql")
(version "3.10.1") (version "3.9.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/tinysparql/" (uri (string-append "mirror://gnome/sources/tinysparql/"
@@ -9951,7 +9889,7 @@ easy, safe, and automatic.")
"tinysparql-" version ".tar.xz")) "tinysparql-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0r824dz8szfwd2z95nk8ffkvwq0ayva0wa6n1railrxnkmw3wzss")))) "13mddmszrk4ihfwi5n67v5ykf01fmld4pkmw4881hphk4j807khl"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -10234,7 +10172,6 @@ through portals.")
gst-plugins-base gst-plugins-base
json-glib json-glib
libadwaita libadwaita
libglycin
libportal libportal
libseccomp libseccomp
libselinux libselinux
@@ -10306,7 +10243,7 @@ is complete it provides a graphical representation of each selected folder.")
(define-public gnome-backgrounds (define-public gnome-backgrounds
(package (package
(name "gnome-backgrounds") (name "gnome-backgrounds")
(version "49.0") (version "48.2.1")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -10315,7 +10252,7 @@ is complete it provides a graphical representation of each selected folder.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"1dgl8jxczx2cwszg07bhrjpcg2rywfcak2d5md20x84bwl6jdzh1")))) "1n8ypmdgpp2hj7jsbpicha0d2pfnqbwmavcjfzlmr3qd5rxmn73a"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (list gettext-minimal)) (native-inputs (list gettext-minimal))
(home-page "https://gitlab.gnome.org/GNOME/gnome-backgrounds") (home-page "https://gitlab.gnome.org/GNOME/gnome-backgrounds")
@@ -10380,7 +10317,7 @@ beautifying border effects.")
(define-public dconf-editor (define-public dconf-editor
(package (package
(name "dconf-editor") (name "dconf-editor")
(version "49.0") (version "45.0.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -10388,7 +10325,7 @@ beautifying border effects.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"16fkppclv7xzglfafqg8b9nd5cjqlfwlyci800gg7psivzxcra4h")))) "1pa1k510qx4v0ywhqwpj3qfjyz8qiiis4565ghhydnpfg1v2k00i"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list #:phases #~(modify-phases %standard-phases (list #:phases #~(modify-phases %standard-phases
@@ -10737,7 +10674,6 @@ playing media, scanning, and much more.")
system-config-printer system-config-printer
xdg-desktop-portal xdg-desktop-portal
xdg-user-dirs xdg-user-dirs
xdg-user-dirs-gtk
yelp yelp
zenity)) zenity))
(description "This package provides a list of packages required for (description "This package provides a list of packages required for
@@ -11639,8 +11575,7 @@ accessibility infrastructure.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0sfs06f66dsibvnp87jshhs7n3f8shkn9x7j3ygpk8409za2n2xy")) "0sfs06f66dsibvnp87jshhs7n3f8shkn9x7j3ygpk8409za2n2xy"))))
(patches (search-patches "orca-fix-gst-init-check-call.patch"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
'(#:glib-or-gtk? #t '(#:glib-or-gtk? #t
@@ -11658,7 +11593,10 @@ accessibility infrastructure.")
(pgrep (string-append (pgrep (string-append
(assoc-ref inputs "procps") "/bin/pgrep"))) (assoc-ref inputs "procps") "/bin/pgrep")))
(substitute* "src/orca/orca_modifier_manager.py" (substitute* "src/orca/orca_modifier_manager.py"
(("\"xkbcomp\"") (format #f "'~a'" xkbcomp))) (("'xkbcomp'") (format #f "'~a'" xkbcomp)))
(substitute* "src/orca/debug.py"
(("'pgrep %s'")
(format #f "'~a %s'" pgrep)))
(substitute* "src/orca/orca_bin.py.in" (substitute* "src/orca/orca_bin.py.in"
(("'pgrep -u %s -x orca'") (("'pgrep -u %s -x orca'")
(format #f "'~a -u %s -x orca'" pgrep)))))) (format #f "'~a -u %s -x orca'" pgrep))))))
@@ -11689,7 +11627,6 @@ accessibility infrastructure.")
`(,liblouis "python") `(,liblouis "python")
procps ; for pgrep procps ; for pgrep
python python
python-dbus
python-pygobject-3.50 python-pygobject-3.50
python-pyatspi python-pyatspi
speech-dispatcher speech-dispatcher
@@ -13446,7 +13383,7 @@ GObject introspection bindings.")
(define-public sysprof (define-public sysprof
(package (package
(name "sysprof") (name "sysprof")
(version "49.0") (version "48.1")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -13454,7 +13391,7 @@ GObject introspection bindings.")
(version-major version) "/" (version-major version) "/"
"sysprof-" version ".tar.xz")) "sysprof-" version ".tar.xz"))
(sha256 (sha256
(base32 "0y18535lymqv684n8aa2v601d61v6aj8f84690cq8p3q6yb1617z")))) (base32 "1qmv76877vkw2ajfnc4cr8gw5qch5m32qm1fybig3vgizvymgwal"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -13751,7 +13688,7 @@ Document Analysis and Recognition program.")
(define-public libadwaita (define-public libadwaita
(package (package
(name "libadwaita") (name "libadwaita")
(version "1.8.4") (version "1.8.2")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/libadwaita/" (uri (string-append "mirror://gnome/sources/libadwaita/"
@@ -13759,7 +13696,7 @@ Document Analysis and Recognition program.")
"libadwaita-" version ".tar.xz")) "libadwaita-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"074j59bz5zgnb7grw3clpwyxickw9268k6fj0980bw8gdxxvfayh")))) "1cdda2sk1w5jmfkism8v6ihl03gs2s72klx7j230wx4i847nx6jq"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:phases `(#:phases
+4 -3
View File
@@ -26,7 +26,6 @@
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com> ;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2025 Antoine Côté <antoine.cote@posteo.net> ;;; Copyright © 2025 Antoine Côté <antoine.cote@posteo.net>
;;; Copyright © 2026 Luis Guilherme Coelho <lgcoelho@disroot.org> ;;; Copyright © 2026 Luis Guilherme Coelho <lgcoelho@disroot.org>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -972,8 +971,10 @@ passphrase when @code{gpg} is run and needs it.")))
(lambda _ (lambda _
(invoke "sh" "autogen.sh")))))) (invoke "sh" "autogen.sh"))))))
(native-inputs (native-inputs
(modify-inputs native-inputs `(("autoconf" ,autoconf)
(prepend autoconf automake gettext-minimal))) ("automake" ,automake)
("gettext" ,gettext-minimal)
,@(package-native-inputs pinentry-tty)))
(inputs (inputs
(modify-inputs inputs (modify-inputs inputs
(prepend efl))) (prepend efl)))
+354 -354
View File
@@ -106,6 +106,355 @@
#:use-module (gnu packages sqlite) #:use-module (gnu packages sqlite)
#:use-module (gnu packages time)) #:use-module (gnu packages time))
(define-public mozjs
(package
(name "mozjs")
(version "140.3.0")
(source (origin
(method url-fetch)
;; TODO: Switch to IceCat source once available on ftp.gnu.org.
(uri (string-append "https://ftp.mozilla.org/pub/firefox"
"/releases/" version "esr/source/firefox-"
version "esr.source.tar.xz"))
(sha256
(base32
"05i3czn3v2qnhir8apcphbqy7rmy1dn7kcwx5yyi2qvmjcyfpipg"))))
(build-system gnu-build-system)
(arguments
(list
#:imported-modules %cargo-utils-modules ;for `generate-all-checksums'
#:modules `((guix build cargo-utils)
,@%default-gnu-modules)
#:test-target "check-jstests"
#:configure-flags
#~(list
;; Disable debugging symbols to save space.
"--disable-debug"
"--disable-debug-symbols"
;; This is important because without it gjs will segfault during the
;; configure phase. With jemalloc only the standalone mozjs console
;; will work.
"--disable-jemalloc"
"--enable-tests"
"--enable-hardening"
"--enable-optimize"
"--enable-release"
"--enable-readline"
"--enable-rust-simd"
"--enable-shared-js"
"--with-system-icu"
"--with-system-nspr"
"--with-system-zlib"
"--with-intl-api")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'python-3.11-compatibility
(lambda _
(substitute* '("python/mozbuild/mozpack/files.py"
"python/mozbuild/mozbuild/util.py"
"python/mozbuild/mozbuild/action/process_define_files.py"
"python/mozbuild/mozbuild/backend/base.py"
"python/mozbuild/mozbuild/preprocessor.py")
(("\"rU\"") "\"r\""))))
(add-after 'patch-source-shebangs 'patch-cargo-checksums
(lambda _
(let ((null-hash
"e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855"))
(for-each (lambda (file)
(format #t "patching checksums in ~a~%" file)
(substitute* file
(("^checksum = \".*\"")
(string-append "checksum = \"" null-hash "\""))))
(find-files "." "Cargo\\.lock$"))
(for-each generate-all-checksums
'("js" "third_party/rust")))))
(replace 'configure
(lambda* (#:key configure-flags #:allow-other-keys)
;; The configure script does not accept environment variables as
;; arguments. It also must be run from a different directory,
;; but not the root directory either.
(mkdir "run-configure-from-here")
(chdir "run-configure-from-here")
;; Configure script writes to $HOME.
(setenv "HOME" (getcwd))
(setenv "SHELL" (which "sh"))
(setenv "CONFIG_SHELL" (which "sh"))
(setenv "AUTOCONF" (which "autoconf"))
(apply invoke "python" "../configure.py"
"--enable-project=js"
(string-append "--prefix=" #$output)
configure-flags)))
(add-before 'check 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; Most of the timezone related failures are probably
;; attributable to our use of a system-provided icu4c library
;; instead of the bundled one.
(for-each
delete-file
'( ;; FIXME: An one-hour difference is produced after DST
;; starting in the timezone the test suite uses.
"non262/Date/15.9.5.7.js"
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
"non262/Intl/DateTimeFormat/fractional-second-digits-append-item.js"
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
"non262/Intl/DateTimeFormat/day-period-hour-cycle.js"
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
"non262/Intl/available-locales-supported.js"
;; FIXME: got "en-US", expected "en-US-POSIX"
"non262/Intl/available-locales-resolved.js"
;;; Since 115:
;; Mismatching array lengths
"non262/Intl/supportedValuesOf-timeZones-canonical.js"
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
"non262/Intl/DateTimeFormat/timeZone_version.js"
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
"non262/Intl/Collator/implicithan.js"
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
"non262/Intl/Collator/big5han-gb2312han.js"
;; Since 128:
;; FIXME: got (void 0), expected "GMT"
"non262/Intl/DateTimeFormat/formatRange-timeZoneName-matches-format.js"
;; FIXME: got 7, expected 9: parts count mismatch
"non262/Intl/DateTimeFormat/formatRange-timeZone-offset.js"
"non262/Intl/DateTimeFormat/formatRange-timeZoneName.js"
;; Since 140:
;; RangeError: invalid time zone: America/Coyhaique
"non262/Temporal/ZonedDateTime/zones-and-links.js"
;; got 2042, expected 2043
"non262/Temporal/Intl/consistent-dates.js"
;; got "Pacific/Auckland", expected "Antarctica/McMurdo"
"non262/Intl/DateTimeFormat/timeZone_links.js"
"test262/staging/sm/Temporal/ZonedDateTime/zones-and-links.js"
;; Test262Error: Expected true but got false
"test262/staging/Intl402/Temporal/old/zoneddatetime-dst-corner-cases.js"
;; Test262Error: getTimeZoneTransition(next) does not return its input
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/result-type.js"
;; Expected SameValue («1912-01-01T00:16:08+00:00[Africa/Abidjan]», «null»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/transition-at-instant-boundaries.js"
;; Expected SameValue(«1762063200000000000n», «1572760800000000000n»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/specific-tzdb-values.js"
;; Expected SameValue(«"2025-03-30T03:00:00+02:00[Europe/Berlin]"»,
;; «"2020-10-25T02:00:00+01:00[Europe/Berlin]"»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/nanoseconds-subtracted-or-added-at-dst-transition.js"
;; TypeError: can't access property "epochNanoseconds",
;; before.getTimeZoneTransition(...) is null
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/transitions-close-together.js")))))
(add-before 'check 'pre-check
(lambda _
(setenv "JSTESTS_EXTRA_ARGS"
(string-join
(list
;; Do not run tests marked as "random".
"--exclude-random"
;; Exclude web platform tests.
"--wpt=disabled"
;; Respect the daemons configured number of jobs.
(string-append "--worker-count="
(number->string (parallel-job-count)))))))))))
(native-inputs
(list autoconf
llvm ;for llvm-objdump
m4
perl
pkg-config
python-wrapper
rust
`(,rust "cargo")
rust-cbindgen))
(inputs
(list icu4c-77 readline zlib))
(propagated-inputs
(list nspr)) ; in the Requires.private field of mozjs-*.pc
(home-page
"https://spidermonkey.dev/")
(synopsis "Mozilla JavaScript engine")
(description "SpiderMonkey is Mozilla's JavaScript engine written
in C/C++.")
(license license:mpl2.0))) ; and others for some files
(define-public mozjs-128
(package
(inherit mozjs)
(version "128.3.1")
(source (origin
(method url-fetch)
;; TODO: Switch to IceCat source once available on ftp.gnu.org.
(uri (string-append "https://ftp.mozilla.org/pub/firefox"
"/releases/" version "esr/source/firefox-"
version "esr.source.tar.xz"))
(sha256
(base32
"1a3h7p7126pxzpidb1lqckvhfh1had805mai4l96mnc878phbx61"))))
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags)
#~(delete "--enable-rust-simd" #$flags))
((#:phases phases)
#~(modify-phases #$phases
(replace 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; This was fixed sometime between 102.15.1 and 115.11.0.
;; These tests are supposed to be skipped on all 64-bit systems.
#$@(if (target-riscv64?)
#~((substitute* '("non262/Array/regress-157652.js"
"non262/regress/regress-422348.js")
(("mips64") "mips64|riscv64")))
#~())
;; FIXME: An one-hour difference is produced after DST
;; starting in the timezone the test suite uses.
(delete-file "non262/Date/15.9.5.7.js")
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
(delete-file "non262/Intl/DateTimeFormat/\
fractional-second-digits-append-item.js")
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
(delete-file "non262/Intl/DateTimeFormat/day-period-hour-cycle.js")
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
(delete-file "non262/Intl/available-locales-supported.js")
;; FIXME: got "en-US", expected "en-US-POSIX"
(delete-file "non262/Intl/available-locales-resolved.js")
;;; Since 115:
;; Mismatching array lengths
(delete-file "non262/Intl/supportedValuesOf-timeZones-canonical.js")
;; FIXME: got "America/Santa_Isabel", expected "America/Tijuana":
;; America/Santa_Isabel -> America/Tijuana
(delete-file "non262/Intl/DateTimeFormat/timeZone_backward_links.js")
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
(delete-file "non262/Intl/DateTimeFormat/timeZone_version.js")
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
(delete-file "non262/Intl/Collator/implicithan.js")
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
(delete-file "non262/Intl/Collator/big5han-gb2312han.js")
;; Since 128:
;; FIXME: got (void 0), expected "GMT"
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZoneName-matches-format.js")
;; FIXME: got 7, expected 9: parts count mismatch
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZone-offset.js")
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZoneName.js"))))))))
(inputs
(list icu4c-73 readline zlib))))
(define-public mozjs-115
(package
(inherit mozjs)
(version "115.26.0")
(source (origin
(method url-fetch)
(uri (string-append "https://archive.mozilla.org/pub/firefox"
"/releases/" version "esr/source/firefox-"
version "esr.source.tar.xz"))
(sha256
(base32
"0xvwk3vkbxnybpi3gwk48nxffg44lbv58mbk2xq6cz50ffq0k5k2"))))
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags)
#~(delete "--enable-rust-simd" #$flags))
((#:phases phases)
#~(modify-phases #$phases
(replace 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
(delete-file "non262/Intl/DateTimeFormat/\
fractional-second-digits-append-item.js")
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
(delete-file "non262/Intl/DateTimeFormat/day-period-hour-cycle.js")
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
(delete-file "non262/Intl/available-locales-supported.js")
;; FIXME: got "en-US", expected "en-US-POSIX"
(delete-file "non262/Intl/available-locales-resolved.js")
;;; Since 115:
;; Mismatching array lengths
(delete-file "non262/Intl/supportedValuesOf-timeZones-canonical.js")
;; FIXME: got "America/Santa_Isabel", expected "America/Tijuana":
;; America/Santa_Isabel -> America/Tijuana
(delete-file "non262/Intl/DateTimeFormat/timeZone_backward_links.js")
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
(delete-file "non262/Intl/DateTimeFormat/timeZone_version.js")
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
(delete-file "non262/Intl/Collator/implicithan.js")
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
(delete-file "non262/Intl/Collator/big5han-gb2312han.js"))))
(replace 'pre-check
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; XXX: Delete all tests that test time zone functionality,
;; because the test suite uses /etc/localtime to figure out
;; the offset from the hardware clock, which does not work
;; in the build container. See <tests/non262/Date/shell.js>.
(delete-file-recursively "non262/Date")
(delete-file "non262/Intl/DateTimeFormat/tz-environment-variable.js")
(setenv "JSTESTS_EXTRA_ARGS"
(string-join
(list
;; Do not run tests marked as "random".
"--exclude-random"
;; Exclude web platform tests.
"--wpt=disabled"
;; Respect the daemons configured number of jobs.
(string-append "--worker-count="
(number->string
(parallel-job-count)))))))))))))
(inputs
(list icu4c-73 readline zlib))))
(define computed-origin-method (@@ (guix packages) computed-origin-method)) (define computed-origin-method (@@ (guix packages) computed-origin-method))
(define mozilla-compare-locales (define mozilla-compare-locales
@@ -256,9 +605,9 @@ in the case of Firefox, it is browser/locales/all-locales."
"zh-TW")) "zh-TW"))
;;; Please keep these versions in sync with icedove. ;;; Please keep these versions in sync with icedove.
(define %icecat-base-version "140.10.1") (define %icecat-base-version "140.10.0")
(define %icecat-version (string-append %icecat-base-version "-gnu1")) (define %icecat-version (string-append %icecat-base-version "-gnu1"))
(define %icecat-build-id "20260428000000") ;must be of the form YYYYMMDDhhmmss (define %icecat-build-id "20260421000000") ;must be of the form YYYYMMDDhhmmss
;; 'icecat-source' is a "computed" origin that generates an IceCat tarball ;; 'icecat-source' is a "computed" origin that generates an IceCat tarball
;; from the corresponding upstream Firefox ESR tarball, using the 'makeicecat' ;; from the corresponding upstream Firefox ESR tarball, using the 'makeicecat'
@@ -278,9 +627,9 @@ in the case of Firefox, it is browser/locales/all-locales."
"firefox-" upstream-firefox-version ".source.tar.xz")) "firefox-" upstream-firefox-version ".source.tar.xz"))
(sha256 (sha256
(base32 (base32
"1fx52y52c3dmgr5gm64x40r2n6zq5ckqiqsd6vlhsly5wb1w0xaf")))) "06996548nfmn4r4mfw3wvgb1mp35majc5hjyhs1krgp33ck2m1f0"))))
(gnuzilla-commit "5162cbc74c483c361ad5709c767c5cb2395ff4f9") (gnuzilla-commit "02125f31250c0240ee2ab1aa629ce66d4ffb9f30")
(gnuzilla-source (gnuzilla-source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -291,7 +640,7 @@ in the case of Firefox, it is browser/locales/all-locales."
(string-take gnuzilla-commit 8))) (string-take gnuzilla-commit 8)))
(sha256 (sha256
(base32 (base32
"06qyirgjjgy7fwn7mbrz23wsdv9a88w70pz8qm1yszln74xxdsp0")))) "1hgx286gp0j46pklzzh5kvsnari1j3s0bff384m505m942k6l4hf"))))
;; 'search-patch' returns either a valid file name or #f, so wrap it ;; 'search-patch' returns either a valid file name or #f, so wrap it
;; in 'assume-valid-file-name' to avoid 'local-file' warnings. ;; in 'assume-valid-file-name' to avoid 'local-file' warnings.
@@ -900,355 +1249,6 @@ testing.")
(cpe-name . "firefox_esr") (cpe-name . "firefox_esr")
(cpe-version . ,(first (string-split version #\-))))))) (cpe-version . ,(first (string-split version #\-)))))))
(define-public mozjs
(package
(name "mozjs")
(version %icecat-version)
(source (origin (inherit icecat-source)
(patches (search-patches "mozjs-xp-win.patch"))))
(build-system gnu-build-system)
(arguments
(list
#:imported-modules %cargo-utils-modules ;for `generate-all-checksums'
#:modules `((guix build cargo-utils)
,@%default-gnu-modules)
#:test-target "check-jstests"
#:configure-flags
#~(list
;; Disable debugging symbols to save space.
"--disable-debug"
"--disable-debug-symbols"
;; This is important because without it gjs will segfault during the
;; configure phase. With jemalloc only the standalone mozjs console
;; will work.
"--disable-jemalloc"
"--enable-tests"
"--enable-hardening"
"--enable-optimize"
"--enable-release"
"--enable-readline"
"--enable-rust-simd"
"--enable-shared-js"
"--with-system-icu"
"--with-system-nspr"
"--with-system-zlib"
"--with-intl-api")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'python-3.11-compatibility
(lambda _
(substitute* '("python/mozbuild/mozpack/files.py"
"python/mozbuild/mozbuild/util.py"
"python/mozbuild/mozbuild/action/process_define_files.py"
"python/mozbuild/mozbuild/backend/base.py"
"python/mozbuild/mozbuild/preprocessor.py")
(("\"rU\"") "\"r\""))))
(add-after 'unpack 'restore-api-compat
(lambda _
(substitute* "js/public/GCAPI.h"
(("enum class GCReason")
"#define FIRST_FIREFOX_REASON FIRST_ICECAT_REASON
#define LAST_FIREFOX_REASON LAST_ICECAT_REASON
enum class GCReason"))))
(add-after 'patch-source-shebangs 'patch-cargo-checksums
(lambda _
(let ((null-hash
"e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855"))
(for-each (lambda (file)
(format #t "patching checksums in ~a~%" file)
(substitute* file
(("^checksum = \".*\"")
(string-append "checksum = \"" null-hash "\""))))
(find-files "." "Cargo\\.lock$"))
(for-each generate-all-checksums
'("js" "third_party/rust")))))
(replace 'configure
(lambda* (#:key configure-flags #:allow-other-keys)
;; The configure script does not accept environment variables as
;; arguments. It also must be run from a different directory,
;; but not the root directory either.
(mkdir "run-configure-from-here")
(chdir "run-configure-from-here")
;; Configure script writes to $HOME.
(setenv "HOME" (getcwd))
(setenv "SHELL" (which "sh"))
(setenv "CONFIG_SHELL" (which "sh"))
(setenv "AUTOCONF" (which "autoconf"))
(apply invoke "python" "../configure.py"
"--enable-project=js"
(string-append "--prefix=" #$output)
configure-flags)))
(add-before 'check 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; Most of the timezone related failures are probably
;; attributable to our use of a system-provided icu4c library
;; instead of the bundled one.
(for-each
delete-file
'( ;; FIXME: An one-hour difference is produced after DST
;; starting in the timezone the test suite uses.
"non262/Date/15.9.5.7.js"
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
"non262/Intl/DateTimeFormat/fractional-second-digits-append-item.js"
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
"non262/Intl/DateTimeFormat/day-period-hour-cycle.js"
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
"non262/Intl/available-locales-supported.js"
;; FIXME: got "en-US", expected "en-US-POSIX"
"non262/Intl/available-locales-resolved.js"
;;; Since 115:
;; Mismatching array lengths
"non262/Intl/supportedValuesOf-timeZones-canonical.js"
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
"non262/Intl/DateTimeFormat/timeZone_version.js"
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
"non262/Intl/Collator/implicithan.js"
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
"non262/Intl/Collator/big5han-gb2312han.js"
;; Since 128:
;; FIXME: got (void 0), expected "GMT"
"non262/Intl/DateTimeFormat/formatRange-timeZoneName-matches-format.js"
;; FIXME: got 7, expected 9: parts count mismatch
"non262/Intl/DateTimeFormat/formatRange-timeZone-offset.js"
"non262/Intl/DateTimeFormat/formatRange-timeZoneName.js"
;; Since 140:
;; RangeError: invalid time zone: America/Coyhaique
"non262/Temporal/ZonedDateTime/zones-and-links.js"
;; got 2042, expected 2043
"non262/Temporal/Intl/consistent-dates.js"
;; got "Pacific/Auckland", expected "Antarctica/McMurdo"
"non262/Intl/DateTimeFormat/timeZone_links.js"
"test262/staging/sm/Temporal/ZonedDateTime/zones-and-links.js"
;; Test262Error: Expected true but got false
"test262/staging/Intl402/Temporal/old/zoneddatetime-dst-corner-cases.js"
;; Test262Error: getTimeZoneTransition(next) does not return its input
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/result-type.js"
;; Expected SameValue («1912-01-01T00:16:08+00:00[Africa/Abidjan]», «null»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/transition-at-instant-boundaries.js"
;; Expected SameValue(«1762063200000000000n», «1572760800000000000n»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/specific-tzdb-values.js"
;; Expected SameValue(«"2025-03-30T03:00:00+02:00[Europe/Berlin]"»,
;; «"2020-10-25T02:00:00+01:00[Europe/Berlin]"»
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/nanoseconds-subtracted-or-added-at-dst-transition.js"
;; TypeError: can't access property "epochNanoseconds",
;; before.getTimeZoneTransition(...) is null
"test262/intl402/Temporal/ZonedDateTime/prototype/\
getTimeZoneTransition/transitions-close-together.js")))))
(add-before 'check 'pre-check
(lambda _
(setenv "JSTESTS_EXTRA_ARGS"
(string-join
(list
;; Do not run tests marked as "random".
"--exclude-random"
;; Exclude web platform tests.
"--wpt=disabled"
;; Respect the daemons configured number of jobs.
(string-append "--worker-count="
(number->string (parallel-job-count)))))))))))
(native-inputs
(list autoconf
llvm ;for llvm-objdump
m4
perl
pkg-config
python-wrapper
rust
`(,rust "cargo")
rust-cbindgen))
(inputs
(list icu4c-77 readline zlib))
(propagated-inputs
(list nspr)) ; in the Requires.private field of mozjs-*.pc
(home-page
"https://spidermonkey.dev/")
(synopsis "Mozilla JavaScript engine")
(description "SpiderMonkey is Mozilla's JavaScript engine written
in C/C++.")
(license license:mpl2.0))) ; and others for some files
(define-public mozjs-128
(package
(inherit mozjs)
(version "128.3.1")
(source (origin
(method url-fetch)
;; TODO: Switch to IceCat source once available on ftp.gnu.org.
(uri (string-append "https://ftp.mozilla.org/pub/firefox"
"/releases/" version "esr/source/firefox-"
version "esr.source.tar.xz"))
(sha256
(base32
"1a3h7p7126pxzpidb1lqckvhfh1had805mai4l96mnc878phbx61"))))
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags)
#~(delete "--enable-rust-simd" #$flags))
((#:phases phases)
#~(modify-phases #$phases
(replace 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; This was fixed sometime between 102.15.1 and 115.11.0.
;; These tests are supposed to be skipped on all 64-bit systems.
#$@(if (target-riscv64?)
#~((substitute* '("non262/Array/regress-157652.js"
"non262/regress/regress-422348.js")
(("mips64") "mips64|riscv64")))
#~())
;; FIXME: An one-hour difference is produced after DST
;; starting in the timezone the test suite uses.
(delete-file "non262/Date/15.9.5.7.js")
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
(delete-file "non262/Intl/DateTimeFormat/\
fractional-second-digits-append-item.js")
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
(delete-file "non262/Intl/DateTimeFormat/day-period-hour-cycle.js")
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
(delete-file "non262/Intl/available-locales-supported.js")
;; FIXME: got "en-US", expected "en-US-POSIX"
(delete-file "non262/Intl/available-locales-resolved.js")
;;; Since 115:
;; Mismatching array lengths
(delete-file "non262/Intl/supportedValuesOf-timeZones-canonical.js")
;; FIXME: got "America/Santa_Isabel", expected "America/Tijuana":
;; America/Santa_Isabel -> America/Tijuana
(delete-file "non262/Intl/DateTimeFormat/timeZone_backward_links.js")
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
(delete-file "non262/Intl/DateTimeFormat/timeZone_version.js")
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
(delete-file "non262/Intl/Collator/implicithan.js")
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
(delete-file "non262/Intl/Collator/big5han-gb2312han.js")
;; Since 128:
;; FIXME: got (void 0), expected "GMT"
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZoneName-matches-format.js")
;; FIXME: got 7, expected 9: parts count mismatch
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZone-offset.js")
(delete-file "non262/Intl/DateTimeFormat/formatRange-timeZoneName.js"))))))))
(inputs
(list icu4c-73 readline zlib))))
(define-public mozjs-115
(package
(inherit mozjs)
(version "115.26.0")
(source (origin
(method url-fetch)
(uri (string-append "https://archive.mozilla.org/pub/firefox"
"/releases/" version "esr/source/firefox-"
version "esr.source.tar.xz"))
(sha256
(base32
"0xvwk3vkbxnybpi3gwk48nxffg44lbv58mbk2xq6cz50ffq0k5k2"))))
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags)
#~(delete "--enable-rust-simd" #$flags))
((#:phases phases)
#~(modify-phases #$phases
(replace 'adjust-tests
(lambda _
(with-directory-excursion "../js/src/tests"
;; The test suite expects a lightly patched ICU. Disable tests
;; that do not work with the system version. See
;; "intl/icu-patches" for clues.
;; See <https://unicode-org.atlassian.net/browse/ICU-20992> and
;; <https://bugzilla.mozilla.org/show_bug.cgi?id=1636984> and
;; related patch for why this is failing.
(delete-file "non262/Intl/DateTimeFormat/\
fractional-second-digits-append-item.js")
;; FIXME: got "0 \u251CAM/PM: noon\u2524", expected "0 (AM/PM: noon)"
(delete-file "non262/Intl/DateTimeFormat/day-period-hour-cycle.js")
;; FIXME: got "en-US-posix", expected "en-US-POSIX".
(delete-file "non262/Intl/available-locales-supported.js")
;; FIXME: got "en-US", expected "en-US-POSIX"
(delete-file "non262/Intl/available-locales-resolved.js")
;;; Since 115:
;; Mismatching array lengths
(delete-file "non262/Intl/supportedValuesOf-timeZones-canonical.js")
;; FIXME: got "America/Santa_Isabel", expected "America/Tijuana":
;; America/Santa_Isabel -> America/Tijuana
(delete-file "non262/Intl/DateTimeFormat/timeZone_backward_links.js")
;; TODO: tzdata 2024a expected find a way to regenerate
;; these generated tests
(delete-file "non262/Intl/DateTimeFormat/timeZone_version.js")
;; FIXME: got "\uD840\uDDF2", expected "\u5047"
(delete-file "non262/Intl/Collator/implicithan.js")
;; FIXME: got "\uD840\uDDF2", expected "\u3467"
(delete-file "non262/Intl/Collator/big5han-gb2312han.js"))))
(replace 'pre-check
(lambda _
(with-directory-excursion "../js/src/tests"
(substitute* "shell/os.js"
;; FIXME: Why does the killed process have an exit status?
((".*killed process should not have exitStatus.*")
""))
;; XXX: Delete all tests that test time zone functionality,
;; because the test suite uses /etc/localtime to figure out
;; the offset from the hardware clock, which does not work
;; in the build container. See <tests/non262/Date/shell.js>.
(delete-file-recursively "non262/Date")
(delete-file "non262/Intl/DateTimeFormat/tz-environment-variable.js")
(setenv "JSTESTS_EXTRA_ARGS"
(string-join
(list
;; Do not run tests marked as "random".
"--exclude-random"
;; Exclude web platform tests.
"--wpt=disabled"
;; Respect the daemons configured number of jobs.
(string-append "--worker-count="
(number->string
(parallel-job-count)))))))))))))
(inputs
(list icu4c-73 readline zlib))))
;;; TEMPORARY old version of icecat-source for use by icedove until it is updated. ;;; TEMPORARY old version of icecat-source for use by icedove until it is updated.
(define %icecat-140.9.1-base-version "140.9.1") (define %icecat-140.9.1-base-version "140.9.1")
(define %icecat-140.9.1-version (string-append %icecat-140.9.1-base-version "-gnu1")) (define %icecat-140.9.1-version (string-append %icecat-140.9.1-base-version "-gnu1"))
-253
View File
@@ -245,55 +245,6 @@ go-fuzz-headers.")
@end itemize") @end itemize")
(license license:expat))) (license license:expat)))
(define-public go-github-com-alexkohler-prealloc
(package
(name "go-github-com-alexkohler-prealloc")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/alexkohler/prealloc")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "011i8yqzyjgwj17k44xvvg4bxfv8z20s0416r2d3yf4s3wqqygpq"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/alexkohler/prealloc"))
(home-page "https://github.com/alexkohler/prealloc")
(synopsis "Find slice declarations that could be preallocated")
(description
"This package is a Go static analysis tool to find slice declarations
that could potentially be preallocated.")
(license license:expat)))
(define-public go-github-com-alingse-asasalint
(package
(name "go-github-com-alingse-asasalint")
(version "0.0.11")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/alingse/asasalint")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1avz33cx3gcpps26rxijv7ic0njfmsdkbcp2mqg5yxhdcpq57s0q"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/alingse/asasalint"))
(propagated-inputs
(list go-golang-org-x-tools))
(home-page "https://github.com/alingse/asasalint")
(synopsis "Lint pass any slice as any in variadic function")
(description
"Golang linter, lint that pass any slice as any in variadic function.")
(license license:expat)))
(define-public go-github-com-andreyvit-diff (define-public go-github-com-andreyvit-diff
(package (package
(name "go-github-com-andreyvit-diff") (name "go-github-com-andreyvit-diff")
@@ -652,42 +603,6 @@ time functions.")
strings which may be used in mock tests.") strings which may be used in mock tests.")
(license license:unlicense))) (license license:unlicense)))
(define-public go-github-com-daixiang0-gci
(package
(name "go-github-com-daixiang0-gci")
(version "0.13.7")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/daixiang0/gci")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1vhnqisf6d706qvswccb0d7bkbl53lyi84f5sl3zyaf6yk8ml9dx"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "github.com/daixiang0/gci"))
(native-inputs
(list go-github-com-stretchr-testify
go-github-com-spf13-cobra))
(propagated-inputs
(list go-gopkg-in-yaml-v3
go-golang-org-x-tools
go-golang-org-x-sync
go-golang-org-x-mod
go-go-uber-org-zap
go-github-com-pmezard-go-difflib
go-github-com-hexops-gotextdiff))
(home-page "https://github.com/daixiang0/gci")
(synopsis "Tool to make Go import order deterministic")
(description
"This package provides a tool that controls Go package import order and
makes it always deterministic.")
(license license:bsd-3)))
(define-public go-github-com-data-dog-go-sqlmock (define-public go-github-com-data-dog-go-sqlmock
(package (package
(name "go-github-com-data-dog-go-sqlmock") (name "go-github-com-data-dog-go-sqlmock")
@@ -761,34 +676,6 @@ style).
@end itemize") @end itemize")
(license license:isc))) (license license:isc)))
(define-public go-github-com-denis-tingaikin-go-header
(package
(name "go-github-com-denis-tingaikin-go-header")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/denis-tingaikin/go-header")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0qzy2ps59dzsdn4ny8x48k9d1kscpddjilkxra1w16npsvix6mcm"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/denis-tingaikin/go-header"))
(native-inputs
(list go-github-com-stretchr-testify))
(propagated-inputs
(list go-golang-org-x-tools
go-gopkg-in-yaml-v3))
(home-page "https://github.com/denis-tingaikin/go-header")
(synopsis "Go linter for copyright headers")
(description
"Simple Go source code linter providing checks for copyright headers.")
(license license:gpl3)))
(define-public go-github-com-dgryski-go-ddmin (define-public go-github-com-dgryski-go-ddmin
(package (package
(name "go-github-com-dgryski-go-ddmin") (name "go-github-com-dgryski-go-ddmin")
@@ -998,31 +885,6 @@ can use the mock clock. This is a maintained fork of benbjohnson's
@url{https://github.com/benbjohnson/clock, clock} package.") @url{https://github.com/benbjohnson/clock, clock} package.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-firefart-nonamedreturns
(package
(name "go-github-com-firefart-nonamedreturns")
(version "1.0.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/firefart/nonamedreturns")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1y9dz8rkd55p1rkib4y3b0czs44c2bb1pmlr4k53ms1k8d9bjgwk"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/firefart/nonamedreturns"))
(propagated-inputs
(list go-golang-org-x-tools))
(home-page "https://github.com/firefart/nonamedreturns")
(synopsis "Go linter to catch named returns")
(description
"This package provides a linter to find named returns in Go code.")
(license license:gpl3)))
;; XXX: The project looks like abandoned, see ;; XXX: The project looks like abandoned, see
;; <https://github.com/frankban/quicktest/issues/172>, remove when nothing ;; <https://github.com/frankban/quicktest/issues/172>, remove when nothing
;; depends on it. ;; depends on it.
@@ -1061,30 +923,6 @@ can use the mock clock. This is a maintained fork of benbjohnson's
tests.") tests.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-fzipp-gocyclo
(package
(name "go-github-com-fzipp-gocyclo")
(version "0.6.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/fzipp/gocyclo")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1w2h8qlifrskn8g8zcwb6banr9si0vck9y8irg1r51mc98cjv36l"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/fzipp/gocyclo"))
(home-page "https://github.com/fzipp/gocyclo")
(synopsis "Calculate cyclomatic complexity in Go")
(description
"This package calculates the cyclomatic complexities of functions and
methods in Go source code.")
(license license:bsd-3)))
(define-public go-github-com-gdey-tbltest (define-public go-github-com-gdey-tbltest
(package (package
(name "go-github-com-gdey-tbltest") (name "go-github-com-gdey-tbltest")
@@ -1109,45 +947,6 @@ methods in Go source code.")
tests.") tests.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-ghostiam-protogetter
(package
(name "go-github-com-ghostiam-protogetter")
(version "0.3.20")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ghostiam/protogetter")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1hap2ykmlnan5vz8sczdpiv93iidbgl13mlcdx468nhfprg2hbbm"))))
(build-system go-build-system)
(arguments
(list
#:tests? #f ;"module lookup disabled by GOPROXY=off"
#:import-path "github.com/ghostiam/protogetter"))
(propagated-inputs
(list go-golang-org-x-tools
go-github-com-gobwas-glob))
(home-page "https://github.com/ghostiam/protogetter")
(synopsis "Protobuf Golang linter")
(description
"This package is a linter developed specifically for Go programmers
working with nested @code{protobuf} types. It's designed to aid developers in
preventing invalid memory address or nil pointer dereference errors arising
from direct access of nested protobuf fields.
When working with protobuf, it's quite common to have complex structures where
a message field is contained within another message, which itself can be part
of another message, and so on. If these fields are accessed directly and some
field in the call chain will not be initialized, it can result in application
panic.
Protogetter addresses this issue by suggesting use of getter methods for field
access.")
(license license:expat)))
(define-public go-github-com-gkampitakis-ciinfo (define-public go-github-com-gkampitakis-ciinfo
(package (package
(name "go-github-com-gkampitakis-ciinfo") (name "go-github-com-gkampitakis-ciinfo")
@@ -1403,29 +1202,6 @@ kept in fixtures files. Before the execution of every test, the test database
is cleaned and the fixture data is loaded into the database.") is cleaned and the fixture data is loaded into the database.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-go-xmlfmt-xmlfmt
(package
(name "go-github-com-go-xmlfmt-xmlfmt")
(version "1.1.3")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/go-xmlfmt/xmlfmt")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1cglrwmpg0lb7cnyvdz8js52h07rcvka7y9abksk9p5ajxj5rp1s"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/go-xmlfmt/xmlfmt"))
(home-page "https://github.com/go-xmlfmt/xmlfmt")
(synopsis "Go XML Formatter")
(description
"The Go XML Formatter, xmlfmt, will format the XML string in a readable way.")
(license license:expat)))
;; XXX: This repository has been archived by the owner ;; XXX: This repository has been archived by the owner
;; on May 9, 2021. It is now read-only. It's only used ;; on May 9, 2021. It is now read-only. It's only used
;; by go-github-com-golang-gddo. Consider to remove when nothing ;; by go-github-com-golang-gddo. Consider to remove when nothing
@@ -4191,20 +3967,6 @@ thoroughly
" This package provides an command line interface (CLI) " This package provides an command line interface (CLI)
tool.")))) tool."))))
(define-public go-gci
(package/inherit go-github-com-daixiang0-gci
(name "go-gci")
(arguments
(substitute-keyword-arguments arguments
((#:tests? _ #t) #f)
((#:install-source? _ #t) #f)
((#:skip-build? _ #t) #f)))
(native-inputs
(append (package-native-inputs go-github-com-daixiang0-gci)
(package-propagated-inputs go-github-com-daixiang0-gci)))
(propagated-inputs '())
(inputs '())))
(define-public go-pgmockproxy (define-public go-pgmockproxy
(package/inherit go-github-com-jackc-pgmock (package/inherit go-github-com-jackc-pgmock
(name "go-pgmockproxy") (name "go-pgmockproxy")
@@ -4328,21 +4090,6 @@ prints an ASCII fraphic representing the memory layout.")))
" This package provides an command line interface (CLI) " This package provides an command line interface (CLI)
tool.")))) tool."))))
(define-public protogetter
(package/inherit go-github-com-ghostiam-protogetter
(name "protogetter")
(arguments
(substitute-keyword-arguments arguments
((#:tests? _ #f) #f)
((#:skip-build? _ #t) #f)
((#:install-source? _ #t) #f)
((#:import-path _) "github.com/ghostiam/protogetter/cmd/protogetter")
((#:unpack-path _ "") "github.com/ghostiam/protogetter")))
(native-inputs
(package-propagated-inputs go-github-com-ghostiam-protogetter))
(propagated-inputs '())
(inputs '())))
(define-public unparam (define-public unparam
(package (package
(inherit go-mvdan-cc-unparam) (inherit go-mvdan-cc-unparam)
+2 -33
View File
@@ -1600,7 +1600,7 @@ RSA, RSA-PSS, and ECDSA, though hooks are present for adding your own.")
(define-public go-github-com-google-go-tpm (define-public go-github-com-google-go-tpm
(package (package
(name "go-github-com-google-go-tpm") (name "go-github-com-google-go-tpm")
(version "0.9.4") (version "0.9.1")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -1609,7 +1609,7 @@ RSA, RSA-PSS, and ECDSA, though hooks are present for adding your own.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1sp1mbr6vz36zy9w36iksirbsj5p2jslsl8zs1cdj8s4ig4lkd9d")))) (base32 "1c5j5cvwl45ka93nknmv454ivd7kp9n8yql19gr6z01z0s1ph7sg"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
(list (list
@@ -3286,37 +3286,6 @@ to support the streaming mode required by Go's standard Hash interface.")
@url{https://www.rfc-editor.org/errata/rfc7512, errata} specifications.") @url{https://www.rfc-editor.org/errata/rfc7512, errata} specifications.")
(license license:asl2.0))) (license license:asl2.0)))
(define-public go-github-com-tailscale-golang-x-crypto
(package
(name "go-github-com-tailscale-golang-x-crypto")
(version "0.91.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/tailscale/golang-x-crypto")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0m9qkk48mihrkmfh1fzfhc39l8957qkpfx8qbw4xdjws7dy4vzbz"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:tests? #f ;Tests have broken package imports (expected as per readme)
#:import-path "github.com/tailscale/golang-x-crypto"))
(propagated-inputs
(list go-golang-org-x-crypto
go-golang-org-x-term
go-golang-org-x-sys
go-golang-org-x-net))
(home-page "https://github.com/tailscale/golang-x-crypto")
(synopsis "Supplementary Go crypto libraries")
(description
"This package holds supplementary Go cryptography libraries, it's a fork
of @code{golang.org/x/crypto} maintained by Tailscale.")
(license license:bsd-3)))
(define-public go-github-com-tink-crypto-tink-go-v2 (define-public go-github-com-tink-crypto-tink-go-v2
(package (package
(name "go-github-com-tink-crypto-tink-go-v2") (name "go-github-com-tink-crypto-tink-go-v2")
-23
View File
@@ -456,29 +456,6 @@ penalization.")
FFT (Schonhage-Strassen method for multiplying integers).") FFT (Schonhage-Strassen method for multiplying integers).")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-github-com-robinus2-golang-moving-average
(package
(name "go-github-com-robinus2-golang-moving-average")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/RobinUS2/golang-moving-average")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "02z3ad29653fz7whxkjjpq820ig9j8m68xj4kay14jyazkr5in1f"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/RobinUS2/golang-moving-average"))
(home-page "https://github.com/RobinUS2/golang-moving-average")
(synopsis "Moving average implementation for Go")
(description
"This package provides a moving average implementation for Go.")
(license license:asl2.0)))
(define-public go-github-com-shopspring-decimal (define-public go-github-com-shopspring-decimal
(package (package
(name "go-github-com-shopspring-decimal") (name "go-github-com-shopspring-decimal")
File diff suppressed because it is too large Load Diff
+136 -683
View File
@@ -76,7 +76,6 @@
;;; Copyright © 2026 Giacomo Leidi <therewasa@fishinthecalculator.me> ;;; Copyright © 2026 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;; Copyright © 2026 Evgeny Pisemsky <mail@pisemsky.site> ;;; Copyright © 2026 Evgeny Pisemsky <mail@pisemsky.site>
;;; Copyright © 2026 Vinicius Monego <monego@posteo.net> ;;; Copyright © 2026 Vinicius Monego <monego@posteo.net>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -121,13 +120,7 @@
#:use-module (gnu packages serialization) #:use-module (gnu packages serialization)
#:use-module (gnu packages specifications) #:use-module (gnu packages specifications)
#:use-module (gnu packages xdisorg) #:use-module (gnu packages xdisorg)
#:use-module (gnu packages xorg) #:use-module (gnu packages xorg))
;; TODO: Remove when go-github-com-containerd-containerd is moved to (gnu
;; packages containers)
#:use-module (gnu packages docker)
#:use-module (gnu packages prometheus)
#:use-module (gnu packages kubernetes))
;;; Commentary: ;;; Commentary:
;;; ;;;
@@ -532,35 +525,6 @@ file along with an index.html file.")
"Package tcell provides a gruid Driver for making terminal apps.") "Package tcell provides a gruid Driver for making terminal apps.")
(license license:isc))) (license license:isc)))
(define-public go-codeberg-org-chavacava-garif
(package
(name "go-codeberg-org-chavacava-garif")
(version "0.2.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://codeberg.org/chavacava/garif.git")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0cz037yb9gnk9fd61pni6m0n9cbrwmlxxija5vm91mplyxlih05h"))))
(build-system go-build-system)
(arguments
(list
#:import-path "codeberg.org/chavacava/garif"))
(native-inputs
(list go-github-com-stretchr-testify))
(home-page "https://codeberg.org/chavacava/garif")
(synopsis "Create and manipulate SARIF logs")
(description
"This package defines all the Go structures required to model a log file.
SARIF, from Static Analysis Results Interchange Format, is a standard
JSON-based format for the output of static analysis tools defined and promoted
by @url{https://www.oasis-open.org/, OASIS}.")
(license license:expat)))
(define-public go-codeberg-org-emersion-go-scfg (define-public go-codeberg-org-emersion-go-scfg
(package (package
(name "go-codeberg-org-emersion-go-scfg") (name "go-codeberg-org-emersion-go-scfg")
@@ -649,33 +613,6 @@ recursively any exported one. It also won't merge structs inside
maps (because they are not addressable using Go reflection).") maps (because they are not addressable using Go reflection).")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-fyne-io-systray
(package
(name "go-fyne-io-systray")
(version "1.11.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/fyne-io/systray")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0yrd4f3n8wrqcqradmqq9w0b31hd5hali876xkynfhm3nhaz4j1i"))))
(build-system go-build-system)
(arguments
(list
#:import-path "fyne.io/systray"))
(propagated-inputs
(list go-github-com-godbus-dbus-v5
go-golang-org-x-sys))
(home-page "https://fyne.io/systray/")
(synopsis "Place an icon and menu in the notification area")
(description
"This package is a cross-platform Go library to place an icon and menu in
the notification area.")
(license license:asl2.0)))
(define-public go-git-sr-ht-rjarry-go-opt (define-public go-git-sr-ht-rjarry-go-opt
(package (package
(name "go-git-sr-ht-rjarry-go-opt") (name "go-git-sr-ht-rjarry-go-opt")
@@ -3044,38 +2981,6 @@ input from the terminal while not echoing the input back (similar to
and is therefore compatible with cross-compiling.") and is therefore compatible with cross-compiling.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-bitfield-script
(package
(name "go-github-com-bitfield-script")
(version "0.24.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/bitfield/script")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1pzmz7n39sh9sprclzd0m0l0flf626286fh51m065yjhkqzrjw89"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/bitfield/script"
#:test-flags #~(list "-vet=off")))
(native-inputs
(list go-github-com-google-go-cmp))
(propagated-inputs
(list go-github-com-itchyny-gojq
go-github-com-rogpeppe-go-internal
go-mvdan-cc-sh-v3))
(home-page "https://github.com/bitfield/script")
(synopsis "Making it easy to write shell-like scripts in Go")
(description
"Package script aims to make it easy to write shell-type scripts in Go,
for general system administration purposes: reading files, counting lines,
matching strings, and so on.")
(license license:expat)))
(define-public go-github-com-bitly-go-hostpool (define-public go-github-com-bitly-go-hostpool
(package (package
(name "go-github-com-bitly-go-hostpool") (name "go-github-com-bitly-go-hostpool")
@@ -4528,34 +4433,6 @@ over strings.")
@code{https://en.wikipedia.org/wiki/WebP, WebP} images.") @code{https://en.wikipedia.org/wiki/WebP, WebP} images.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-github-com-chainguard-dev-clog
(package
(name "go-github-com-chainguard-dev-clog")
(version "1.8.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/chainguard-dev/clog")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0b95vw8czs2r9lscyi85vppbyqj672zm6z2n9siy1s9yv6fkys62"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/chainguard-dev/clog"))
(home-page "https://github.com/chainguard-dev/clog")
(synopsis "Context aware slog")
(description
"This package provides a context-aware Go std lib
@url{https://pkg.go.dev/log/slog, @code{slog}}. The context Logger can be
used to use Loggers from the context. This is sometimes preferred over the
@url{https://github.com/chainguard-dev/clog#context-handler, Context Handler},
since this can make it easier to use different loggers in different
contexts (e.g. testing).")
(license license:asl2.0)))
(define-public go-github-com-charlievieth-fastwalk (define-public go-github-com-charlievieth-fastwalk
(package (package
(name "go-github-com-charlievieth-fastwalk") (name "go-github-com-charlievieth-fastwalk")
@@ -6162,7 +6039,6 @@ dependencies and a simple API.")
(license license:asl2.0))) (license license:asl2.0)))
(define-public go-github-com-containerd-containerd (define-public go-github-com-containerd-containerd
;; TODO: Move to (gnu packages containers).
(package (package
(name "go-github-com-containerd-containerd") (name "go-github-com-containerd-containerd")
(version "1.7.22") (version "1.7.22")
@@ -6170,156 +6046,110 @@ dependencies and a simple API.")
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/containerd/containerd") (url "https://github.com/containerd/containerd")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1yfda4qnygy4lcqb6cqc7v7h2lf0gl64xhvkp39zngmqm0lw30gh")) (base32 "1yfda4qnygy4lcqb6cqc7v7h2lf0gl64xhvkp39zngmqm0lw30gh"))
(snippet (snippet
#~(begin #~(begin
(use-modules (guix build utils)) (use-modules (guix build utils))
(delete-file-recursively "vendor") (delete-file-recursively "vendor")))))
;; Submodules with their own go.mod files and packaged separately:
;;
;; - github.com/containerd/containerd/api
(delete-file-recursively "api")))))
(build-system go-build-system) (build-system go-build-system)
;; For the forgejo-runner build, we only need the pkg/userns module which
;; doesn't require the massive dependency tree for all of containerd, so
;; we cheat and skip the build and avoid having to package a large number
;; of additional dependencies.
(arguments (arguments
(list (list
#:import-path "github.com/containerd/containerd" #:import-path "github.com/containerd/containerd"
#:skip-build? #t #:skip-build? #t
#:test-subdirs #:tests? #f))
;; XXX: Remove when all inputs are packaged. ;; (propagated-inputs
#~(list "archive/compression" ;; (list go-tags-cncf-io-container-device-interface
"cio" ;; go-k8s-io-utils
"content" ;; go-k8s-io-klog-v2
"content/local" ;; go-k8s-io-cri-api
"contrib/apparmor" ;; go-k8s-io-component-base
"contrib/seccomp/kernelversion" ;; go-k8s-io-client-go
"diff/apply" ;; go-k8s-io-apiserver
"events/exchange" ;; go-k8s-io-apimachinery
"gc" ;; go-k8s-io-api
"gc/scheduler" ;; go-google-golang-org-protobuf
"identifiers" ;; go-google-golang-org-grpc
"images" ;; go-google-golang-org-genproto-googleapis-rpc
"labels" ;; go-google-golang-org-genproto
"leases" ;; go-golang-org-x-sys
"mount" ;; go-golang-org-x-sync
"namespaces" ;; go-golang-org-x-net
"pkg/atomic" ;; go-go-opentelemetry-io-otel-trace
"pkg/atomicfile" ;; go-go-opentelemetry-io-otel-sdk
"pkg/cap" ;; go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracehttp
"pkg/cleanup" ;; go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracegrpc
"pkg/cri/io" ;; go-go-opentelemetry-io-otel-exporters-otlp-otlptrace
"pkg/cri/store/label" ;; go-go-opentelemetry-io-otel
"pkg/cri/store/snapshot" ;; go-go-opentelemetry-io-contrib-instrumentation-net-http-otelhttp
"pkg/cri/streaming/internal/wsstream" ;; go-go-opentelemetry-io-contrib-instrumentation-google-golang-org-grpc-otelgrpc
"pkg/cri/util" ;; go-go-etcd-io-bbolt
"pkg/epoch" ;; go-github-com-vishvananda-netlink
"pkg/failpoint" ;; go-github-com-urfave-cli
"pkg/ioutil" ;; go-github-com-tchap-go-patricia-v2
"pkg/kmutex" ;; go-github-com-stretchr-testify
"pkg/registrar" ;; go-github-com-sirupsen-logrus
"pkg/snapshotters" ;; go-github-com-prometheus-client-golang
"pkg/transfer/image" ;; go-github-com-pelletier-go-toml
"pkg/transfer/streaming" ;; go-github-com-opencontainers-selinux
"plugin" ;; go-github-com-opencontainers-runtime-tools
"protobuf" ;; go-github-com-opencontainers-runtime-spec
"reference" ;; go-github-com-opencontainers-image-spec
"remotes" ;; go-github-com-opencontainers-go-digest
"remotes/docker/auth" ;; go-github-com-moby-sys-userns
"remotes/docker/config" ;; go-github-com-moby-sys-user
"runtime/v2/shim" ;; go-github-com-moby-sys-symlink
"services/server/config" ;; go-github-com-moby-sys-signal
"snapshots/benchsuite" ;; go-github-com-moby-sys-sequential
"snapshots/devmapper/dmsetup" ;; go-github-com-moby-sys-mountinfo
"snapshots/overlay/overlayutils" ;; go-github-com-moby-locker
"snapshots/storage"))) ;; go-github-com-minio-sha256-simd
(native-inputs ;; go-github-com-klauspost-compress
(list go-github-com-davecgh-go-spew ;; go-github-com-intel-goresctrl
go-github-com-google-go-cmp ;; go-github-com-grpc-ecosystem-go-grpc-prometheus
go-github-com-stretchr-testify)) ;; go-github-com-grpc-ecosystem-go-grpc-middleware
(propagated-inputs ;; go-github-com-google-uuid
(list go-dario-cat-mergo ;; go-github-com-google-go-cmp
go-github-com-adalogics-go-fuzz-headers ;; go-github-com-fsnotify-fsnotify
go-github-com-adamkorcz-go-118-fuzz-build ;; go-github-com-emicklei-go-restful-v3
go-github-com-containerd-btrfs-v2 ;; go-github-com-docker-go-units
go-github-com-containerd-cgroups-v3 ;; go-github-com-docker-go-metrics
go-github-com-containerd-console ;; go-github-com-docker-go-events
go-github-com-containerd-containerd-api ;; go-github-com-distribution-reference
go-github-com-containerd-continuity ;; go-github-com-davecgh-go-spew
go-github-com-containerd-errdefs ;; go-github-com-coreos-go-systemd-v22
go-github-com-containerd-fifo ;; go-github-com-containernetworking-plugins
go-github-com-containerd-go-cni ;; go-github-com-containernetworking-cni
go-github-com-containerd-go-runc ;; go-github-com-containerd-zfs
go-github-com-containerd-log ;; go-github-com-containerd-typeurl-v2
go-github-com-containerd-nri ;; go-github-com-containerd-ttrpc
go-github-com-containerd-platforms ;; go-github-com-containerd-platforms
go-github-com-containerd-ttrpc ;; go-github-com-containerd-nri
go-github-com-containerd-typeurl-v2 ;; go-github-com-containerd-log
go-github-com-containernetworking-cni ;; go-github-com-containerd-imgcrypt
go-github-com-containernetworking-plugins ;; go-github-com-containerd-go-runc
go-github-com-coreos-go-systemd-v22 ;; go-github-com-containerd-go-cni
go-github-com-distribution-reference ;; go-github-com-containerd-fifo
go-github-com-docker-go-events ;; go-github-com-containerd-errdefs
go-github-com-docker-go-metrics ;; go-github-com-containerd-continuity
go-github-com-docker-go-units ;; go-github-com-containerd-containerd-api
go-github-com-emicklei-go-restful-v3 ;; go-github-com-containerd-console
go-github-com-fsnotify-fsnotify ;; go-github-com-containerd-cgroups-v3
go-github-com-google-uuid ;; go-github-com-containerd-btrfs-v2
go-github-com-grpc-ecosystem-go-grpc-middleware ;; go-github-com-containerd-aufs
go-github-com-grpc-ecosystem-go-grpc-prometheus ;; go-github-com-microsoft-hcsshim
go-github-com-intel-goresctrl ;; go-github-com-microsoft-go-winio
go-github-com-klauspost-compress ;; go-github-com-adamkorcz-go-118-fuzz-build
go-github-com-minio-sha256-simd ;; go-github-com-adalogics-go-fuzz-headers
go-github-com-moby-locker ;; go-dario-cat-mergo))
go-github-com-moby-sys-mountinfo
go-github-com-moby-sys-sequential
go-github-com-moby-sys-signal
go-github-com-moby-sys-symlink
go-github-com-moby-sys-user
go-github-com-moby-sys-userns
go-github-com-opencontainers-go-digest
go-github-com-opencontainers-image-spec
go-github-com-opencontainers-runtime-spec
go-github-com-opencontainers-runtime-tools
go-github-com-opencontainers-selinux
go-github-com-pelletier-go-toml
go-github-com-prometheus-client-golang
go-github-com-sirupsen-logrus
go-github-com-tchap-go-patricia-v2
go-github-com-urfave-cli
go-github-com-vishvananda-netlink
go-go-etcd-io-bbolt
go-go-opentelemetry-io-contrib-instrumentation-google-golang-org-grpc-otelgrpc
go-go-opentelemetry-io-contrib-instrumentation-net-http-otelhttp
go-go-opentelemetry-io-otel
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracegrpc
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracehttp
go-go-opentelemetry-io-otel-sdk
go-go-opentelemetry-io-otel-trace
go-golang-org-x-net
go-golang-org-x-sync
go-golang-org-x-sys
go-google-golang-org-genproto
go-google-golang-org-genproto-googleapis-rpc
go-google-golang-org-grpc
go-google-golang-org-protobuf
go-k8s-io-api
go-k8s-io-apimachinery
go-k8s-io-apiserver
go-k8s-io-client-go
go-k8s-io-component-base
go-k8s-io-cri-api
go-k8s-io-klog-v2
go-k8s-io-utils
go-tags-cncf-io-container-device-interface
;; TODO: Complete packaging.
;; go-github-com-containerd-aufs
;; go-github-com-containerd-imgcrypt
#;go-github-com-containerd-zfs))
(home-page "https://github.com/containerd/containerd") (home-page "https://github.com/containerd/containerd")
(synopsis "Container runtime support daemon") (synopsis "Container runtime support daemon")
(description (description
@@ -6328,7 +6158,9 @@ robustness, and portability. It is available as a daemon, which can manage
the complete container lifecycle of its host system: image transfer and the complete container lifecycle of its host system: image transfer and
storage, container execution and supervision, low-level storage and network storage, container execution and supervision, low-level storage and network
attachments, etc.") attachments, etc.")
(license license:asl2.0))) (license license:asl2.0)
;; Don't expose since it's a partial package.
(properties '((hidden? . #t)))))
(define-public go-github-com-containerd-continuity (define-public go-github-com-containerd-continuity
(package (package
@@ -7271,155 +7103,6 @@ against various paths. This is particularly useful when trying to filter
files based on a .gitignore document.") files based on a .gitignore document.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-creachadair-command
(package
(name "go-github-com-creachadair-command")
(version "0.2.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/creachadair/command")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0c2y7i8c7kwsqyi6rmql9jpc2xan8jp2cpxgx615safk6xvc41kp"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/creachadair/command"))
(native-inputs
(list go-github-com-google-go-cmp))
(propagated-inputs
(list go-github-com-creachadair-mds))
(home-page "https://github.com/creachadair/command")
(synopsis "Lightweight subcommand-handling library")
(description
"This package defines plumbing for command dispatch. It is based on and
similar in design to the @code{go} command-line tool.")
(license license:bsd-3)))
(define-public go-github-com-creachadair-flax
(package
(name "go-github-com-creachadair-flax")
(version "0.0.5")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/creachadair/flax")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1r8s0jqayxglnmkffdpkxl72l594ja82wpa9ypxh1v437kv2gqc2"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/creachadair/flax"))
(home-page "https://github.com/creachadair/flax")
(synopsis "Bind flags to struct fields")
(description
"This package implements a helper for attaching flags to the fields of
struct values.")
(license license:bsd-3)))
(define-public go-github-com-creachadair-mds
(package
(name "go-github-com-creachadair-mds")
(version "0.25.15")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/creachadair/mds")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1zdidlcbjlx9aw5j3i73c3mxp7366yh66bn7s5a8p1zaw72k035n"))))
(build-system go-build-system)
(arguments
(list
#:go go-1.25
#:skip-build? #t
#:test-flags
#~(list "-skip" (string-join
(list "TestNetwork" ;Needs network
"TestNewHTTPServer"
;; Broken by read-only FS
"TestDeepPathsWithGlobAndUmask")
"|"))
#:import-path "github.com/creachadair/mds"))
(native-inputs
(list go-github-com-google-go-cmp))
(home-page "https://github.com/creachadair/mds")
(synopsis "Generic data structures and utility types in Go")
(description
"This repository defines generic data structures and utility types in Go.
Data structures:
@itemize
@item heapq: a heap-structured priority queue
@item mapset: a basic map-based set implementation
@item mlink: basic linked sequences (list, queue)
@item omap: ordered key-value map
@item queue: an array-based FIFO queue
@item ring: a circular doubly-linked sequence
@item stack: an array-based LIFO stack
@item stree: self-balancing binary-search tree
@end itemize
Utilities:
@itemize
@item cache: an in-memory key/value cache
@item compare: provides helpers for comparison of values
@item distinct: a probabilistic distinct-elements counter (CVM)
@item mbits: helpful functions for manipulating bits and bytes
@item mdiff: supports creating textual diffs
@item mnet: provides an in-memory network implementation compatible with the net package
@item mstr: helpful functions for manipulating strings
@item mtest: a support library for writing tests
@item shell: POSIX shell quoting and splitting
@item slice: helpful functions for manipulating slices
@item value: helpful functions for basic values and pointers
@end itemize")
(license license:bsd-3)))
(define-public go-github-com-creachadair-msync
(package
(name "go-github-com-creachadair-msync")
(version "0.8.3")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/creachadair/msync")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1z797dc0s99l7xf8zsbynwh1rjqw2w9119n81kjx39zkwrbmnc2w"))))
(build-system go-build-system)
(arguments
(list
#:go go-1.25
#:import-path "github.com/creachadair/msync"
#:phases
#~(modify-phases %standard-phases
(add-before 'check 'pre-check
(lambda* (#:key tests? import-path #:allow-other-keys)
;; See: <https://go.dev/blog/synctest>.
(setenv "GOEXPERIMENT" "synctest")
(setenv "GODEBUG" "asynctimerchan=0"))))))
(propagated-inputs
(list go-github-com-creachadair-mds))
(home-page "https://github.com/creachadair/msync")
(synopsis "Synchronization management types in Go")
(description
"This package defines two types for managing concurrency: @code{throttle},
which allows calls to a function to be coalesced among multiple concurrent
goroutines and @code{trigger}, that implements channel-based condition
variable.")
(license license:bsd-3)))
(define-public go-github-com-creack-pty (define-public go-github-com-creack-pty
(package (package
(name "go-github-com-creack-pty") (name "go-github-com-creack-pty")
@@ -8965,7 +8648,6 @@ interact with distribution components.")
(license license:asl2.0))) (license license:asl2.0)))
(define-public go-github-com-docker-docker (define-public go-github-com-docker-docker
;; TODO: Move to (gnu packages docker).
(package (package
(name "go-github-com-docker-docker") (name "go-github-com-docker-docker")
(version "25.0.7") (version "25.0.7")
@@ -8986,47 +8668,7 @@ interact with distribution components.")
(list (list
#:import-path "github.com/docker/docker" #:import-path "github.com/docker/docker"
#:skip-build? #t #:skip-build? #t
#:test-subdirs #:tests? #f))
;; XXX: Remove when all inputs are packaged.
#~(list "api/types/strslice"
"api/types/time"
"api/types/versions"
"builder/remotecontext/urlutil"
"cli/debug"
"daemon/links"
"daemon/network"
"errdefs"
"integration/plugin"
"integration/plugin/logging/cmd/discard"
"internal/mod"
"libnetwork/bitmap"
"libnetwork/etchosts"
"libnetwork/internal/caller"
"libnetwork/ipbits"
"libnetwork/options"
"libnetwork/portallocator"
"pkg/broadcaster"
"pkg/capabilities"
"pkg/directory"
"pkg/dmesg"
"pkg/fileutils"
"pkg/homedir"
"pkg/ioutils"
"pkg/longpath"
"pkg/meminfo"
"pkg/namesgenerator"
"pkg/parsers"
"pkg/parsers/kernel"
"pkg/pidfile"
"pkg/plugins/pluginrpc-gen"
"pkg/process"
"pkg/progress"
"pkg/stdcopy"
"pkg/stringid"
"pkg/useragent"
"plugin/v2"
"restartmanager"
"volume/drivers")))
(propagated-inputs (propagated-inputs
(list go-github-com-containerd-containerd (list go-github-com-containerd-containerd
go-github-com-containerd-log go-github-com-containerd-log
@@ -9325,41 +8967,6 @@ sub-interfaces are also provided for cases where the full Channel interface
cannot be met (for example, @code{InChannel} for write-only channels).") cannot be met (for example, @code{InChannel} for write-only channels).")
(license license:expat))) (license license:expat)))
(define-public go-github-com-eapache-go-resiliency
(package
(name "go-github-com-eapache-go-resiliency")
(version "1.7.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/eapache/go-resiliency")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "07a1r3c2spd37k3riy4fxz8v8ibxiprf8a3vw788whz4mlp6gm40"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "github.com/eapache/go-resiliency"))
(home-page "https://github.com/eapache/go-resiliency")
(synopsis "Resiliency patterns for golang")
(description
"Resiliency patterns for golang. Based in part on
@url{https://github.com/Netflix/Hystrix, Hystrix},
@@url{https://github.com/Shopify/semian, Semian}, and others.
Currently implemented patterns include:
@itemize
@item circuit-breaker
@item semaphore
@item deadline/timeout
@item batching
@item retriable
@end itemize")
(license license:expat)))
(define-public go-github-com-eapache-queue (define-public go-github-com-eapache-queue
(package (package
(name "go-github-com-eapache-queue") (name "go-github-com-eapache-queue")
@@ -12963,10 +12570,11 @@ single @code{Tree} implementation, optimized for sparse nodes.")
(list (list
#:import-path "github.com/hashicorp/go-immutable-radix/v2")) #:import-path "github.com/hashicorp/go-immutable-radix/v2"))
(propagated-inputs (propagated-inputs
(modify-inputs propagated-inputs (modify-inputs (package-propagated-inputs
go-github-com-hashicorp-go-immutable-radix)
(prepend go-golang-org-x-exp) (prepend go-golang-org-x-exp)
(replace "go-github-com-hashicorp-golang-lru" (replace "go-github-com-hashicorp-golang-lru"
go-github-com-hashicorp-golang-lru-v2))))) go-github-com-hashicorp-golang-lru-v2)))))
(define-public go-github-com-hashicorp-go-memdb (define-public go-github-com-hashicorp-go-memdb
(package (package
@@ -13690,32 +13298,6 @@ subsystem in Linux.")
used in other languages but absent in Go package strings.") used in other languages but absent in Go package strings.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-huin-goutil
(package
(name "go-github-com-huin-goutil")
(version "0.0.0-20170803182201-1ca381bf3150")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/huin/goutil")
(commit (go-version->git-ref version))))
(file-name (git-file-name name version))
(sha256
(base32 "0alhyacsfqic2wxyqn4gvk9wzjl4pkmy8rhvqjk84xsghgx5xf12"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "github.com/huin/goutil"))
(home-page "https://github.com/huin/goutil")
(synopsis "Collection of Go utility code")
(description
"This package is a collection of miscellaneous Go utility code that is
potentially useful across multiple projects, and has therefore been factored
out.")
(license license:bsd-2)))
(define-public go-github-com-iancoleman-orderedmap (define-public go-github-com-iancoleman-orderedmap
(package (package
(name "go-github-com-iancoleman-orderedmap") (name "go-github-com-iancoleman-orderedmap")
@@ -16792,29 +16374,6 @@ structure. It can also produce a much more verbose, one-item-per-line
representation suitable for computing diffs.") representation suitable for computing diffs.")
(license license:asl2.0))) (license license:asl2.0)))
(define-public go-github-com-kodeworks-golang-image-ico
(package
(name "go-github-com-kodeworks-golang-image-ico")
(version "0.0.0-20141118225523-73f0f4cfade9")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Kodeworks/golang-image-ico")
(commit (go-version->git-ref version))))
(file-name (git-file-name name version))
(sha256
(base32 "0zfcvpf6pdqismq9j8nvismln1dbz2i22d7c00a2ygjxldbmnd3k"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/Kodeworks/golang-image-ico"))
(home-page "https://github.com/Kodeworks/golang-image-ico")
(synopsis "Golang support for Windows .ico file format")
(description
"This package provides Golang support for Windows' @code{.ico} file format.")
(license license:bsd-3)))
(define-public go-github-com-labstack-gommon (define-public go-github-com-labstack-gommon
(package (package
(name "go-github-com-labstack-gommon") (name "go-github-com-labstack-gommon")
@@ -22831,88 +22390,6 @@ without configuration, but if desired, everything can be customized down to the
smallest detail.") smallest detail.")
(license license:expat))) (license license:expat)))
(define-public go-github-com-puzpuzpuz-xsync
(package
(name "go-github-com-puzpuzpuz-xsync")
(version "1.5.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/puzpuzpuz/xsync")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1qfmiyk5wypssr30nj5qp4izdav5gbaxf1324i70vjhn5g8g74mb"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/puzpuzpuz/xsync"))
(home-page "https://github.com/puzpuzpuz/xsync")
(synopsis "Concurrent data structures for Go")
(description
"This package is an extension for the standard @code{sync} package and
provides the following concurrent data structures for Go: a concurrent
counter, concurrent hash table, multiple concurrent queues and @code{mutex}.")
(license license:expat)))
(define-public go-github-com-puzpuzpuz-xsync-v2
(package
(inherit go-github-com-puzpuzpuz-xsync)
(name "go-github-com-puzpuzpuz-xsync-v2")
(version "2.5.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/puzpuzpuz/xsync")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1almmzvkhyvhdwyhv9jphbhcm5yv45cmv9v39r3rcbkvl212igmz"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/puzpuzpuz/xsync/v2"))))
(define-public go-github-com-puzpuzpuz-xsync-v3
(package
(inherit go-github-com-puzpuzpuz-xsync-v2)
(name "go-github-com-puzpuzpuz-xsync-v3")
(version "3.5.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/puzpuzpuz/xsync")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0k2ir8ixr5h0rwfd4i0nxlgmcrklld06jcbp5ghxk6hpxrhzs1y8"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/puzpuzpuz/xsync/v3"))))
(define-public go-github-com-puzpuzpuz-xsync-v4
(package
(inherit go-github-com-puzpuzpuz-xsync-v3)
(name "go-github-com-puzpuzpuz-xsync-v4")
(version "4.5.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/puzpuzpuz/xsync")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "04caylbphjgq1qbpd09cg0b8h84y4zznsdfhi20w4f1628fq7077"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/puzpuzpuz/xsync/v4"))))
(define-public go-github-com-quasilyte-go-ruleguard-dsl (define-public go-github-com-quasilyte-go-ruleguard-dsl
(package (package
(name "go-github-com-quasilyte-go-ruleguard-dsl") (name "go-github-com-quasilyte-go-ruleguard-dsl")
@@ -29126,30 +28603,6 @@ designed to work with the MySQL protocol version 4.1 or greater. It definitely
works well with MySQL server version 5.0 and 5.1.") works well with MySQL server version 5.0 and 5.1.")
(license license:bsd-3))) (license license:bsd-3)))
(define-public go-github-com-ziutek-telnet
(package
(name "go-github-com-ziutek-telnet")
(version "0.1.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/ziutek/telnet")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0w0zn8yhpmhrph41dlf9pn5h1zzhgajxwbx85fk4d0m55xp0r680"))))
(build-system go-build-system)
(arguments
(list
#:import-path "github.com/ziutek/telnet"))
(home-page "https://github.com/ziutek/telnet")
(synopsis "Telnet interface in Go")
(description
"This package provides a simple interface for interacting with Telnet
connections.")
(license license:bsd-3)))
(define-public go-github-com-zk-org-pretty (define-public go-github-com-zk-org-pretty
(package (package
(name "go-github-com-zk-org-pretty") (name "go-github-com-zk-org-pretty")
@@ -30304,25 +29757,49 @@ organization}.")
(list (list
#:skip-build? #t #:skip-build? #t
#:import-path "go4.org" #:import-path "go4.org"
#:test-flags #~(list "-vet=off") #:test-subdirs
#~(list "bytereplacer/..."
;; "cloud/..." ; missing packages
"ctxutil/..."
"errorutil/..."
"fault/..."
"jsonconfig/..."
"legal/..."
"lock/..."
"media/..."
"must/..."
"net/..."
"net/throttle/..."
"oauthutil/..."
"osutil/..."
"readerutil/..."
"reflectutil/..."
"rollsum/..."
"sort/..."
"strutil/..."
"syncutil/..."
"testing/..."
"testing/functest/..."
"types/..."
;; "wkfs/..." ; missing packages
"writerutil/..."
"xdgdir/...")
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'remove-examples (add-after 'unpack 'remove-examples
(lambda* (#:key import-path #:allow-other-keys) (lambda* (#:key import-path #:allow-other-keys)
(with-directory-excursion (string-append "src/" import-path) (with-directory-excursion (string-append "src/" import-path)
(for-each delete-file (for-each delete-file
(find-files "." "example.*_test\\.go$")))))))) (find-files "." "example.*_test\\.go$"))))))
(native-inputs #:test-flags #~(list "-vet=off")))
;; XXX: Remove when cycle is fixed.
(list go-github-com-envoyproxy-go-control-plane))
(propagated-inputs (propagated-inputs
(list go-cloud-google-com-go (list ;; go-cloud-google-com-go
go-cloud-google-com-go-storage ;; go-cloud-google-com-go-storage
go-github-com-rwcarlsen-goexif go-github-com-rwcarlsen-goexif
go-golang-org-x-net go-golang-org-x-net
go-golang-org-x-oauth2 go-golang-org-x-oauth2
go-golang-org-x-sys go-golang-org-x-sys
go-google-golang-org-api)) #; go-google-golang-org-api))
(home-page "https://github.com/go4org/go4") (home-page "https://github.com/go4org/go4")
(synopsis "Collection of packages for Go programmers") (synopsis "Collection of packages for Go programmers")
(description (description
@@ -30369,30 +29846,6 @@ for locating directories
@end itemize") @end itemize")
(license (list license:asl2.0 license:bsd-3))))) (license (list license:asl2.0 license:bsd-3)))))
(define-public go-go4-org-mem
(package
(name "go-go4-org-mem")
(version "0.0.0-20240501181205-ae6ca9944745")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/go4org/mem")
(commit (go-version->git-ref version))))
(file-name (git-file-name name version))
(sha256
(base32 "1h2bam1h6xi0lx9s0k44fvd28vkb6rh9vndz3srhwi6axvm8ir0s"))))
(build-system go-build-system)
(arguments
(list
#:import-path "go4.org/mem"))
(home-page "https://go4.org/mem")
(synopsis "Cheap read-only memory types in Go")
(description
"Package mem provides the @code{mem.RO} type that allows you to cheaply
pass & access either a read-only @code{[]byte} or a @code{string}.")
(license license:asl2.0)))
(define-public go-golang-org-rainycape-unidecode (define-public go-golang-org-rainycape-unidecode
(let ((commit "cb7f23ec59bec0d61b19c56cd88cee3d0cc1870c") (let ((commit "cb7f23ec59bec0d61b19c56cd88cee3d0cc1870c")
(revision "1")) (revision "1"))
@@ -30985,8 +30438,8 @@ The yaml package supports most of YAML 1.2, but preserves some behavior from
;; to build NNCP and remove vendor) dependency for Golang. Full build depends ;; to build NNCP and remove vendor) dependency for Golang. Full build depends
;; on Bazel <https://bazel.build/>. ;; on Bazel <https://bazel.build/>.
(define-public go-gvisor-dev-gvisor (define-public go-gvisor-dev-gvisor
(let ((commit "9414b50a5633100fd7299a5a7998742575dcb669") (let ((commit "634ce95eed8d5b8e6b3e2ea30542c34cb30af148")
(revision "1")) (revision "0"))
(package (package
(name "go-gvisor-dev-gvisor") (name "go-gvisor-dev-gvisor")
(version (git-version "0.0.0" revision commit)) (version (git-version "0.0.0" revision commit))
@@ -30998,7 +30451,7 @@ The yaml package supports most of YAML 1.2, but preserves some behavior from
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0vqaclb2ignkcs7n463bj349m0xybdsv71i6afhzh8r05hdywzax")))) (base32 "1l3si6qlchwgsvaq6lxyvj8iq8n8pqxlayb1hbdf3pynxi52hfkw"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
(list (list
+20 -32
View File
@@ -578,10 +578,7 @@ This package provides the core library and elements.")
(substitute* "tests/check/meson.build" (substitute* "tests/check/meson.build"
;; This test causes nondeterministic failures (see: ;; This test causes nondeterministic failures (see:
;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/895>). ;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/895>).
((".*'elements/appsrc.c'.*") "") ((".*'elements/appsrc.c'.*") ""))
;; This one is flaky (see:
;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/work_items/5016>).
((".*'elements/inputselector.c'.*") ""))
;; Some other tests fail on other architectures. ;; Some other tests fail on other architectures.
#$@(cond #$@(cond
((target-x86-32?) ((target-x86-32?)
@@ -769,8 +766,7 @@ model to base your own plug-in on, here it is.")
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
#:configure-flags #~(list "-Dgpl=enabled" #:configure-flags #~(list "-Dsctp-internal-usrsctp=disabled"
"-Dsctp-internal-usrsctp=disabled"
;; TODO: Figure out why audiovisualizer test ;; TODO: Figure out why audiovisualizer test
;; fails on riscv64-linux. ;; fails on riscv64-linux.
#$@(if (target-riscv64?) #$@(if (target-riscv64?)
@@ -780,15 +776,6 @@ model to base your own plug-in on, here it is.")
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
#$@%common-gstreamer-phases #$@%common-gstreamer-phases
(add-after 'unpack 'patch-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "ext/resindvd/resindvdsrc.c"
;; `g_module_open' is a wrapper above dlopen; pass it the
;; absolute file name of the library to ensure it is always
;; found.
(("\"libdvdcss\"")
(format #f "~s"
(search-input-file inputs "lib/libdvdcss.so"))))))
(add-after 'unpack 'adjust-tests (add-after 'unpack 'adjust-tests
(lambda* (#:key native-inputs inputs #:allow-other-keys) (lambda* (#:key native-inputs inputs #:allow-other-keys)
(let ((gst-plugins-good (assoc-ref (or native-inputs inputs) (let ((gst-plugins-good (assoc-ref (or native-inputs inputs)
@@ -802,18 +789,18 @@ model to base your own plug-in on, here it is.")
;; The 'elements_shm.test_shm_live' test sometimes times out ;; The 'elements_shm.test_shm_live' test sometimes times out
;; (see: ;; (see:
;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/790>). ;; https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/790).
((".*'elements/shm\\.c'.*") "") ((".*'elements/shm\\.c'.*") "")
;; The 'elements_curlhttpsrc' test sometimes times out. ;; The 'elements_curlhttpsrc' test sometimes times out.
((".*'elements/curlhttpsrc\\.c'.*") "") ((".*'elements/curlhttpsrc\\.c'.*") "")
;; The 'mxfdemux' test fails for unknown reasons (see: ;; The 'mxfdemux' test fails for unknown reasons (see:
;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/3921>). ;; https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/3921).
((".*'elements/mxfdemux.c'.*") "") ((".*'elements/mxfdemux.c'.*") "")
;; Unexpected critical/warning, see ;; Unexpected critical/warning, see
;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/792> ;; <https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/3000>
((".*'elements/netsim\\.c'.*") "") ((".*'elements/netsim\\.c'.*") "")
;; TODO: Figure out why this test fails on riscv64-linux. ;; TODO: Figure out why this test fails on riscv64-linux.
@@ -822,19 +809,30 @@ model to base your own plug-in on, here it is.")
"'elements/viewfinderbin.c'], true, ],")) "'elements/viewfinderbin.c'], true, ],"))
'()) '())
;; This test is flaky. ;; This test is flaky on at least some architectures.
;; https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/1244 ;; https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/1244
(("'elements/camerabin\\.c'\\].*],") #$@(if (member (%current-system)
"'elements/camerabin.c'], true, ],") '("aarch64-linux" "riscv64-linux"))
`((("'elements/camerabin\\.c'\\].*],")
"'elements/camerabin.c'], true, ],"))
'())
;; https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad/-/issues/1412 ;; https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad/-/issues/1412
((".*elements/dtls\\.c.*") "") ((".*elements/dtls\\.c.*") "")
;; https://gitlab.freedesktop.org/gstreamer/gstreamer/-/issues/3921
((".*elements/mxfdemux\\.c.*") "")
;; Unable to create pipeline 'bin. ;; Unable to create pipeline 'bin.
;; ( vulkanupload ! vulkancolorconvert ! vulkandownload )': ;; ( vulkanupload ! vulkancolorconvert ! vulkandownload )':
;; no element "vulkanupload" ;; no element "vulkanupload"
((".*elements/vkcolorconvert\\.c.*") "") ((".*elements/vkcolorconvert\\.c.*") "")
((".*elements/vkupload\\.c.*") ""))))) ((".*elements/vkupload\\.c.*") ""))
(substitute* "tests/check/elements/zxing.c"
;; zxing 1.2.0 seemingly changed the type representation of
;; the EAN_13 structure; disable it.
((".*\"EAN_13\".*")
"")))))
(add-before 'check 'pre-check (add-before 'check 'pre-check
(lambda _ (lambda _
;; Tests require a running X server. ;; Tests require a running X server.
@@ -1164,19 +1162,9 @@ after their category.")
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list #:glib-or-gtk? #t ; To wrap binaries and/or compile schemas (list #:glib-or-gtk? #t ; To wrap binaries and/or compile schemas
#:configure-flags #~(list "-Dgpl=enabled")
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
#$@%common-gstreamer-phases #$@%common-gstreamer-phases
(add-after 'unpack 'patch-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "ext/dvdread/dvdreadsrc.c"
;; `g_module_open' is a wrapper above dlopen; pass it the
;; absolute file name of the library to ensure it is always
;; found.
(("\"libdvdcss\"")
(format #f "~s"
(search-input-file inputs "lib/libdvdcss.so"))))))
(add-before 'check 'pre-check (add-before 'check 'pre-check
(lambda _ (lambda _
;; Tests require a running X server. ;; Tests require a running X server.
+38 -81
View File
@@ -24,7 +24,7 @@
;;; Copyright © 2019 Giacomo Leidi <therewasa@fishinthecalculator.me> ;;; Copyright © 2019 Giacomo Leidi <therewasa@fishinthecalculator.me>
;;; Copyright © 2020 Brendan Tildesley <mail@brendan.scot> ;;; Copyright © 2020 Brendan Tildesley <mail@brendan.scot>
;;; Copyright © 2020 Guillaume Le Vaillant <glv@posteo.net> ;;; Copyright © 2020 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2020-2026 Maxim Cournoyer <maxim@guixotic.coop> ;;; Copyright © 2020-2025 Maxim Cournoyer <maxim@guixotic.coop>
;;; Copyright © 2021 Leo Famulari <leo@famulari.name> ;;; Copyright © 2021 Leo Famulari <leo@famulari.name>
;;; Copyright © 2021 Simon Streit <simon@netpanic.org> ;;; Copyright © 2021 Simon Streit <simon@netpanic.org>
;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be> ;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be>
@@ -387,7 +387,7 @@ applications.")
(define-public pango (define-public pango
(package (package
(name "pango") (name "pango")
(version "1.57.1") (version "1.56.4")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -396,7 +396,7 @@ applications.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0dfvlag7jhf4fzraxwhx4s016h2z7igq3knza9vfklkss8igs00a")))) "0jnmydds9dmdah4fjj5rr5gmf1imxlxjc0w98if642n98vmsdf67"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -647,7 +647,7 @@ highlighting and other features typical of a source code editor.")
(define-public gdk-pixbuf (define-public gdk-pixbuf
(package (package
(name "gdk-pixbuf") (name "gdk-pixbuf")
(version "2.44.5") (version "2.44.4")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -655,7 +655,7 @@ highlighting and other features typical of a source code editor.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"0s5b010jlinmki5iidbj2yip8n2sxc6xc0qmcvpc104v2c4kxfb9")) "05xxpl3sd37lsp5qqy01m0w9c14dqfi84x9rawsffyj2y71sm8ck"))
(patches (patches
(search-patches (search-patches
"gdk-pixbuf-honor-GUIX_GDK_PIXBUF_MODULE_FILES.patch")))) "gdk-pixbuf-honor-GUIX_GDK_PIXBUF_MODULE_FILES.patch"))))
@@ -781,7 +781,7 @@ images.")
(hidden-package (hidden-package
(package (package
(name "at-spi2-core") (name "at-spi2-core")
(version "2.60.0") (version "2.52.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -789,7 +789,7 @@ images.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"16fb2hv12k2vzh462gbd4qf8ipvnb2ijrc5d7w56dzfqjwd0rrc0")))) "1azmbzik0gl2s03c9lq3dff3h1iql1zvlwn28yhizl68421zrhqa"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
@@ -987,7 +987,7 @@ application suites.")
(package (package
(inherit gtk+-2) (inherit gtk+-2)
(name "gtk+") (name "gtk+")
(version "3.24.52") (version "3.24.51")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -996,11 +996,10 @@ application suites.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"197w1mb5vqm5d07sgdqkg54can7f1p4yjh42zx0y8z6m9p43shck")) "07vw0rani9d65px36fzzj7sprv5r48shyjdgzipkihzqaldd98yh"))
(patches (search-patches (patches (search-patches
"gtk3-respect-GUIX_GTK3_PATH.patch" "gtk3-respect-GUIX_GTK3_PATH.patch"
"gtk3-respect-GUIX_GTK3_IM_MODULE_FILE.patch" "gtk3-respect-GUIX_GTK3_IM_MODULE_FILE.patch"))))
"gtk3-treeview-test-fix.patch"))))
;; There is no "doc" output, because adding gtk-doc here would introduce a ;; There is no "doc" output, because adding gtk-doc here would introduce a
;; dependency cycle with itself. ;; dependency cycle with itself.
(outputs '("out" "bin")) (outputs '("out" "bin"))
@@ -1076,20 +1075,22 @@ application suites.")
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'disable-failing-tests (add-after 'unpack 'disable-failing-tests
(lambda _ (lambda _
(substitute* "testsuite/gtk/meson.build" ;; These tests fail only in the containerized environment, for
((".*\\['defaultvalue'],.*") "") ;; unknown reasons.
((".*\\['objects-finalize',.*") "")) (substitute* "testsuite/gtk/meson.build"
;; The 'flipping-icons.ui' and 'gtk-icontheme-sizing.ui' tests ((".*\\['defaultvalue'],.*") "")
;; fail for unknown reasons (see: ((".*\\['objects-finalize',.*") ""))
;; <https://gitlab.gnome.org/GNOME/gtk/-/issues/7679>). ;; The 'flipping-icons.ui' and 'gtk-icontheme-sizing.ui' tests
(substitute* "testsuite/reftests/meson.build" ;; fail for unknown reasons (see:
((" 'flipping-icons.ui',.*") "") ;; <https://gitlab.gnome.org/GNOME/gtk/-/issues/7679>).
((" 'gtk-icontheme-sizing.ui',.*") "")) (substitute* "testsuite/reftests/meson.build"
;; This test fails just on i686-linux, for unknown reasons. ((" 'flipping-icons.ui',.*") "")
#$@(if (target-x86-32?) ((" 'gtk-icontheme-sizing.ui',.*") ""))
#~((substitute* "testsuite/reftests/meson.build" ;; This test fails just on i686-linux, for unknown reasons.
((" 'linear-gradient.ui',.*") ""))) #$@(if (target-x86-32?)
#~()))) #~((substitute* "testsuite/reftests/meson.build"
((" 'linear-gradient.ui',.*") "")))
#~())))
(add-after 'unpack 'generate-gdk-pixbuf-loaders-cache-file (add-after 'unpack 'generate-gdk-pixbuf-loaders-cache-file
(assoc-ref glib-or-gtk:%standard-phases (assoc-ref glib-or-gtk:%standard-phases
'generate-gdk-pixbuf-loaders-cache-file)) 'generate-gdk-pixbuf-loaders-cache-file))
@@ -1113,13 +1114,13 @@ application suites.")
"/share/applications"))))))) "/share/applications")))))))
(native-search-paths (native-search-paths
(list (search-path-specification (list (search-path-specification
(variable "GUIX_GTK3_PATH") (variable "GUIX_GTK3_PATH")
(files '("lib/gtk-3.0"))))))) (files '("lib/gtk-3.0")))))))
(define-public gtk (define-public gtk
(package (package
(name "gtk") (name "gtk")
(version "4.22.1") (version "4.20.3")
(source (source
(origin (origin
(method url-fetch) (method url-fetch)
@@ -1127,11 +1128,9 @@ application suites.")
(version-major+minor version) "/" (version-major+minor version) "/"
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 "1z2mkmazc2d51jbg3qwwdycycqiwswm88nhw6bxscz8j86f5lyyd")) (base32 "0ly1gqc6ybxv5f2a9hvjp5k6l9mfzy2yv8iy2xqnr9l8628g4wr8"))
(patches (patches
(search-patches "gtk4-demo-reproducible.patch" (search-patches "gtk4-respect-GUIX_GTK4_PATH.patch"))
"gtk4-needs-udmabuf.patch"
"gtk4-respect-GUIX_GTK4_PATH.patch"))
(modules '((guix build utils))))) (modules '((guix build utils)))))
(build-system meson-build-system) (build-system meson-build-system)
(outputs '("out" "bin" "doc")) (outputs '("out" "bin" "doc"))
@@ -1199,9 +1198,6 @@ application suites.")
(("[ \t]*'empty-text.node',") "") (("[ \t]*'empty-text.node',") "")
(("[ \t]*'testswitch.node',") "") (("[ \t]*'testswitch.node',") "")
(("[ \t]*'widgetfactory.node',") "") (("[ \t]*'widgetfactory.node',") "")
;; The gtklistitemmanager test is flaky (see:
;; <https://gitlab.gnome.org/GNOME/gtk/-/issues/6547>).
((".*'gtklistitemmanager.c',.*") "")
;; XXX: Figure out why this fails and report upstream. ;; XXX: Figure out why this fails and report upstream.
((".*'memorytexture',.*") "") ((".*'memorytexture',.*") "")
((".*'yuv-matrix-dmabuf',.*") "")) ((".*'yuv-matrix-dmabuf',.*") ""))
@@ -1258,10 +1254,8 @@ application suites.")
(setenv "XDG_CACHE_HOME" (getcwd)))) (setenv "XDG_CACHE_HOME" (getcwd))))
(add-before 'check 'pre-check (add-before 'check 'pre-check
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
;; Tests require a running X server. The '-noreset' option is ;; Tests require a running X server.
;; necessary to avoid spurious "Failed to open display" test (system "Xvfb :1 +extension GLX &")
;; errors.
(system "Xvfb :1 +extension GLX -screen 0 1024x768x24 -noreset &")
(setenv "DISPLAY" ":1") (setenv "DISPLAY" ":1")
;; Tests write to $HOME. ;; Tests write to $HOME.
(setenv "HOME" (getcwd)) (setenv "HOME" (getcwd))
@@ -1304,7 +1298,6 @@ application suites.")
docbook-xsl docbook-xsl
gettext-minimal gettext-minimal
`(,glib "bin") `(,glib "bin")
glibc-utf8-locales ;some tests require en_US.UTF-8
gobject-introspection ;for building introspection data gobject-introspection ;for building introspection data
graphene graphene
gtk-doc/stable ;for building documentation gtk-doc/stable ;for building documentation
@@ -1328,6 +1321,7 @@ application suites.")
(inputs (inputs
(list colord ;for color printing support (list colord ;for color printing support
cups ;for CUPS print-backend cups ;for CUPS print-backend
ffmpeg ;for ffmpeg media-backend
fribidi fribidi
gi-docgen gi-docgen
gstreamer ;for gstreamer media-backend gstreamer ;for gstreamer media-backend
@@ -1371,8 +1365,8 @@ application suites.")
(native-search-paths (native-search-paths
(list (list
(search-path-specification (search-path-specification
(variable "GUIX_GTK4_PATH") (variable "GUIX_GTK4_PATH")
(files '("lib/gtk-4.0"))))) (files '("lib/gtk-4.0")))))
(search-paths native-search-paths) (search-paths native-search-paths)
(home-page "https://www.gtk.org/") (home-page "https://www.gtk.org/")
(synopsis "Cross-platform widget toolkit") (synopsis "Cross-platform widget toolkit")
@@ -2211,7 +2205,7 @@ information.")
(define-public gtk-doc (define-public gtk-doc
(package (package
(name "gtk-doc") (name "gtk-doc")
(version "1.35.1") (version "1.34.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://gnome/sources/" name "/" (uri (string-append "mirror://gnome/sources/" name "/"
@@ -2219,7 +2213,7 @@ information.")
name "-" version ".tar.xz")) name "-" version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"1qi5bgqca1chdcfw7v4h3sw8jg661nmp77d7x658mn6nxlj9y731")) "0746lwxgybc5ss3hzdd0crjjghk0ck0x9jbmz73iig405arp42xj"))
(patches (patches
(search-patches "gtk-doc-respect-xml-catalog.patch" (search-patches "gtk-doc-respect-xml-catalog.patch"
"gtk-doc-mkhtml-test-fix.patch")))) "gtk-doc-mkhtml-test-fix.patch"))))
@@ -2769,43 +2763,6 @@ entire output. It supports all Layer Shell features including popups and
popovers.") popovers.")
(license license:expat))) (license license:expat)))
(define-public xdg-user-dirs-gtk
(package
(name "xdg-user-dirs-gtk")
(version "0.16")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.gnome.org/GNOME/xdg-user-dirs-gtk.git")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"11h1164mkajpfrp6mkky2gvx3xd7dw0c9f2785jf4lys4jmmj4c3"))))
(build-system meson-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-exec-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "update.c"
(("xdg-user-dirs-update")
(search-input-file inputs "/bin/xdg-user-dirs-update"))))))))
(native-inputs
(list gettext-minimal
pkg-config))
(inputs
(list gtk+
xdg-user-dirs))
(home-page "https://gitlab.gnome.org/GNOME/xdg-user-dirs-gtk")
(synopsis "Integration of xdg-user-dirs with GTK")
(description "This package is a companion to @code{xdg-user-dirs} to
integrate it with the GNOME desktop and GTK applications. It gets run during
login to create default GTK bookmarks files containing the user directories, and
to rename these directories if the locale changes.")
(license license:gpl2+)))
(define-public goocanvas (define-public goocanvas
(package (package
(name "goocanvas") (name "goocanvas")
+3 -3
View File
@@ -7764,8 +7764,8 @@ is an attempt to combine both into something useful.")
(license license:asl2.0)))) (license license:asl2.0))))
(define-public guile-knots (define-public guile-knots
(let ((commit "49996c432a4616e03ecaf01cb42afc5fd78eafd5") (let ((commit "f767eca066495e6582e89ba1b91907c0c5657878")
(revision "35")) (revision "34"))
(package (package
(name "guile-knots") (name "guile-knots")
(version (git-version "0.1" revision commit)) (version (git-version "0.1" revision commit))
@@ -7776,7 +7776,7 @@ is an attempt to combine both into something useful.")
(commit commit))) (commit commit)))
(sha256 (sha256
(base32 (base32
"0i6vk432shy7qmsq1hli71a9kmgf8yy9hx3bck0r9qzsldv1m3m9")) "18fqmpyrrxy8phxxm5b7d1qhhvc3rsrs243xiinkj2hn2ca1cqi8"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
+11 -11
View File
@@ -23,7 +23,6 @@
;;; Copyright © 2025 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2025 Eric Bavier <bavier@posteo.net>
;;; Copyright © 2025 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2025 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2025 James Smith <jsubuntuxp@disroot.org> ;;; Copyright © 2025 James Smith <jsubuntuxp@disroot.org>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -1001,21 +1000,22 @@ information can be viewed in real time and/or logged to a file.")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri
(url "https://github.com/dell/libsmbios") (git-reference
(commit (string-append "v" version)))) (url (string-append "https://github.com/dell/" name))
(commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0krwwydyvb9224r884y1mlmzyxhlfrcqw73vi1j8787rl0gl5a2i")))) (base32 "0krwwydyvb9224r884y1mlmzyxhlfrcqw73vi1j8787rl0gl5a2i"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
(list autoconf `(("autoconf" ,autoconf)
automake ("automake" ,automake)
gettext-minimal ("gettext" ,gettext-minimal)
libtool ("libtool" ,libtool)
pkg-config ("pkg-config" ,pkg-config)
perl ("perl" ,perl)
python)) ("python" ,python)))
(inputs (inputs
(list libxml2)) (list libxml2))
(arguments (arguments
+3 -3
View File
@@ -89,14 +89,14 @@
(define-public ibus-minimal (define-public ibus-minimal
(package (package
(name "ibus") (name "ibus")
(version "1.5.34-rc2") (version "1.5.32")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/ibus/ibus") (url "https://github.com/ibus/ibus")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (base32 "1x05dwhi79s1mqgs34srdr2d5fvkyvihqvcnw91630xyf4r76b1h")))) (sha256 (base32 "1rn2xpzi6x57n01rjin4a2h8yy1wdmvadgnglw0p6bdnc31q17a6"))))
(build-system glib-or-gtk-build-system) (build-system glib-or-gtk-build-system)
(outputs '("out" "doc")) (outputs '("out" "doc"))
(arguments (arguments
@@ -204,7 +204,7 @@
wayland wayland
xmodmap)) xmodmap))
(native-inputs (native-inputs
(list autoconf-2.72 (list autoconf
automake automake
docbook-xml-4.1.2 docbook-xml-4.1.2
`(,glib "bin") ;for glib-genmarshal `(,glib "bin") ;for glib-genmarshal
+11 -14
View File
@@ -38,7 +38,6 @@
;;; Copyright © 2025 Zhu Zihao <all_but_last@163.com> ;;; Copyright © 2025 Zhu Zihao <all_but_last@163.com>
;;; Copyright © 2025 Vinicius Monego <monego@posteo.net> ;;; Copyright © 2025 Vinicius Monego <monego@posteo.net>
;;; Copyright © 2025 Igorj Gorjaĉev <igor@goryachev.org> ;;; Copyright © 2025 Igorj Gorjaĉev <igor@goryachev.org>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -306,7 +305,7 @@ actions.")
(define-public geeqie (define-public geeqie
(package (package
(name "geeqie") (name "geeqie")
(version "2.7") (version "2.6.1")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -314,12 +313,11 @@ actions.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(sha256 (sha256
(base32 (base32
"139ffzqqq79d3k5q99r8i1jr9v9vfwv89dkh6vvw1mdnv6b3s9n8")) "08yr8jqli33rn1zvj9mjvinyzjp2myakxgf8wqqq8yidmm0vvn1p"))
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list
#:glib-or-gtk? #t
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
;; Disable test which requires binaries not present ;; Disable test which requires binaries not present
@@ -348,7 +346,6 @@ actions.")
libwebp)) libwebp))
(native-inputs (native-inputs
(list `(,glib "bin") ; glib-gettextize (list `(,glib "bin") ; glib-gettextize
gsettings-desktop-schemas
intltool intltool
pkg-config pkg-config
python ; for tests python ; for tests
@@ -927,15 +924,15 @@ with tiling window managers. Features include:
;; That is required for testing. ;; That is required for testing.
xorg-server-for-tests)) xorg-server-for-tests))
(inputs (inputs
(list imlib2 `(("imlib2" ,imlib2)
glib ("glib" ,glib)
gtk+-2 ("gtk+" ,gtk+-2)
lcms ("lcms" ,lcms)
libjpeg-turbo ("libjpeg" ,libjpeg-turbo)
libtiff ("libtiff" ,libtiff)
libexif ("libexif" ,libexif)
libx11 ("libx11" ,libx11)
libxext)) ("libxext" ,libxext)))
(arguments (arguments
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
+29 -75
View File
@@ -71,12 +71,11 @@
#:use-module (gnu packages build-tools) #:use-module (gnu packages build-tools)
#:use-module (gnu packages check) #:use-module (gnu packages check)
#:use-module (gnu packages cmake) #:use-module (gnu packages cmake)
#:use-module (gnu packages compression)
#:use-module (gnu packages cpp) #:use-module (gnu packages cpp)
#:use-module (gnu packages curl) #:use-module (gnu packages curl)
#:use-module (gnu packages compression)
#:use-module (gnu packages datastructures) #:use-module (gnu packages datastructures)
#:use-module (gnu packages documentation) #:use-module (gnu packages documentation)
#:use-module (gnu packages fonts)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages freedesktop) #:use-module (gnu packages freedesktop)
#:use-module (gnu packages gcc) #:use-module (gnu packages gcc)
@@ -97,11 +96,10 @@
#:use-module (gnu packages mcrypt) #:use-module (gnu packages mcrypt)
#:use-module (gnu packages mp3) #:use-module (gnu packages mp3)
#:use-module (gnu packages ncurses) #:use-module (gnu packages ncurses)
#:use-module (gnu packages ocr)
#:use-module (gnu packages perl) #:use-module (gnu packages perl)
#:use-module (gnu packages photo) #:use-module (gnu packages photo)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages popt) #:use-module (gnu packages popt)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python) #:use-module (gnu packages python)
#:use-module (gnu packages python-build) #:use-module (gnu packages python-build)
#:use-module (gnu packages python-check) #:use-module (gnu packages python-check)
@@ -117,6 +115,7 @@
#:use-module (gnu packages xdisorg) #:use-module (gnu packages xdisorg)
#:use-module (gnu packages xml) #:use-module (gnu packages xml)
#:use-module (gnu packages xorg) #:use-module (gnu packages xorg)
#:use-module (gnu packages fonts)
#:use-module ((guix licenses) #:prefix license:) #:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (guix gexp) #:use-module (guix gexp)
@@ -184,81 +183,36 @@ convert images in more than 100 different formats.")
(define-public gradia (define-public gradia
(package (package
(name "gradia") (name "gradia")
(version "1.13.0") (version "1.2.1")
(source (source (origin
(origin (method git-fetch)
(method git-fetch) (uri (git-reference
(uri (git-reference (url "https://github.com/AlexanderVanhee/Gradia")
(url "https://github.com/AlexanderVanhee/Gradia") (commit (string-append "v" version))))
(commit (string-append "v" version)))) (file-name (git-file-name name version))
(file-name (git-file-name name version)) (sha256
(sha256 (base32 "07hal4h3kkjf7la02nqmqgw19sa6hkd130bkfmgwjimkv9zi8z2i"))))
(base32 "00s6xj9crj5gkh233q98fmq67f41y877xgrn49cycwb3kybp237n"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
(list (list #:glib-or-gtk? #t
#:imported-modules (append %meson-build-system-modules #:phases
%pyproject-build-system-modules) #~(modify-phases %standard-phases
#:modules '((guix build meson-build-system) (add-after 'unpack 'skip-gtk-update-icon-cache
((guix build pyproject-build-system) (lambda _
#:prefix py:) (substitute* "meson.build"
(guix build utils)) (("gtk_update_icon_cache: true")
#:glib-or-gtk? #t "gtk_update_icon_cache: false")
#:phases (("update_desktop_database: true")
#~(modify-phases %standard-phases "update_desktop_database: false")))))))
(add-after 'unpack 'skip-gtk-update-icon-cache (inputs (list gtk libadwaita python python-pygobject))
(lambda _ (native-inputs
(substitute* "meson.build" (list blueprint-compiler gettext-minimal `(,glib "bin") pkg-config))
(("gtk_update_icon_cache: true")
"gtk_update_icon_cache: false")
(("update_desktop_database: true")
"update_desktop_database: false"))))
(add-after 'unpack 'set-tesseract-and-tessdata-path
(lambda _
(let* ((tesseract #$(this-package-input "tesseract-ocr"))
(tesseract-bin (string-append tesseract "/bin/tesseract"))
(tessdata (string-append tesseract "/share/tessdata")))
(substitute* "meson.build"
(("OCR_TESSERACT_CMD = '/app/bin/tesseract'")
(format #f "OCR_TESSERACT_CMD = '~a'" tesseract-bin))
(("OCR_ORIGINAL_TESSDATA_DIR = '/app/share/tessdata'")
(format #f "OCR_ORIGINAL_TESSDATA_DIR = '~a'" tessdata))))))
(add-after 'glib-or-gtk-wrap 'python-and-gi-wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(wrap-program (string-append #$output "/bin/gradia")
`("GUIX_PYTHONPATH" =
(,(getenv "GUIX_PYTHONPATH") ,(py:site-packages inputs
outputs)))
`("GI_TYPELIB_PATH" =
(,(getenv "GI_TYPELIB_PATH")))
`("GDK_PIXBUF_MODULE_FILE" =
(,(getenv "GDK_PIXBUF_MODULE_FILE")))))))))
(inputs (list bash-minimal
gtk
gtksourceview
libadwaita
libportal
libsoup
python
python-pillow
python-pycairo
python-pygobject
python-pytesseract
tesseract-ocr
webp-pixbuf-loader))
(native-inputs (list blueprint-compiler
desktop-file-utils
gettext-minimal
`(,glib "bin")
gobject-introspection
pkg-config))
(home-page "https://github.com/AlexanderVanhee/Gradia") (home-page "https://github.com/AlexanderVanhee/Gradia")
(synopsis "Edit screenshots") (synopsis "Edit screenshots")
(description (description "Gradia is a GTK 4 application for enhancing and preparing
"Gradia is a GTK 4 application for enhancing and preparing
screenshots for blogs, social media, and documentation. It supports background screenshots for blogs, social media, and documentation. It supports background
customization, annotation tools (pen, arrow, text, highlight, stamp), padding, customization, annotation tools (pen, arrow, text, highlight, stamp), padding,
cropping, @acronym{OCR, optical character recognition} and various export formats.") cropping, and various export formats.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public iqa (define-public iqa
@@ -2854,7 +2808,7 @@ Format) file format decoder and encoder.")
(define-public libjxl (define-public libjxl
(package (package
(name "libjxl") (name "libjxl")
(version "0.11.2") (version "0.11.1")
(outputs (list "out" "pixbuf-loader")) (outputs (list "out" "pixbuf-loader"))
(source (source
(origin (origin
@@ -2865,7 +2819,7 @@ Format) file format decoder and encoder.")
(recursive? #t))) (recursive? #t)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1c7d0mlxmmjby00hzgwqfyr6nb6lqcgcjsqcdmg2l10rmxiw33rg")) (base32 "1wfxzrhj8a19z6x47ib1qbmgyg56jsxjs955xcvqhdkrx8l2271r"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; Delete the bundles that will not be used. ;; Delete the bundles that will not be used.
+7 -8
View File
@@ -18,7 +18,6 @@
;;; Copyright © 2024 Christian Miller <christian.miller@dadoes.de> ;;; Copyright © 2024 Christian Miller <christian.miller@dadoes.de>
;;; Copyright © 2024 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2024 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2025 Zheng Junjie <z572@z572.online> ;;; Copyright © 2025 Zheng Junjie <z572@z572.online>
;;; Copyright © 2026 Daniel Littlewood <dan@danielittlewood.xyz>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -422,8 +421,8 @@ using a mouse. It is customizable and extensible with plugins and scripts.")
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/SrainApp/srain") (url "https://github.com/SrainApp/srain")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "105z2kbj9ar6zk6i1qrbysrp9vbz692kbl2dwdxcwly0yh4cbd0p")))) (base32 "105z2kbj9ar6zk6i1qrbysrp9vbz692kbl2dwdxcwly0yh4cbd0p"))))
@@ -434,11 +433,11 @@ using a mouse. It is customizable and extensible with plugins and scripts.")
#:tests? #f ;there are no tests #:tests? #f ;there are no tests
#:glib-or-gtk? #t)) #:glib-or-gtk? #t))
(native-inputs (native-inputs
(list gettext-minimal `(("gettext" ,gettext-minimal)
`(,glib "bin") ("glib:bin" ,glib "bin")
pkg-config ("pkg-config" ,pkg-config)
python-wrapper ("python" ,python-wrapper)
python-sphinx)) ("python-sphinx" ,python-sphinx)))
(inputs (inputs
(list glib-networking (list glib-networking
gsettings-desktop-schemas gsettings-desktop-schemas
+1 -13
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014-2019, 2021, 2026 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2021 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2021, 2026 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2021, 2026 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017 Leo Famulari <leo@famulari.name> ;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2017, 2022 Marius Bakke <marius@gnu.org> ;;; Copyright © 2017, 2022 Marius Bakke <marius@gnu.org>
@@ -226,18 +226,6 @@ JNI.")
(setenv "JAVACMD" (search-input-file inputs "/bin/jamvm")) (setenv "JAVACMD" (search-input-file inputs "/bin/jamvm"))
(setenv "JAVAC" (search-input-file inputs "/bin/jikes")) (setenv "JAVAC" (search-input-file inputs "/bin/jikes"))
(setenv "CLASSPATH" (search-input-file inputs "/lib/rt.jar")))) (setenv "CLASSPATH" (search-input-file inputs "/lib/rt.jar"))))
,@(if (target-x86-32?)
;; XXX: On i686 isFile() always seems to return true. Patching
;; this here is very ugly, but the effects are limited. None
;; of these changes remain by the time we've built Icedtea and
;; the other JDKs.
'((add-after 'unpack 'disable-isFile-checks
(lambda _
(substitute* "src/main/org/apache/tools/ant/util/ResourceUtils.java"
(("destFile = \\(\\(FileProvider\\).*") ""))
(substitute* "src/main/org/apache/tools/ant/taskdefs/Mkdir.java"
(("dir.isFile\\(\\)") "false")))))
'())
(replace 'build (replace 'build
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
;; Ant complains if this file doesn't exist. ;; Ant complains if this file doesn't exist.
+9 -60
View File
@@ -165,18 +165,17 @@ ascii art drawings that contain characters that resemble lines like @samp{|}
"017n1w6hds4wrz597jk7v8r6pz0kz5j9xwd240nq7s8hc58d4c2q")) "017n1w6hds4wrz597jk7v8r6pz0kz5j9xwd240nq7s8hc58d4c2q"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; Remove pre-built native libraries. '(for-each
'(for-each delete-file delete-file
(find-files "." "\\.(dll|dylib|so)$"))))) (find-files "flatlaf-core/src/main/resources/com/formdev/flatlaf/natives/"
".*")))))
(build-system ant-build-system) (build-system ant-build-system)
(arguments (arguments
(list (list
#:jdk openjdk17
#:tests? #false ;XXX requires junit5 #:tests? #false ;XXX requires junit5
#:modules '((guix build ant-build-system) #:jar-name "flatlaf.jar"
(guix build java-utils) #:source-dir '(list "flatlaf-core/src/main/java")
(guix build utils) #:test-dir '(list "flatlaf-core/src/test")
(sxml simple))
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-before 'configure 'build-native-code (add-before 'configure 'build-native-code
@@ -225,58 +224,8 @@ ascii art drawings that contain characters that resemble lines like @samp{|}
(add-before 'build 'copy-resources (add-before 'build 'copy-resources
(lambda _ (lambda _
(copy-recursively "flatlaf-core/src/main/resources" (copy-recursively "flatlaf-core/src/main/resources"
"build/classes"))) "build/classes"))))))
(add-before 'build 'generate-pom (inputs (list libx11 libxt))
(lambda _
(call-with-output-file "pom.xml"
(lambda (port)
(sxml->xml
`(*TOP*
(*PI* xml "version=\"1.0\" encoding=\"UTF-8\"")
(project
(modelVersion "4.0.0")
(groupId "com.formdev")
(artifactId "flatlaf")
(version ,#$version)))
port)))))
(replace 'build
(lambda* (#:key inputs #:allow-other-keys)
(let* ((jdk (assoc-ref inputs "jdk"))
(src-dir "flatlaf-core/src/main/java")
(java9-dir "flatlaf-core/src/main/java9")
(classes-dir "build/classes")
(classes9-dir "build/classes9")
(jar-file
(string-append "build/flatlaf-" #$version ".jar")))
;; Compile main sources (Java 8 target).
(apply invoke "javac"
"--release" "8"
"-d" classes-dir
(find-files src-dir "\\.java$"))
;; Compile Java 9 multi-release sources.
(mkdir-p classes9-dir)
(apply invoke "javac"
"--release" "9"
"-cp" classes-dir
"-d" classes9-dir
(find-files java9-dir "\\.java$"))
;; Create multi-release JAR.
(let ((meta-versions
(string-append classes-dir
"/META-INF/versions/9")))
(mkdir-p meta-versions)
(copy-recursively classes9-dir meta-versions))
(call-with-output-file "build/manifest.mf"
(lambda (port)
(display "Multi-Release: true\n" port)))
(invoke "jar" "--create"
"--file" jar-file
"--manifest" "build/manifest.mf"
"-C" classes-dir "."))))
(replace 'install
(install-from-pom "pom.xml")))))
(inputs
(list libx11 libxt))
(home-page "https://www.formdev.com/flatlaf/") (home-page "https://www.formdev.com/flatlaf/")
(synopsis "Flat Look and Feel for Java Swing applications") (synopsis "Flat Look and Feel for Java Swing applications")
(description "FlatLaf is a cross-platform Look and Feel for Java Swing (description "FlatLaf is a cross-platform Look and Feel for Java Swing
+8 -1957
View File
File diff suppressed because it is too large Load Diff
+8 -21
View File
@@ -1088,9 +1088,9 @@ wrappers.")
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (url "https://github.com/tc39/test262") (uri (git-reference (url "https://github.com/tc39/test262")
(commit "a6f387de323eb9ae56448bdb71c5d315df631ce4"))) (commit "a5e69a1534de88d1eb29b76657d84c8541b72df7")))
(file-name "test262") (file-name "test262")
(sha256 (base32 "09avg4f75rzbmh3hcybdvjij7hbl2m79x6xp1hgl6h8ihfbn33l0")) (sha256 (base32 "078a7nim0n9x36q7q8yvjwhk4ig29p25b03rr4l7g2b545cky66l"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet #~(begin (snippet #~(begin
(for-each delete-file (for-each delete-file
@@ -1100,7 +1100,7 @@ wrappers.")
(define-public quickjs-ng (define-public quickjs-ng
(package (package
(name "quickjs-ng") (name "quickjs-ng")
(version "0.14.0") (version "0.11.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -1109,7 +1109,11 @@ wrappers.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "05k8niswh0ly5sx0129jdhiinqs84s86b7sv29ff68v3546dl04i")))) (base32 "0mfk32zvvh6c9a9plp6ad07888g795lhdmal3jyaclyn2k5iig9i"))
;; Remove these patches on next release as they will be included.
(patches (search-patches
"quickjs-ng-64-bits-precision-on-i686.patch"
"quickjs-ng-fix-atomics.pause-on-32-bit.patch"))))
(arguments (arguments
(list (list
#:configure-flags #:configure-flags
@@ -1142,23 +1146,6 @@ wrappers.")
"") "")
(("BUILD_DIR=build") (("BUILD_DIR=build")
"BUILD_DIR=../build")))) "BUILD_DIR=../build"))))
;; XXX: Unknown test failures in quickjs-ng 1.4.0.
;; Remove for future versions.
(add-before 'configure 'skip-failing-tests
(lambda* (#:key inputs #:allow-other-keys)
(let* ((test262 (assoc-ref inputs "test262"))
(lang-path (in-vicinity test262 "test/language")))
(substitute* "test262.conf"
(("# list excluded tests and directories here" all)
(string-join
(cons* all
(map (lambda (f)
(in-vicinity lang-path f))
'(;; export 'foo' in module /gnu/store is ambiguous
"module-code/ambiguous-export-bindings/"
;; Could not find export 'default'
"import/import-attributes/text-self.js")))
"\n"))))))
(replace 'check (replace 'check
(lambda* (#:key tests? #:allow-other-keys) (lambda* (#:key tests? #:allow-other-keys)
(when tests? (when tests?
+3 -24
View File
@@ -485,23 +485,11 @@ to camera devices supported by @code{libgphoto2} using
(uri (string-append "mirror://kde/stable/release-service/" version (uri (string-append "mirror://kde/stable/release-service/" version
"/src/kate-" version ".tar.xz")) "/src/kate-" version ".tar.xz"))
(sha256 (sha256
(base32 "0ah6cy92yir68z25460ccl48i5nrfqswpzil9a7l69h3qxspsk88")) (base32 "0ah6cy92yir68z25460ccl48i5nrfqswpzil9a7l69h3qxspsk88"))))
(modules '((guix build utils)))
;; Unbundle SingleApplication.
(snippet
'(begin
(delete-file-recursively "3rdparty/SingleApplication")
(with-directory-excursion "apps/kate"
(substitute* "CMakeLists.txt"
((".*3rdparty.*") "")
((" -DQAPPLICATION_CLASS=FreeStandingSingleApplication") ""))
(substitute* "main.cpp"
(("(#include )\"SingleApplication\\/SingleApplication\"" _ keep)
(string-append keep "<SingleApplication>"))))))))
(build-system qt-build-system) (build-system qt-build-system)
(native-inputs (native-inputs
(list extra-cmake-modules kdoctools xorg-server-for-tests)) (list extra-cmake-modules kdoctools xorg-server-for-tests))
;; TODO: Unbundle rapidjson. ;; TODO: Unbundle rapidjson and SingleApplication.
(inputs (inputs
(list breeze-icons ;; default icon set (list breeze-icons ;; default icon set
karchive karchive
@@ -527,20 +515,11 @@ to camera devices supported by @code{libgphoto2} using
libxkbcommon libxkbcommon
plasma-activities plasma-activities
qtsvg qtsvg
qtwayland qtwayland))
single-application))
(arguments (arguments
(list #:qtbase qtbase (list #:qtbase qtbase
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'link-single-application
(lambda _
(substitute* "apps/kate/CMakeLists.txt"
(("target_link_libraries\\(kate-bin PRIVATE kateprivate"
all)
(string-append all " "
#$(this-package-input "single-application")
"/lib/libSingleApplication.a")))))
(add-after 'unpack 'patch-tests (add-after 'unpack 'patch-tests
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
;; This test requires a 'bin' diretory under '/usr'. ;; This test requires a 'bin' diretory under '/usr'.
-341
View File
@@ -24,7 +24,6 @@
#:use-module (guix packages) #:use-module (guix packages)
#:use-module (gnu packages golang-build) #:use-module (gnu packages golang-build)
#:use-module (gnu packages golang-check) #:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-crypto)
#:use-module (gnu packages golang-web) #:use-module (gnu packages golang-web)
#:use-module (gnu packages golang-xyz) #:use-module (gnu packages golang-xyz)
#:use-module (gnu packages prometheus)) #:use-module (gnu packages prometheus))
@@ -34,313 +33,6 @@
;;; Libraries: ;;; Libraries:
;;; ;;;
(define-public go-go-etcd-io-etcd-client-v3
(package
(name "go-go-etcd-io-etcd-client-v3")
(version "3.6.7")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/etcd-io/etcd")
(commit (go-version->git-ref version #:subdir "client"))))
(file-name (git-file-name name version))
(sha256
(base32 "0d9rjyl5h0xm9isgr8b2fz8528wk3pds71rjl8g08fgsmsa5kicb"))
(modules '((guix build utils)
(ice-9 ftw)
(srfi srfi-26)))
(snippet #~(begin
(define (delete-all-but directory . preserve)
(with-directory-excursion directory
(let* ((pred (negate (cut member <>
(cons* "." ".." preserve))))
(items (scandir "." pred)))
(for-each (cut delete-file-recursively <>) items))))
;; Replace symlinks to tests with file contents
(for-each
(lambda (f)
(delete-file (string-append "client/v3/" f))
(copy-file (string-append
"tests/integration/clientv3/examples/" f)
(string-append "client/v3/" f)))
(list "example_auth_test.go"
"example_cluster_test.go"
"example_kv_test.go"
"example_lease_test.go"
"example_maintenance_test.go"
"example_metrics_test.go"
"example_test.go"
"example_watch_test.go"))
(for-each
(lambda (f)
(delete-file
(string-append "client/v3/concurrency/" f))
(copy-file
(string-append "tests/integration/clientv3/concurrency/" f)
(string-append "client/v3/concurrency/" f)))
(list "example_election_test.go"
"example_mutex_test.go"
"example_stm_test.go"))
;; Copy sertificates for tests.
(mkdir-p "client/v3/tests/fixtures")
(substitute* "client/v3/yaml/config_test.go"
(("\\.\\./\\.\\./\\.\\./") "../"))
(for-each
(lambda (f)
(copy-file
(string-append "tests/fixtures/" f)
(string-append "client/v3/tests/fixtures/" f)))
(list "server.crt"
"server.key.insecure"
"ca.crt"))
;; Keep source related to expected import-path.
(delete-all-but "." "client")
(delete-file-recursively "client/pkg")))))
(build-system go-build-system)
(arguments
(list
;; TODO: Tests a shaky and fail a lot, check how run unittests.
#:tests? #f
#:import-path "go.etcd.io/etcd/client/v3"
#:unpack-path "go.etcd.io/etcd"))
(native-inputs
(list go-github-com-grpc-ecosystem-go-grpc-middleware-providers-prometheus
go-github-com-prometheus-client-golang
go-github-com-stretchr-testify
go-go-etcd-io-etcd-client-pkg-v3
go-go-uber-org-zap
go-google-golang-org-grpc))
(propagated-inputs
(list go-github-com-coreos-go-semver
go-github-com-dustin-go-humanize
go-github-com-grpc-ecosystem-go-grpc-middleware-v2
go-go-etcd-io-etcd-api-v3
go-sigs-k8s-io-yaml))
(home-page "https://github.com/etcd-io/etcd")
(synopsis "Golang client for ETCD")
(description
"This package implements the official Go client for etcd.")
(license license:asl2.0)))
(define-public go-go-etcd-io-etcd-server-v3
(package
(name "go-go-etcd-io-etcd-server-v3")
(version "3.6.7")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/etcd-io/etcd")
(commit (go-version->git-ref version
#:subdir "server"))))
(file-name (git-file-name name version))
(sha256
(base32 "0d9rjyl5h0xm9isgr8b2fz8528wk3pds71rjl8g08fgsmsa5kicb"))
(modules '((guix build utils)
(ice-9 ftw)
(srfi srfi-26)))
(snippet #~(begin
(define (delete-all-but directory . preserve)
(with-directory-excursion directory
(let* ((pred (negate (cut member <>
(cons* "." ".." preserve))))
(items (scandir "." pred)))
(for-each (cut delete-file-recursively <>) items))))
(delete-all-but "." "server")
(rename-file "server" "server.tmp")
(mkdir-p "server/v3")
(rename-file "server.tmp" "server/v3")))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:tests? #f ;Setup fails
#:import-path "go.etcd.io/etcd/server/v3"
#:unpack-path "go.etcd.io/etcd"))
(propagated-inputs
(list go-github-com-coreos-go-semver
go-github-com-coreos-go-systemd-v22
go-github-com-dustin-go-humanize
go-github-com-gogo-protobuf
go-github-com-golang-groupcache
go-github-com-golang-jwt-jwt-v5
go-github-com-golang-protobuf
go-github-com-google-btree
go-github-com-google-go-cmp
go-github-com-grpc-ecosystem-go-grpc-middleware
go-github-com-grpc-ecosystem-go-grpc-middleware-providers-prometheus
go-github-com-grpc-ecosystem-grpc-gateway-v2
go-github-com-jonboulle-clockwork
go-github-com-prometheus-client-golang
go-github-com-prometheus-client-model
go-github-com-soheilhy-cmux
go-github-com-spf13-cobra
go-github-com-stretchr-testify
go-github-com-tmc-grpc-websocket-proxy
go-github-com-xiang90-probing
go-go-etcd-io-bbolt
go-go-etcd-io-etcd-client-v3
go-go-etcd-io-etcd-pkg-v3
go-go-etcd-io-raft-v3
go-go-opentelemetry-io-contrib-instrumentation-google-golang-org-grpc-otelgrpc
go-go-opentelemetry-io-otel
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracegrpc
go-go-opentelemetry-io-otel-sdk
go-go-uber-org-zap
go-golang-org-x-crypto
go-golang-org-x-net
go-golang-org-x-time
go-google-golang-org-genproto-googleapis-api
go-google-golang-org-grpc
go-google-golang-org-protobuf
go-gopkg-in-natefinch-lumberjack-v2
go-sigs-k8s-io-json
go-sigs-k8s-io-yaml))
(home-page "https://go.etcd.io/etcd")
(synopsis "Server package for ETCD")
(description
"This package provides a server for the ETCD distributed key-value storage
system.")
(license license:asl2.0)))
(define-public go-go-etcd-io-etcd-pkg-v3
(package
(name "go-go-etcd-io-etcd-pkg-v3")
(version "3.6.7")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/etcd-io/etcd")
(commit (go-version->git-ref version
#:subdir "pkg"))))
(file-name (git-file-name name version))
(sha256
(base32 "0d9rjyl5h0xm9isgr8b2fz8528wk3pds71rjl8g08fgsmsa5kicb"))
(modules '((guix build utils)
(ice-9 ftw)
(srfi srfi-26)))
(snippet #~(begin
(define (delete-all-but directory . preserve)
(with-directory-excursion directory
(let* ((pred (negate (cut member <>
(cons* "." ".." preserve))))
(items (scandir "." pred)))
(for-each (cut delete-file-recursively <>) items))))
(delete-all-but "." "pkg")
(rename-file "pkg" "pkg.tmp")
(mkdir-p "pkg/v3")
(rename-file "pkg.tmp" "pkg/v3")))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:tests? #f ;TODO: Tests hang, select some subset
#:import-path "go.etcd.io/etcd/pkg/v3"
#:unpack-path "go.etcd.io/etcd"))
(native-inputs
(list go-github-com-spf13-cobra
go-github-com-spf13-pflag
go-github-com-stretchr-testify))
(propagated-inputs
(list go-github-com-creack-pty
go-github-com-dustin-go-humanize
go-go-etcd-io-etcd-client-pkg-v3
go-go-uber-org-zap
go-google-golang-org-grpc))
(home-page "https://github.com/etcd-io/etcd")
(synopsis "Utility packages for etcd")
(description
"This package is a collection of utility packages used by etcd without
being specific to etcd itself.")
(license license:asl2.0)))
(define-public go-k8s-io-apiserver
(package
(name "go-k8s-io-apiserver")
(version "0.34.2")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/kubernetes/apiserver")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "06bcbdnlhg1mwky6i1519n1nhlh8rxc9qv7jwqjhc03m2ql3bb8q"))))
(build-system go-build-system)
(arguments
(list
#:tests? #f ;TODO: Tests require unpackaged dependencies
#:embed-files
#~(list "authoring\\.tmpl" "api__v1_openapi\\.json")
#:import-path "k8s.io/apiserver"))
(native-inputs
(list go-github-com-stretchr-testify))
(propagated-inputs
(list go-github-com-blang-semver-v4
go-github-com-coreos-go-oidc
go-github-com-coreos-go-systemd-v22
go-github-com-emicklei-go-restful-v3
go-github-com-fsnotify-fsnotify
go-github-com-go-logr-logr
go-github-com-gogo-protobuf
go-github-com-google-btree
go-github-com-google-cel-go
go-github-com-google-gnostic-models
go-github-com-google-go-cmp
go-github-com-google-uuid
go-github-com-gorilla-websocket
go-github-com-grpc-ecosystem-go-grpc-prometheus
go-github-com-munnerz-goautoneg
go-github-com-mxk-go-flowrate
go-github-com-spf13-pflag
go-go-etcd-io-etcd-api-v3
go-go-etcd-io-etcd-client-pkg-v3
go-go-etcd-io-etcd-client-v3
go-go-etcd-io-etcd-server-v3
go-go-opentelemetry-io-contrib-instrumentation-google-golang-org-grpc-otelgrpc
go-go-opentelemetry-io-contrib-instrumentation-net-http-otelhttp
go-go-opentelemetry-io-otel
go-go-opentelemetry-io-otel-exporters-otlp-otlptrace-otlptracegrpc
go-go-opentelemetry-io-otel-metric
go-go-opentelemetry-io-otel-sdk
go-go-opentelemetry-io-otel-trace
go-go-uber-org-zap
go-golang-org-x-crypto
go-golang-org-x-net
go-golang-org-x-sync
go-golang-org-x-sys
go-golang-org-x-time
go-google-golang-org-genproto-googleapis-api
go-google-golang-org-grpc
go-google-golang-org-protobuf
go-gopkg-in-evanphx-json-patch-v4
go-gopkg-in-go-jose-go-jose-v2
go-gopkg-in-natefinch-lumberjack-v2
go-k8s-io-api
go-k8s-io-apimachinery
go-k8s-io-client-go
go-k8s-io-component-base
go-k8s-io-klog-v2
go-k8s-io-kms
go-k8s-io-kube-openapi
go-k8s-io-utils
go-sigs-k8s-io-apiserver-network-proxy-konnectivity-client
go-sigs-k8s-io-json
go-sigs-k8s-io-randfill
go-sigs-k8s-io-structured-merge-diff-v6
go-sigs-k8s-io-yaml))
(home-page "https://github.com/kubernetes/apiserver")
(synopsis "Library for building a Kubernetes aggregated API server")
(description
"This package provides a generic library for building a Kubernetes
aggregated API server.")
(license license:asl2.0)))
(define-public go-k8s-io-component-base (define-public go-k8s-io-component-base
(package (package
(name "go-k8s-io-component-base") (name "go-k8s-io-component-base")
@@ -395,39 +87,6 @@ aggregated API server.")
"This package contains shared code for Kubernetes core components.") "This package contains shared code for Kubernetes core components.")
(license license:asl2.0))) (license license:asl2.0)))
(define-public go-sigs-k8s-io-apiserver-network-proxy-konnectivity-client
(package
(name "go-sigs-k8s-io-apiserver-network-proxy-konnectivity-client")
(version "0.34.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/kubernetes-sigs/apiserver-network-proxy")
(commit (go-version->git-ref version
#:subdir "konnectivity-client"))))
(file-name (git-file-name name version))
(sha256
(base32 "1kh92blfpmrmklxqg5j0p07yz534gjzhm44xj8bh5pad3y5zw5m0"))))
(build-system go-build-system)
(arguments
(list
#:skip-build? #t
#:import-path "sigs.k8s.io/apiserver-network-proxy/konnectivity-client"
#:unpack-path "sigs.k8s.io/apiserver-network-proxy"))
(native-inputs
(list go-go-uber-org-goleak))
(propagated-inputs
(list go-github-com-prometheus-client-golang
go-google-golang-org-grpc
go-google-golang-org-protobuf
go-k8s-io-klog-v2))
(home-page "https://sigs.k8s.io/apiserver-network-proxy")
(synopsis "Network proxy for Kubernetes API server")
(description
"This package provides a network proxy for the Kubernetes API server.")
(license license:asl2.0)))
;;; ;;;
;;; Executables: ;;; Executables:
+7 -6
View File
@@ -205,7 +205,8 @@
(search-patches (search-patches
"librewolf-compare-paths.patch" "librewolf-compare-paths.patch"
"librewolf-use-system-wide-dir.patch" "librewolf-use-system-wide-dir.patch"
"librewolf-add-store-to-rdd-allowlist.patch")) "librewolf-add-store-to-rdd-allowlist.patch"
"librewolf-150.0-encoding_rs-rust-fix.patch"))
;; Slim down the tarball by removing unbundled libraries and 75 Mo (800+ ;; Slim down the tarball by removing unbundled libraries and 75 Mo (800+
;; Mo uncompressed) of unused tests. ;; Mo uncompressed) of unused tests.
;; TODO: Unbundle security/nss and media/libpng. ;; TODO: Unbundle security/nss and media/libpng.
@@ -238,23 +239,23 @@
;;; but since in Guix only the latest packaged Rust is officially supported, ;;; but since in Guix only the latest packaged Rust is officially supported,
;;; it is a tradeoff worth making. ;;; it is a tradeoff worth making.
;;; 0: https://firefox-source-docs.mozilla.org/writing-rust-code/update-policy.html ;;; 0: https://firefox-source-docs.mozilla.org/writing-rust-code/update-policy.html
(define rust-librewolf rust-1.94) (define rust-librewolf rust-1.93)
;; Update this id with every update to its release date. ;; Update this id with every update to its release date.
;; It's used for cache validation and therefore can lead to strange bugs. ;; It's used for cache validation and therefore can lead to strange bugs.
;; ex: date '+%Y%m%d%H%M%S' ;; ex: date '+%Y%m%d%H%M%S'
;; or: (format-time-string "%Y%m%d%H%M%S") ;; or: (format-time-string "%Y%m%d%H%M%S")
(define %librewolf-build-id "20260428201413") (define %librewolf-build-id "20260421153818")
(define-public librewolf (define-public librewolf
(package (package
(name "librewolf") (name "librewolf")
(version "150.0.1-1") (version "150.0-1")
(source (source
(make-librewolf-source (make-librewolf-source
#:version version #:version version
#:firefox-hash "1v3fbwvd0khm3xwsgwcp6wpwmkz0v6fyk37hxj0mqkwjimqgmkra" #:firefox-hash "151rxzl80dm8jsxl6fwzgbirwq4zpms5adwwnbjcwdd1r3s3vr7v"
#:librewolf-hash "0294lsiyvfh93id04xki4bhs8d84vmysqviivxiif0xfzqv65qzp" #:librewolf-hash "0iw9v3zc1fxc93yyhldqarxaypgmbndh2ylsy330kcbpb6p1gnmr"
#:l10n firefox-l10n)) #:l10n firefox-l10n))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
+34 -174
View File
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012-2021, 2021-2026 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2012-2021, 2021-2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org> ;;; Copyright © 2012 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Mark H Weaver <mhw@netris.org>
@@ -87,7 +87,6 @@
;;; Copyright © 2025 John Kehayias <john.kehayias@protonmail.com> ;;; Copyright © 2025 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2025 Arjan Adriaanse <arjan@adriaan.se> ;;; Copyright © 2025 Arjan Adriaanse <arjan@adriaan.se>
;;; Copyright © 2026 Justin Veilleux <terramorpha@cock.li> ;;; Copyright © 2026 Justin Veilleux <terramorpha@cock.li>
;;; Copyright © 2026 Simen Endsjø <contact@simendsjo.me>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@@ -529,27 +528,10 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
"linux-" version ".tar.xz")) "linux-" version ".tar.xz"))
(sha256 hash))) (sha256 hash)))
;; The current "mainline" kernel.
(define-public linux-libre-7.0-version "7.0.3")
(define-public linux-libre-7.0-gnu-revision "gnu")
(define deblob-scripts-7.0
(linux-libre-deblob-scripts
linux-libre-7.0-version
linux-libre-7.0-gnu-revision
(base32 "0pqhhkpq61rvdiyas28x7kclsz1iribzwsyf81gbic56ci4z2ldv")
(base32 "0a7572zw5y3k4gs4p3h5w0s9bhd63pdjxz6vxbr96sq6r8b6k02n")))
(define-public linux-libre-7.0-pristine-source
(let ((version linux-libre-7.0-version)
(hash (base32 "074zjl0v901a9hafgpcxyyd395qs7y4kr4fcpgg3ssc8ayzsvv8b")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-7.0)))
;; The current "stable" kernels. That is, the most recently released major ;; The current "stable" kernels. That is, the most recently released major
;; versions that are still supported upstream. ;; versions that are still supported upstream.
(define-public linux-libre-6.19-version "6.19.14") (define-public linux-libre-6.19-version "6.19.12")
(define-public linux-libre-6.19-gnu-revision "gnu") (define-public linux-libre-6.19-gnu-revision "gnu")
(define deblob-scripts-6.19 (define deblob-scripts-6.19
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -559,12 +541,12 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "05jpciyypvmy6byaxjl49b1fvzxcnlhknf0xabrdj5152iznrzkh"))) (base32 "05jpciyypvmy6byaxjl49b1fvzxcnlhknf0xabrdj5152iznrzkh")))
(define-public linux-libre-6.19-pristine-source (define-public linux-libre-6.19-pristine-source
(let ((version linux-libre-6.19-version) (let ((version linux-libre-6.19-version)
(hash (base32 "11giqsz9qa7s9lm94nn4h1bcb2411crsbfyvzrvhfjmy75kvzs6d"))) (hash (base32 "1md8b270pdyk9d8cq0qyr8qmymcijmj3gc39nn394wpr0l94yp6f")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-6.19))) deblob-scripts-6.19)))
(define-public linux-libre-6.18-version "6.18.26") (define-public linux-libre-6.18-version "6.18.22")
(define-public linux-libre-6.18-gnu-revision "gnu") (define-public linux-libre-6.18-gnu-revision "gnu")
(define deblob-scripts-6.18 (define deblob-scripts-6.18
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -574,7 +556,7 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "0qlih8w8wg4v5cwbmd34rbhb6mjgbx69i9rx3s2vxw7h42q9l0ai"))) (base32 "0qlih8w8wg4v5cwbmd34rbhb6mjgbx69i9rx3s2vxw7h42q9l0ai")))
(define-public linux-libre-6.18-pristine-source (define-public linux-libre-6.18-pristine-source
(let ((version linux-libre-6.18-version) (let ((version linux-libre-6.18-version)
(hash (base32 "1v5h0w3s8p5m22jxg992x1jfpwyi80ia70cdgiv47q3n6xfjyxsk"))) (hash (base32 "0nazlm6j5blyd4qgl0z6xc3qk00vz3cfvx5mqv18awv5ygx94g52")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-6.18))) deblob-scripts-6.18)))
@@ -583,7 +565,7 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
;; Here are the support timelines: ;; Here are the support timelines:
;; <https://www.kernel.org/category/releases.html> ;; <https://www.kernel.org/category/releases.html>
(define-public linux-libre-6.12-version "6.12.85") (define-public linux-libre-6.12-version "6.12.81")
(define-public linux-libre-6.12-gnu-revision "gnu") (define-public linux-libre-6.12-gnu-revision "gnu")
(define deblob-scripts-6.12 (define deblob-scripts-6.12
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -593,12 +575,12 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "1x48hpmvajz7v5wn1vdd7l5r14mq4ngzh5npz3pj81z4f1g61i0a"))) (base32 "1x48hpmvajz7v5wn1vdd7l5r14mq4ngzh5npz3pj81z4f1g61i0a")))
(define-public linux-libre-6.12-pristine-source (define-public linux-libre-6.12-pristine-source
(let ((version linux-libre-6.12-version) (let ((version linux-libre-6.12-version)
(hash (base32 "1v8a0z6znmr2m26l4744wndaimsh24zz6q4d7m4p8s0ayjcwjnp3"))) (hash (base32 "0iw84bqdbh9dlaqd1bqgldg50riw2b5is7ipqnbp0sll8cv9rc62")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-6.12))) deblob-scripts-6.12)))
(define-public linux-libre-6.6-version "6.6.137") (define-public linux-libre-6.6-version "6.6.134")
(define-public linux-libre-6.6-gnu-revision "gnu") (define-public linux-libre-6.6-gnu-revision "gnu")
(define deblob-scripts-6.6 (define deblob-scripts-6.6
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -608,12 +590,12 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "0xp9b2vkrb0g0rn4i33b59rhp4sgh1dbwzk28vwz7kwac6l5rcpi"))) (base32 "0xp9b2vkrb0g0rn4i33b59rhp4sgh1dbwzk28vwz7kwac6l5rcpi")))
(define-public linux-libre-6.6-pristine-source (define-public linux-libre-6.6-pristine-source
(let ((version linux-libre-6.6-version) (let ((version linux-libre-6.6-version)
(hash (base32 "1i2npnsnhk41a88vimr521rxg77kljbkqmlyk1zrv7z4ic6ykwcj"))) (hash (base32 "1grp1wqgzjsk6xyl0nvd2hxlxjj0wgz04x544zkz8srp6rxnjy33")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-6.6))) deblob-scripts-6.6)))
(define-public linux-libre-6.1-version "6.1.170") (define-public linux-libre-6.1-version "6.1.168")
(define-public linux-libre-6.1-gnu-revision "gnu") (define-public linux-libre-6.1-gnu-revision "gnu")
(define deblob-scripts-6.1 (define deblob-scripts-6.1
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -623,12 +605,12 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "1w5pfws6l39dpc3lzazs1n6r4m96f6rdf6vb2scy5fhmrd933ldc"))) (base32 "1w5pfws6l39dpc3lzazs1n6r4m96f6rdf6vb2scy5fhmrd933ldc")))
(define-public linux-libre-6.1-pristine-source (define-public linux-libre-6.1-pristine-source
(let ((version linux-libre-6.1-version) (let ((version linux-libre-6.1-version)
(hash (base32 "0i29gilsvl7vx7p6vqg0bc0d40ir1b968hyfjhdfms55g4pr2y5m"))) (hash (base32 "0vkp75sfnjvfqxjh6gqcx24h2m6qj6xkwlw6b118cja43vjnz1g0")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-6.1))) deblob-scripts-6.1)))
(define-public linux-libre-5.15-version "5.15.204") (define-public linux-libre-5.15-version "5.15.202")
(define-public linux-libre-5.15-gnu-revision "gnu") (define-public linux-libre-5.15-gnu-revision "gnu")
(define deblob-scripts-5.15 (define deblob-scripts-5.15
(linux-libre-deblob-scripts (linux-libre-deblob-scripts
@@ -638,7 +620,7 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "1s6km2r2mad0wpf7nqn4rqsykw1lm386l1yskmil24239fbva1f1"))) (base32 "1s6km2r2mad0wpf7nqn4rqsykw1lm386l1yskmil24239fbva1f1")))
(define-public linux-libre-5.15-pristine-source (define-public linux-libre-5.15-pristine-source
(let ((version linux-libre-5.15-version) (let ((version linux-libre-5.15-version)
(hash (base32 "1kfvfvzhdgjcj1pa2aqks3iah00ilfpp1i9bmbwjr3na0crlrzcv"))) (hash (base32 "1m6d53qx1ah4jwpa8hwjdmq0jn2hf7xmz1li6rwpdqjp97vvvh8b")))
(make-linux-libre-source version (make-linux-libre-source version
(%upstream-linux-source version hash) (%upstream-linux-source version hash)
deblob-scripts-5.15))) deblob-scripts-5.15)))
@@ -686,10 +668,6 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(patches (append (origin-patches source) (patches (append (origin-patches source)
patches)))) patches))))
(define-public linux-libre-7.0-source
(source-with-patches linux-libre-7.0-pristine-source
(list %linux-libre-arm-export-__sync_icache_dcache-patch)))
(define-public linux-libre-6.19-source (define-public linux-libre-6.19-source
(source-with-patches linux-libre-6.19-pristine-source (source-with-patches linux-libre-6.19-pristine-source
(list %boot-logo-patch (list %boot-logo-patch
@@ -812,11 +790,6 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(description "Headers of the Linux-Libre kernel.") (description "Headers of the Linux-Libre kernel.")
(license license:gpl2))) (license license:gpl2)))
(define-public linux-libre-headers-7.0
(make-linux-libre-headers* linux-libre-7.0-version
linux-libre-7.0-gnu-revision
linux-libre-7.0-source))
(define-public linux-libre-headers-6.19 (define-public linux-libre-headers-6.19
(make-linux-libre-headers* linux-libre-6.19-version (make-linux-libre-headers* linux-libre-6.19-version
linux-libre-6.19-gnu-revision linux-libre-6.19-gnu-revision
@@ -1203,14 +1176,6 @@ Linux kernel. It has been modified to remove all non-free binary blobs.")
;;; Generic kernel packages. ;;; Generic kernel packages.
;;; ;;;
(define-public linux-libre-7.0
(make-linux-libre* linux-libre-7.0-version
linux-libre-7.0-gnu-revision
linux-libre-7.0-source
'("x86_64-linux" "i686-linux" "armhf-linux"
"aarch64-linux" "powerpc64le-linux" "riscv64-linux")
#:configuration-file kernel-config))
(define-public linux-libre-6.19 (define-public linux-libre-6.19
(make-linux-libre* linux-libre-6.19-version (make-linux-libre* linux-libre-6.19-version
linux-libre-6.19-gnu-revision linux-libre-6.19-gnu-revision
@@ -2832,76 +2797,6 @@ kernel modules to control the keyboard on most Tuxedo computers. The @code{tuxed
module is also needed for the @code{tuxedo-control-center} (short tcc) package.") module is also needed for the @code{tuxedo-control-center} (short tcc) package.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public evdi
(package
(name "evdi")
(version "1.14.15") ;inherited by libevdi
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/DisplayLink/evdi")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "065mfwmb4nw71s0f0ax9si8xpbr1sah1bhxvq1k81yicvi83wsxn"))))
(build-system linux-module-build-system)
(arguments
(list #:tests? #f ;no test suite
#:phases #~(modify-phases %standard-phases
(add-after 'unpack 'chdir
(lambda _
(chdir "module")))
;; Looks like the value is only there to detect RHEL
;; derivatives, so we can safely delete the include.
(add-after 'unpack 'embed-/etc/os-release
(lambda _
(substitute* "module/Makefile"
(("include /etc/os-release") "")))))))
(home-page "https://github.com/DisplayLink/evdi")
(synopsis
"@acronym{EVDI, Extensible Virtual Display Interface} Linux kernel module")
(description
"The @acronym{EVDI, Extensible Virtual Display Interface} is a Linux kernel
module that enables management of multiple screens, allowing user-space programs
to take control over what happens with the image. It is essentially a virtual
display for which applications using the @code{libevdi} library can add, remove,
and receive screen updates.
The EVDI driver uses the standard Linux @acronym{DRM, Direct Rendering Manager}.
Its displays can be controlled by standard tools such as @command{xrandr} and
display settings applets in graphical environments.")
(license license:gpl2)))
(define-public libevdi
(package
(inherit evdi)
(name "libevdi")
(build-system gnu-build-system)
(arguments
(list #:tests? #f ;no test suite
#:make-flags
#~(list (string-append "CC=" #$(cc-for-target)))
#:phases #~(modify-phases %standard-phases
(delete 'configure)
(add-after 'unpack 'chdir
(lambda _
(chdir "library")))
(replace 'install
(lambda* _
(let* ((lib (string-append #$output "/lib")))
(mkdir-p lib)
(install-file "libevdi.so" lib)))))))
(inputs (list libdrm))
(native-inputs (list pkg-config))
(synopsis
"@acronym{EVDI, Extensible Virtual Display Interface} user-space library")
(description
"Libevdi is a library that gives applications easy access to
@acronym{EVDI, Extensible Virtual Display Interface} devices provided by the
@code{evdi} driver package.")
(license license:lgpl2.1)))
(define-public ec (define-public ec
(package (package
(name "ec") (name "ec")
@@ -4400,42 +4295,6 @@ external rate conversion.")
;; `rate/rate_samplerate.c': LGPL v2.1 or later. ;; `rate/rate_samplerate.c': LGPL v2.1 or later.
license:lgpl2.1+)))) license:lgpl2.1+))))
(define-public snd-rane-sl3
(let ((commit "01099892261b55ec5ee814292d840eeb664c1904")
(revision "0"))
(package
(name "snd-rane-sl3")
(version (git-version "0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/nvgeele/snd-rane-sl3")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1j2aan5xmbi8hgkzzwjb7rarqh4g65rg3s1qd1c8x5m6fpqdnvli"))))
(build-system linux-module-build-system)
(arguments
(list
#:tests? #f ;No tests.
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(add-before 'build 'change-directory
(lambda _
(chdir "snd-rane-sl3"))))))
(inputs (list linux-libre-headers))
(home-page "https://github.com/nvgeele/snd-rane-sl3")
(synopsis
"Linux ALSA kernel driver for the Rane SL3 USB Audio interface")
(description
"snd-rane-sl3 provides a native Linux kernel module that
enables the Rane SL3 to work as a standard ALSA audio device, supporting 6
channels (3 stereo pairs) of 24-bit PCM audio at 44.1kHz and 48kHz sample
rates.")
(license license:gpl3))))
(define-public iptables (define-public iptables
(package (package
(name "iptables") (name "iptables")
@@ -10460,6 +10319,7 @@ known as Slingshot.")
(cons package extra) (cons package extra)
'())))) '()))))
(append (list rdma-core libnl) (append (list rdma-core libnl)
(if-supported rocr-runtime)
(if-supported psm) (if-supported psm)
(if-supported psm2) (if-supported psm2)
(if-supported libcxi curl json-c)))) (if-supported libcxi curl json-c))))
@@ -10503,15 +10363,6 @@ applications deal with directly. It works in conjunction with provider
libraries, which are often integrated directly into libfabric.") libraries, which are often integrated directly into libfabric.")
(license (list license:bsd-2 license:gpl2)))) ;dual (license (list license:bsd-2 license:gpl2)))) ;dual
;; Note: ROCm support is kept separate to avoid a significant increase in
;; closure size: <https://codeberg.org/guix/guix/issues/7225>.
(define-public libfabric-rocm
(package/inherit libfabric
(name "libfabric-rocm")
(inputs (modify-inputs inputs
(append rocr-runtime)))
(synopsis "Open Fabric Interfaces (with ROCm support)")))
(define-public libfabric-1 ;needed by Open MPI 4.x (define-public libfabric-1 ;needed by Open MPI 4.x
(package (package
(inherit libfabric) (inherit libfabric)
@@ -11535,7 +11386,7 @@ of Linux application development.")
(define-public wireplumber (define-public wireplumber
(package (package
(name "wireplumber") (name "wireplumber")
(version "0.5.14") (version "0.5.12")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -11545,7 +11396,7 @@ of Linux application development.")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0rr2vlbwjjhgsk6lk2iwaww21gks2v63f0cs01rh2mdi8jpfz7h2")))) (base32 "1dljz669ywy1lvvn0jh14ymynmbii45q5vay71zajpcg31249dyw"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:configure-flags '("-Dsystemd=disabled" `(#:configure-flags '("-Dsystemd=disabled"
@@ -12268,7 +12119,7 @@ that avoids the usage of older system-wide @file{/sys} interface.")
(define-public libtracefs (define-public libtracefs
(package (package
(name "libtracefs") (name "libtracefs")
(version "1.8.3") (version "1.7.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -12277,16 +12128,25 @@ that avoids the usage of older system-wide @file{/sys} interface.")
(commit (string-append name "-" version)))) (commit (string-append name "-" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1bc4mwf488nlja64zawjznvb6640vchjb25xa02v53x6qfb1mpmq")))) (base32 "0v896n3q0df0nxx5drbwyaqhrqiyxl06rvrdw3gp2r37awa9g1zb"))
(build-system meson-build-system) (modules '((guix build utils)))
(snippet
#~(begin
(substitute* (list "Makefile" "scripts/utils.mk")
(("/bin/(pwd)" _ command) command))))))
(build-system gnu-build-system)
(arguments (arguments
(list (list
#:configure-flags #:tests? #f ; no test suite
#~(list "-Ddoc=false"))) #:make-flags
(native-inputs #~(list
(list bison (string-append "CC=" #$(cc-for-target))
flex (string-append "pkgconfig_dir=" #$output "/lib/pkgconfig")
pkg-config)) (string-append "prefix=" #$output))
#:phases
#~(modify-phases %standard-phases
(delete 'configure)))) ; no configure script
(native-inputs (list pkg-config))
(inputs (list libtraceevent)) (inputs (list libtraceevent))
(home-page "https://git.kernel.org/pub/scm/libs/libtrace/libtracefs.git/") (home-page "https://git.kernel.org/pub/scm/libs/libtrace/libtracefs.git/")
(synopsis "Linux kernel trace file system library") (synopsis "Linux kernel trace file system library")
+19 -13
View File
@@ -12982,8 +12982,8 @@ score. When evaluated, the musical score is rendered to an image.")
(sbcl-package->ecl-package sbcl-cmn)) (sbcl-package->ecl-package sbcl-cmn))
(define-public sbcl-coalton (define-public sbcl-coalton
(let ((commit "14ed6dc733f8c23c1a345ceb11d3f75ee47f7525") (let ((commit "bf475c8c53e02a2e0cb29deab4d101d25743bfca")
(revision "6")) (revision "5"))
(package (package
(name "sbcl-coalton") (name "sbcl-coalton")
(version (git-version "0.0.1" revision commit)) (version (git-version "0.0.1" revision commit))
@@ -12995,16 +12995,12 @@ score. When evaluated, the musical score is rendered to an image.")
(commit commit))) (commit commit)))
(file-name (git-file-name "cl-coalton" version)) (file-name (git-file-name "cl-coalton" version))
(sha256 (sha256
(base32 "024n72lxi8nycy012lqy6zx19lv7jh2ngs1mf559rw8kgwh3k54c")))) (base32 "0zrp2s82n2mxx7knbnbsdj64zar21nnnf8iwzrqzs4g3v6xpyz9z"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(native-inputs (native-inputs
(list sbcl-fiasco (list sbcl-fiasco))
sbcl-html-entities
sbcl-spinneret
sbcl-yason))
(inputs (inputs
(list sbcl-alexandria (list sbcl-alexandria
sbcl-computable-reals
sbcl-concrete-syntax-tree sbcl-concrete-syntax-tree
sbcl-eclector sbcl-eclector
sbcl-float-features sbcl-float-features
@@ -13560,10 +13556,10 @@ place outside with-notes.
(sbcl-package->ecl-package sbcl-compiler-macro-notes)) (sbcl-package->ecl-package sbcl-compiler-macro-notes))
(define-public sbcl-computable-reals (define-public sbcl-computable-reals
(let ((commit "607a5d5b95387c06f92a661aa5562a7be0f5cad8")) (let ((commit "fdc73d75e79d0a4ce6d01c822c950ae2eb137d39"))
(package (package
(name "sbcl-computable-reals") (name "sbcl-computable-reals")
(version (git-version "1.1.0" "2" commit)) (version (git-version "1.1.0" "1" commit))
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -13572,7 +13568,7 @@ place outside with-notes.
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1x8kkdyjil0zzg8fq9b76z12kmfrqwhsxnr6qqnlrg0c8c5bzz9c")))) (base32 "0f12axi53x14l12dgf4a1lfq3p1fx7fh7sjfc0db3lk88ph9qfwl"))))
(build-system asdf-build-system/sbcl) (build-system asdf-build-system/sbcl)
(home-page "https://github.com/stylewarning/computable-reals") (home-page "https://github.com/stylewarning/computable-reals")
(synopsis "Arbitrary-precision, re-computing real-numbers in Common Lisp") (synopsis "Arbitrary-precision, re-computing real-numbers in Common Lisp")
@@ -22851,6 +22847,16 @@ specification}, a toolkit for writing GUIs in Common Lisp.")
(define-public cl-mcclim (define-public cl-mcclim
(sbcl-package->cl-source-package sbcl-mcclim)) (sbcl-package->cl-source-package sbcl-mcclim))
(define-public ecl-mcclim
(let ((pkg (sbcl-package->ecl-package sbcl-mcclim)))
(package
(inherit pkg)
(arguments
(substitute-keyword-arguments arguments
;; Tests fail with "FUNCTION: Not a valid argument (R1
;; (GENERATE-REGION))." on ECL.
((#:tests? _ #f) #f))))))
(define-public sbcl-md5 (define-public sbcl-md5
(package (package
(name "sbcl-md5") (name "sbcl-md5")
@@ -29761,7 +29767,7 @@ the Processing language and shares some of the API.")
;; Update together with emacs-slime. ;; Update together with emacs-slime.
(package (package
(name "sbcl-slime-swank") (name "sbcl-slime-swank")
(version "2.32") (version "2.31")
(source (source
(origin (origin
(file-name (git-file-name "cl-slime-swank" version)) (file-name (git-file-name "cl-slime-swank" version))
@@ -29770,7 +29776,7 @@ the Processing language and shares some of the API.")
(url "https://github.com/slime/slime/") (url "https://github.com/slime/slime/")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(sha256 (sha256
(base32 "0s7m7j7y1p8fb6ncpxcxdrrrxp5aw67xl7wrqy8zjjvwzljbs548")) (base32 "0nv99wq2vz053p0rn9953rhmyz4g40zdl01mz7z9xbklxzbsx6x7"))
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; The doc folder drags `gawk' into the closure. Doc is already ;; The doc folder drags `gawk' into the closure. Doc is already
+33 -16
View File
@@ -229,25 +229,42 @@ provides some unique features such as CSV log format and wide string support.")
(define-public multitail (define-public multitail
(package (package
(name "multitail") (name "multitail")
(version "7.1.5") (version "6.5.2")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/folkertvanheusden/multitail") (url "https://github.com/halturin/multitail")
(commit version))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "11kkd2rg3qc7ck5iyha0f8l5lqc1bvwypn80di0h77h7p106blvk")))) (base32 "17hg5qpangyx4m7hp2x4h56mp6w3wsaslg1il39qcpwsffh1rihc"))))
(build-system cmake-build-system) (build-system gnu-build-system)
(arguments (arguments
(list `(#:make-flags
#:tests? #f ;no test suite (list (string-append "CC=" ,(cc-for-target))
#:phases #~(modify-phases %standard-phases (string-append "PREFIX=" (assoc-ref %outputs "out"))
(add-after 'unpack 'patch-curses-headers "SYSCONFDIR=$(PREFIX)/etc")
(lambda _ #:phases
(substitute* "mt.h" (modify-phases %standard-phases
(("ncursesw/") ""))))))) (add-after 'unpack 'fix-broken-build
;; With some luck, you might be able to remove this when updating…
(lambda _
(substitute* "Makefile"
((" \\*\\.txt") "")
((".*CONFIG_DIR.*") "")
(("^install: .*" match)
(string-append match
"\t$(INSTALL_DIR) $(DESTDIR)$(SYSCONFDIR)\n")))
(substitute* "version"
(("(VERSION=).*" _ assign)
(string-append assign ,version)))))
(add-after 'unpack 'patch-curses-headers
(lambda _
(substitute* "mt.h"
(("ncursesw/") ""))))
(delete 'configure)) ; no configure script
#:tests? #f)) ; no test suite (make check just runs cppcheck)
(inputs (list ncurses)) (inputs (list ncurses))
(home-page "https://vanheusden.com/multitail/") (home-page "https://vanheusden.com/multitail/")
(synopsis "Monitor multiple log files") (synopsis "Monitor multiple log files")
+2 -2
View File
@@ -1129,7 +1129,7 @@ Grammars (PEGs).")
(define (make-lua-luv name lua) (define (make-lua-luv name lua)
(package (package
(name name) (name name)
(version "1.44.2-0") (version "1.43.0-0")
(source (origin (source (origin
;; The release tarball includes the sources of libuv but does ;; The release tarball includes the sources of libuv but does
;; not include the pkg-config files. ;; not include the pkg-config files.
@@ -1140,7 +1140,7 @@ Grammars (PEGs).")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0jdvsznzha290gnzd66vscsdacd5dapq0scwy4zj64d9wnsv39p7")))) "1yzi4bm845vl84wyv2qw4z1n1v285lgwm681swmp84brfy2s7czp"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
(list #:tests? #f ; there are none (list #:tests? #f ; there are none
+3 -113
View File
@@ -57,7 +57,7 @@
;;; Copyright © 2023 Wilko Meyer <w@wmeyer.eu> ;;; Copyright © 2023 Wilko Meyer <w@wmeyer.eu>
;;; Copyright © 2024 Benjamin Slade <slade@lambda-y.net> ;;; Copyright © 2024 Benjamin Slade <slade@lambda-y.net>
;;; Copyright © 2024 Jean Simard <woshilapin@tuziwo.info> ;;; Copyright © 2024 Jean Simard <woshilapin@tuziwo.info>
;;; Copyright © 2024-2026 Zheng Junjie <z572@z572.online> ;;; Copyright © 2024, 2025 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2024, 2025 Ashish SHUKLA <ashish.is@lostca.se> ;;; Copyright © 2024, 2025 Ashish SHUKLA <ashish.is@lostca.se>
;;; Copyright © 2025 Tanguy Le Carrour <tanguy@bioneland.org> ;;; Copyright © 2025 Tanguy Le Carrour <tanguy@bioneland.org>
;;; Copyright © 2025-2026 Sharlatan Hellseher <sharlatanus@gmail.com> ;;; Copyright © 2025-2026 Sharlatan Hellseher <sharlatanus@gmail.com>
@@ -138,7 +138,6 @@
#:use-module (gnu packages guile-xyz) #:use-module (gnu packages guile-xyz)
#:use-module (gnu packages haskell-xyz) #:use-module (gnu packages haskell-xyz)
#:use-module (gnu packages icu4c) #:use-module (gnu packages icu4c)
#:use-module (gnu packages jemalloc)
#:use-module (gnu packages kerberos) #:use-module (gnu packages kerberos)
#:use-module (gnu packages language) #:use-module (gnu packages language)
#:use-module (gnu packages libbsd) #:use-module (gnu packages libbsd)
@@ -149,7 +148,6 @@
#:use-module (gnu packages libunistring) #:use-module (gnu packages libunistring)
#:use-module (gnu packages libunwind) #:use-module (gnu packages libunwind)
#:use-module (gnu packages linux) #:use-module (gnu packages linux)
#:use-module (gnu packages llvm)
#:use-module (gnu packages lsof) #:use-module (gnu packages lsof)
#:use-module (gnu packages lua) #:use-module (gnu packages lua)
#:use-module (gnu packages m4) #:use-module (gnu packages m4)
@@ -160,7 +158,6 @@
#:use-module (gnu packages networking) #:use-module (gnu packages networking)
#:use-module (gnu packages onc-rpc) #:use-module (gnu packages onc-rpc)
#:use-module (gnu packages openldap) #:use-module (gnu packages openldap)
#:use-module (gnu packages nss)
#:use-module (gnu packages pcre) #:use-module (gnu packages pcre)
#:use-module (gnu packages pdf) #:use-module (gnu packages pdf)
#:use-module (gnu packages perl) #:use-module (gnu packages perl)
@@ -201,7 +198,6 @@
#:use-module (gnu packages xml) #:use-module (gnu packages xml)
#:use-module (gnu packages xorg) #:use-module (gnu packages xorg)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (guix build-system cargo)
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system emacs) #:use-module (guix build-system emacs)
#:use-module (guix build-system glib-or-gtk) #:use-module (guix build-system glib-or-gtk)
@@ -1359,7 +1355,7 @@ security functionality including PGP, S/MIME, SSH, and SSL.")
(define-public mu (define-public mu
(package (package
(name "mu") (name "mu")
(version "1.14.1") (version "1.14.0")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -1368,7 +1364,7 @@ security functionality including PGP, S/MIME, SSH, and SSL.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0dv27pq2jmgqlzsy2gcmh7vddiwiwd55j299blb9k8g0xhkg8riz")))) (base32 "1fhnnm58ndfd6hzdagrsgcdcm2qlcjlda13vyx5d9lclhxgdn0vf"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (native-inputs
(list pkg-config (list pkg-config
@@ -3914,112 +3910,6 @@ are supported). @code{bit} is a CGI/SSI program that generates web pages
on the fly. Both programs are written in C and are very fast.") on the fly. Both programs are written in C and are very fast.")
(license license:expat))) (license license:expat)))
(define computed-origin-method (@@ (guix packages) computed-origin-method))
(define-public stalwart
(package
(name "stalwart")
(version "0.16.3")
(source
(let ((upstream-source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/stalwartlabs/stalwart")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1wcs9inwv8iv4qrayp9730wzmmpp4bna6jnpdz29ygb5c0lf2b29")))))
(origin
(method computed-origin-method)
(file-name (git-file-name name version))
(sha256 #f)
(uri
(delay
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils))
(set-path-environment-variable
"PATH" '("bin")
(list #+python-minimal))
(copy-recursively #+upstream-source "upstream-source")
(with-directory-excursion "upstream-source"
(for-each make-file-writable (find-files "crates" "\\.rs"))
(invoke "python3" "resources/scripts/ossify.py" "crates")
(substitute* "crates/main/Cargo.toml"
((", \"enterprise\"")
""))
(substitute* "crates/common/Cargo.toml"
(("git =.*/opentelemetry-rust\"")
"version = \"0.31.0\"")))
(copy-recursively "upstream-source" #$output))))))))
(build-system cargo-build-system)
(arguments
(list
#:install-source? #f
;; TODO: Currently, if the test is enabled, it will attempt to link
;; the foundationdb library. However, we haven't packaged it yet,
;; so for now, skip tests.
#:tests? #f
#:features ''("s3" "postgres" "rocks" "sqlite")
#:cargo-install-paths ''("crates/main")
#:phases
#~(modify-phases %standard-phases
(add-before 'build 'setenv
(lambda* (#:key inputs #:allow-other-keys)
(setenv "LIBZ_SYS_STATIC" "0")
;; jemalloc needs unbundling for tikv-jemallocator-sys
;; This flag is needed when not using the bundled jemalloc.
;; https://github.com/tikv/jemallocator/issues/19
(setenv
"CARGO_FEATURE_UNPREFIXED_MALLOC_ON_SUPPORTED_PLATFORMS" "1")
(setenv "JEMALLOC_OVERRIDE"
(search-input-file inputs "/lib/libjemalloc.so")))))))
(native-inputs (list clang pkg-config))
(inputs (cons* bzip2
jemalloc
librdkafka
lz4
rocksdb
snappy
sqlite
zlib
openssl
`(,zstd "lib")
(cargo-inputs 'stalwart)))
(home-page "https://stalw.art")
(synopsis "All in one Mail and Collaboration server")
(description
"Stalwart is an mail and collaboration server with JMAP, IMAP4, POP3, SMTP,
CalDAV, CardDAV and WebDAV support and a wide range of modern features.")
(license license:agpl3)))
(define-public stalwart-cli
(package
(name "stalwart-cli")
(version "1.0.4")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/stalwartlabs/cli")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0rbhzd8m48fm5q8vlzkla5zxrypkbvsi8i1bplkm1ndp0bwiqdvz"))))
(build-system cargo-build-system)
(arguments
(list #:install-source? #f))
(native-inputs (list nss-certs-for-test))
(inputs (cargo-inputs 'stalwart-cli))
(home-page "https://stalw.art")
(synopsis "Stalwart Command Line Interface")
(description
"A schema-driven command line tool for administering Stalwart Mail and
Collaboration Server over its JMAP API.")
(license license:agpl3)))
(define-public swaks (define-public swaks
(package (package
(name "swaks") (name "swaks")
+19 -136
View File
@@ -22,7 +22,7 @@
;;; Copyright © 2017, 2019, 2022 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2017, 2019, 2022 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 20172021 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 20172021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017 Dave Love <me@fx@gnu.org> ;;; Copyright © 2017 Dave Love <me@fx@gnu.org>
;;; Copyright © 2018-2022, 2024-2026 Janneke Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2018, 2019, 2020, 2021, 2022, 2024, 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com> ;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com>
;;; Copyright © 2018 Nadya Voronova <voronovank@gmail.com> ;;; Copyright © 2018 Nadya Voronova <voronovank@gmail.com>
;;; Copyright © 2018 Adam Massmann <massmannak@gmail.com> ;;; Copyright © 2018 Adam Massmann <massmannak@gmail.com>
@@ -458,8 +458,7 @@ programming languages.")
(url "https://github.com/cvc5/cvc5/") (url "https://github.com/cvc5/cvc5/")
(commit (string-append "cvc5-" version)))) (commit (string-append "cvc5-" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(patches (search-patches "cvc5-reproducible-build.patch" (patches (search-patches "cvc5-reproducible-build.patch"))
"cvc5-symfpu-compatibility.patch"))
(sha256 (sha256
(base32 "0ynz7di4dyyiiydgmf0z9dc2jl7nm44xi0amch29rcgznwr4wy5m")))) (base32 "0ynz7di4dyyiiydgmf0z9dc2jl7nm44xi0amch29rcgznwr4wy5m"))))
(build-system cmake-build-system) (build-system cmake-build-system)
@@ -746,54 +745,6 @@ complete with events and to-dos.")
(home-page "https://codeberg.org/dgoodmaniii/dozenal") (home-page "https://codeberg.org/dgoodmaniii/dozenal")
(license license:gpl3+)))) (license license:gpl3+))))
(define-public drat-trim
(package
(name "drat-trim")
(version "05.22.2023")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/marijnheule/drat-trim")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "084miqj57xr7c74y649acm5xjkddpjn4ybfh469jcbakzp8w0pdi"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;no tests
#:make-flags
#~(list (string-join
(list "FLAGS=-DLONGTYPE"
;; _POSIX_C_SOURCE required for getc_unlocked(3).
"-D_POSIX_C_SOURCE=200809")
" "))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'always-pass-flags
(lambda _
(substitute* "Makefile"
;; Ensure that drat-trim and gapless target also respect FLAGS.
(("-std=c99 -O2")
"-std=c99 $(FLAGS) -O2"))))
(delete 'configure) ;no configure script
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((bin (string-append #$output "/bin")))
(for-each (lambda (exec)
(install-file exec bin))
'("drat-trim"
"lrat-check"))))))))
(synopsis "Proof checker for unsatisfiability of propositional formulas")
(description
"The proof checker DRAT-trim can be used to check whether a propositional
formula in the DIMACS format is unsatisfiable. Given a propositional formula and
a clausal proof, DRAT-trim validates that the proof is a certificate of
unsatisfiability of the formula.")
(home-page "https://www.cs.utexas.edu/~marijn/drat-trim/")
(license license:expat)))
(define-public dsfmt (define-public dsfmt
(package (package
(name "dsfmt") (name "dsfmt")
@@ -2524,9 +2475,6 @@ similar to MATLAB, GNU Octave or SciPy.")
;; "--enable-doxygen" ;; "--enable-doxygen"
"--enable-dot" "--enable-dot"
"--enable-netcdf-4" "--enable-netcdf-4"
#$@(if (or (target-x86-32?) (target-arm32?))
'("CFLAGS=-Wno-error=incompatible-pointer-types")
'())
(string-append "--with-plugin-dir=" #$output "/lib/hdf5-plugins")) (string-append "--with-plugin-dir=" #$output "/lib/hdf5-plugins"))
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
@@ -2538,15 +2486,7 @@ similar to MATLAB, GNU Octave or SciPy.")
(("testurl.sh") "")) (("testurl.sh") ""))
(substitute* "nczarr_test/Makefile.in" (substitute* "nczarr_test/Makefile.in"
(("/bin/bash") (("/bin/bash")
(search-input-file inputs "bin/bash"))) (search-input-file inputs "bin/bash")))))
;; This test fails on 32 bit platforms.
#$@(if (or (target-x86-32?) (target-arm32?))
'((substitute* '("ncdump/tst_netcdf4_4.sh"
"ncdump/tst_nccopy4.sh")
(("#!/bin/sh" m) (string-append m "\nexit 0\n")))
(substitute* "ncdump/Makefile.in"
(("tst_netcdf4_4.log") "")))
'())))
(add-before 'configure 'fix-source-date (add-before 'configure 'fix-source-date
(lambda _ (lambda _
;; As we ${SOURCE_DATE_EPOCH} evaluates to "1" in the build ;; As we ${SOURCE_DATE_EPOCH} evaluates to "1" in the build
@@ -4055,64 +3995,6 @@ addition it can be used as a module in Python for plotting. It supports
vector and bitmap output, including PDF, Postscript, SVG and EMF.") vector and bitmap output, including PDF, Postscript, SVG and EMF.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public voro++
(package
(name "voro++")
(version "0.4.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/chr1shr/voro")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0rxyb662w9y3xadyxz2x7gvc7mafbhl13szdc55fsk5sygpdlkv5"))))
(build-system gnu-build-system)
(arguments
(list
#:make-flags #~(list (string-append "PREFIX=" #$output))
#:phases
#~(modify-phases %standard-phases
(delete 'configure) ;no configure
(replace 'check
;; There is no test suite but the project provides a verity of
;; examples to check performance, target "all" build each example
;; (basic, walls, custom, extra, degenerate, and interface), see
;; detailed description in "examples/README".
;;
;; Running timing example only:
;; These codes and scripts can be used to test the code's
;; performance. The program timing_test.cc creates a container
;; with 100000 particles, and then times the computation of all
;; the cells in the container, using the dummy function
;; compute_all_cells().
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(with-directory-excursion "examples/timing"
(invoke "perl" "timing_test.pl"))))))))
(native-inputs
(list perl))
(home-page "https://math.lbl.gov/voro++/")
(synopsis "C++ library for the computation of the Voronoi diagram")
(description
"Voro++ is a software library for carrying out three-dimensional
computations of the Voronoi tessellation. A distinguishing feature of the
Voro++ library is that it carries out cell-based calculations, computing the
Voronoi cell for each particle individually. It is particularly well-suited
for applications that rely on cell-based statistics, where features of Voronoi
cells (eg. volume, centroid, number of faces) can be used to analyze a system
of particles.
Voro++ comprises of several C++ classes that can be built as a static library.
A command-line utility is also provided that can use most features of the
code. The direct cell-by-cell construction makes the library particularly
well-suited to handling special boundary conditions and walls. It employs
algorithms that are tolerant for numerical precision errors, it exhibits high
performance, and it has been successfully employed on very large particle
systems.")
(license license:bsd-3)))
(define-public maxflow (define-public maxflow
(package (package
(name "maxflow") (name "maxflow")
@@ -8432,11 +8314,8 @@ s-expression-based format.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public symfpu (define-public symfpu
;; Currently, we use the "experimental" branch of the symfpu repository. The (let ((commit "22d993d880f66b2e470c3928e0e61bdf61419702")
;; default "master" branch hasn't been updated in ~7 years and both bitwuzla (revision "0"))
;; and cvc5 require fixes from the "experimental" branch.
(let ((commit "aeaa3fa62730148c855f5a9e0a9b7040d48e0b7e")
(revision "1"))
(package (package
(name "symfpu") (name "symfpu")
(version (git-version "0" revision commit)) (version (git-version "0" revision commit))
@@ -8448,7 +8327,7 @@ s-expression-based format.")
(commit commit))) (commit commit)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0wj9pwr2jiliy4rw4nvy51427dwhwj86azi14qc5vzsdb44c6fdx")))) (base32 "1h20zzkyi225290kc6mzg8i4dwkj0p1vlwfgc9ycs61snlyd8gr8"))))
(build-system copy-build-system) (build-system copy-build-system)
(arguments (arguments
(list (list
@@ -8490,7 +8369,7 @@ operations.")
(define-public bitwuzla (define-public bitwuzla
(package (package
(name "bitwuzla") (name "bitwuzla")
(version "0.9.0") (version "0.8.2")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -8499,16 +8378,21 @@ operations.")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "012h3fj25f5zk9qy353vqn5jpp26db45xjbxi7ns02pkhlm46f6x")))) (base32 "0nakqz29cfkn91yvx1xzsk50rlqbiihslflbjanv4lflcl2zx6mz"))))
(build-system meson-build-system) (build-system meson-build-system)
(arguments (arguments
`(#:configure-flags '("-Dtesting=enabled" "-Ddefault_library=shared" `(#:configure-flags '("-Dtesting=enabled" "-Ddefault_library=shared"
"-Dkissat=true"))) "-Dkissat=true")
#:phases (modify-phases %standard-phases
(add-after 'unpack 'make-git-optional
(lambda _
(substitute* "src/meson.build"
(("run_command\\('git',")
"run_command('sh', '-c', 'git',")))))))
(native-inputs (list googletest pkg-config)) (native-inputs (list googletest pkg-config))
(inputs (list cadical-2.1 (inputs (list cadical
gmp gmp
kissat kissat
mpfr
symfpu)) symfpu))
(synopsis "SMT solver optimized for the theory of bit-vectors") (synopsis "SMT solver optimized for the theory of bit-vectors")
(description (description
@@ -8795,7 +8679,7 @@ reduction.")
(define-public mcrl2 (define-public mcrl2
(package (package
(name "mcrl2") (name "mcrl2")
(version "202507.0") (version "202307.1")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
@@ -8803,9 +8687,9 @@ reduction.")
version ".tar.gz")) version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"08w7v2dx1s164q3vc5lzf864nlxrf8s0kgsa26mmkgfqfqcwdgjj")))) "147002dl3gq2jsk5gcmvw7hj3mfxrpgxwcfda5mfrj26rcxw48fc"))))
(inputs (inputs
(list boost glu mesa qtbase)) (list boost glu mesa qtbase-5))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (list #:tests? #f)) (arguments (list #:tests? #f))
(synopsis "Toolset for the mCRL2 formal specification language") (synopsis "Toolset for the mCRL2 formal specification language")
@@ -9776,7 +9660,6 @@ researchers and developers alike to get started on SAT.")
"1snimig4cp97p570nin2i38my72zvwypldyhr125i1z6cd9pa046")))) "1snimig4cp97p570nin2i38my72zvwypldyhr125i1z6cd9pa046"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (list xz gzip lzip bzip2 p7zip)) (inputs (list xz gzip lzip bzip2 p7zip))
(native-inputs (list drat-trim))
(arguments (arguments
(list (list
#:test-target "test" #:test-target "test"
-29
View File
@@ -686,35 +686,6 @@ components.")
(base32 (base32
"0cqa072fz55j5xyvixqv8vbd7jsbhb1cd14bzjvm0hbv2wpd9npf")))))) "0cqa072fz55j5xyvixqv8vbd7jsbhb1cd14bzjvm0hbv2wpd9npf"))))))
(define-public java-jvnet-parent-pom-1
(hidden-package
(package
(name "java-jvnet-parent-pom-1")
(version "1")
(source (origin
(method url-fetch)
(uri (string-append "https://repo1.maven.org/maven2/net/java/"
"jvnet-parent/" version "/jvnet-parent-"
version ".pom"))
(sha256
(base32
"1gv37n9aid7fdhwd0h4py024w8by56cchg3b4sg5vrk82a0l0518"))))
(build-system ant-build-system)
(arguments
(list
#:tests? #f
#:phases
#~(modify-phases %standard-phases
(delete 'unpack)
(delete 'configure)
(delete 'build)
(replace 'install
(install-pom-file #$(package-source this-package))))))
(home-page "https://mvnrepository.com/artifact/net.java/jvnet-parent")
(synopsis "java.net parent pom")
(description "This package contains the java.net parent pom file.")
(license license:asl2.0))))
(define-public java-jvnet-parent-pom-3 (define-public java-jvnet-parent-pom-3
(hidden-package (hidden-package
(package (package
+16 -11
View File
@@ -2839,7 +2839,7 @@ implementation of an MQTT version client class.")
(define-public psi-plus (define-public psi-plus
(package (package
(name "psi-plus") (name "psi-plus")
(version "1.5.2115") (version "1.5.1484")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -2853,7 +2853,7 @@ implementation of an MQTT version client class.")
`(begin `(begin
(delete-file-recursively "3rdparty"))) (delete-file-recursively "3rdparty")))
(sha256 (sha256
(base32 "14za9rh7nszv5px5a2w43ysi9977zws8a5mxsh7wc8ksr693faz2")))) (base32 "1jsm39nzzbqkp3zc0xqx7jid6p4q1ra28xad38wjr2l1jb8qjn24"))))
(build-system qt-build-system) (build-system qt-build-system)
(arguments (arguments
`(#:tests? #f ; No target `(#:tests? #f ; No target
@@ -2910,13 +2910,19 @@ implementation of an MQTT version client class.")
"qite/qiteaudio.h") "qite/qiteaudio.h")
(("qiteaudiorecorder.h") (("qiteaudiorecorder.h")
"qite/qiteaudiorecorder.h")))) "qite/qiteaudiorecorder.h"))))
(add-after 'install 'wrap-executable (add-after 'install 'wrap-env
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(wrap-program (string-append out "/bin/psi-plus") (for-each
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,(getenv "GST_PLUGIN_SYSTEM_PATH"))) (lambda (name)
`("GI_TYPELIB_PATH" ":" prefix (,(getenv "GI_TYPELIB_PATH"))))))) (let ((file (string-append out "/bin/" name))
(add-after 'wrap-executable 'glib-or-gtk-compile-schemas (gst-plugin-path (getenv "GST_PLUGIN_SYSTEM_PATH"))
(gi-typelib-path (getenv "GI_TYPELIB_PATH")))
(wrap-program file
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path))
`("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))))
'("psi-plus")))))
(add-after 'wrap-env 'glib-or-gtk-compile-schemas
(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-compile-schemas)) (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-compile-schemas))
(add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap (add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap
(assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))))) (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap)))))
@@ -2939,7 +2945,6 @@ implementation of an MQTT version client class.")
libgcrypt libgcrypt
libgpg-error libgpg-error
libidn libidn
libomemo-c
libotr libotr
libsignal-protocol-c libsignal-protocol-c
tidy-html tidy-html
@@ -2959,11 +2964,11 @@ implementation of an MQTT version client class.")
libxcb libxcb
libxscrnsaver libxscrnsaver
zlib)) zlib))
(home-page "https://psi-im.com/") (home-page "https://psi-plus.com/")
(synopsis "Qt-based XMPP Client") (synopsis "Qt-based XMPP Client")
(description (description
"Psi+ is a powerful XMPP client designed for experienced users. "Psi+ is a spin-off of Psi XMPP client. It is a powerful XMPP client
It's a spin-off of the Psi XMPP client.") designed for experienced users.")
(license license:gpl2+))) (license license:gpl2+)))
(define-deprecated-package psi (define-deprecated-package psi
+3 -5
View File
@@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015, 2018, 2019 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014, 2015, 2018, 2019 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2014-2026 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014-2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net> ;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
;;; Copyright © 2016 Andreas Enge <andreas@enge.fr> ;;; Copyright © 2016 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2017 Dave Love <fx@gnu.org> ;;; Copyright © 2017 Dave Love <fx@gnu.org>
@@ -432,7 +432,7 @@ software vendors, application developers and computer science researchers.")
(package/inherit openmpi-5 (package/inherit openmpi-5
(name "openmpi-rocm") (name "openmpi-rocm")
(arguments (arguments
(substitute-keyword-arguments arguments (substitute-keyword-arguments (package-arguments openmpi-5)
((#:configure-flags flags '()) ((#:configure-flags flags '())
#~(cons* (string-append "--with-rocm=" #~(cons* (string-append "--with-rocm="
#$(this-package-input "rocm-hip-runtime")) #$(this-package-input "rocm-hip-runtime"))
@@ -440,9 +440,7 @@ software vendors, application developers and computer science researchers.")
(inputs (modify-inputs (package-inputs openmpi-5) (inputs (modify-inputs (package-inputs openmpi-5)
;; XXX: This might break openmpi-5 for architectures where ROCm ;; XXX: This might break openmpi-5 for architectures where ROCm
;; is not supported. ;; is not supported.
(append rocm-hip-runtime) (append rocm-hip-runtime)))
(replace "ucx" ucx-rocm)
(replace "libfabric" libfabric-rocm)))
(synopsis "MPI-3 implementation (with ROCm support)"))) (synopsis "MPI-3 implementation (with ROCm support)")))
(define-public openmpi-c++ (define-public openmpi-c++
+25 -128
View File
@@ -171,7 +171,6 @@
#:use-module (gnu packages lua) #:use-module (gnu packages lua)
#:use-module (gnu packages machine-learning) #:use-module (gnu packages machine-learning)
#:use-module (gnu packages man) #:use-module (gnu packages man)
#:use-module (gnu packages maths)
#:use-module (gnu packages messaging) #:use-module (gnu packages messaging)
#:use-module (gnu packages mp3) #:use-module (gnu packages mp3)
#:use-module (gnu packages mpd) #:use-module (gnu packages mpd)
@@ -225,7 +224,6 @@
#:use-module (gnu packages xiph) #:use-module (gnu packages xiph)
#:use-module (gnu packages xml) #:use-module (gnu packages xml)
#:use-module (gnu packages xorg) #:use-module (gnu packages xorg)
#:use-module (gnu packages wine)
#:use-module ((srfi srfi-1) #:select (last))) #:use-module ((srfi srfi-1) #:select (last)))
(define-public alsa-scarlett-gui (define-public alsa-scarlett-gui
@@ -5357,132 +5355,6 @@ includes instruments based on audio samples and various soft sythesizers. It
can receive input from a MIDI keyboard.") can receive input from a MIDI keyboard.")
(license license:gpl2+))) (license license:gpl2+)))
;; This version tracks the latest commit from master branch.
(define-public lmms-next
(let ((commit "83313e737d3137f7939f3daa9063a94a1ac01f7c")
(revision "0"))
(package/inherit lmms
(name "lmms-next")
(version (git-version "1.3.0-alpha.1" revision commit))
(source
(origin
(inherit (package-source lmms))
(uri (git-reference
(url "https://github.com/LMMS/lmms")
(commit commit)
;; Clone recursively only for the optional plugins. The 3rd
;; party libraries will be deleted by the snippet.
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32 "1mpp449rvn9f10bcxhpmxfinvj3jdv4s6qjhlp0sj9l783pv3h69"))
(modules '((guix build utils)))
(snippet
'(begin
;; Delete the bundled 3rd party libraries.
(for-each delete-file-recursively
(list "plugins/CarlaBase/carla"
"plugins/OpulenZ/adplug"
"plugins/Xpressive/exprtk"
"src/3rdparty"))
;; Do not check submodules.
(substitute* "CMakeLists.txt"
((".*CheckSubmodules.*") "")
;; Do not use the bundled weakjack.
(("JACK libraries\" ON") "JACK libraries\" OFF"))
(substitute* "src/CMakeLists.txt"
;; Do not add 3rd party libraries.
((".*3rdparty.*") "")
;; Use adplug and ringbuffer from the system.
(("\\$\\{EXTRA_LIBRARIES\\}" all)
(string-append all
"\n\tadplug"
"\n\tringbuffer")))
(with-directory-excursion "plugins"
;; Use carla from the system.
(substitute* "CarlaBase/Carla.h"
(("#include <CarlaDefines")
"#include <carla/includes/CarlaDefines")
(("#include <CarlaNative")
"#include <carla/includes/CarlaNative")
(("#include <CarlaBackend") "#include <carla/CarlaBackend")
(("#include <CarlaUtils") "#include <carla/CarlaUtils"))
(with-directory-excursion "OpulenZ"
;; Do not use the bundled adplug.
(substitute* "CMakeLists.txt"
((".*adplug .*") "")
((".*adplug/.*") "")
(("^\\)") "")
(("\\.png\"") ".png\"\n)"))
;; Use adplug from the system.
(substitute* "OpulenZ.cpp"
(("<opl\\.h>") "<adplug/opl.h>")
(("<temuopl\\.h>") "<adplug/temuopl.h>")
(("<mididata\\.h>") "<adplug/mididata.h>")))
;; Do not use the bundled hiir.
(substitute* "SlewDistortion/CMakeLists.txt"
(("TARGET_LINK_LIBRARIES\\(slewdistortion hiir\\)") ""))
;; Do not use the bundled exprtk.
(substitute* "Xpressive/CMakeLists.txt"
((".*\\(exprtk .*") "")
((".*xpressive exprtk.*") "")))
;; Avoid "invalid conversion from 'const unsigned char*' to
;; 'unsigned char*'" error.
(substitute* "plugins/OpulenZ/OpulenZ.cpp"
(("unsigned char \\*inst") "const unsigned char *inst"))))))
(arguments
(substitute-keyword-arguments arguments
((#:qtbase _ #f) qtbase)
((#:configure-flags flags)
#~(cons* "-DWANT_QT6=ON" (delete "-DWANT_QT5=ON" #$flags)))
((#:phases phases)
#~(modify-phases #$phases
(delete 'unpack-rpmalloc)
(replace 'fix-carla-export
;; Taken from NixOS package definition.
(lambda _
(substitute* "plugins/CarlaBase/Carla.h"
(("CARLA_EXPORT")
"CARLA_API_EXPORT"))))))))
(native-inputs
(modify-inputs native-inputs
(delete "rpmalloc")
(replace "qttools" qttools)))
(inputs
(modify-inputs inputs
(delete "qtx11extras")
(replace "carla" carla-2.6)
(replace "qtwayland" qtwayland)
(replace "sdl12-compat" sdl2)
(append adplug
exprtk
hiir
libxml2
lilv
lv2
perl
perl-list-moreutils
perl-xml-parser
qtsvg
ringbuffer
suil)))
(native-search-paths
(list (search-path-specification
(variable "LV2_PATH")
(files '("lib/lv2"))))))))
(define-public lmms-next-with-vst
(package/inherit lmms-next
(name "lmms-next-with-vst")
(arguments
(substitute-keyword-arguments arguments
((#:configure-flags flags)
#~(cons* (string-append "-DWINE_LOCATIONS=" #$(wine-for-system))
(delete "-DWANT_VST=OFF" #$flags)))))
(inputs
(modify-inputs inputs
(append (wine-for-system))))))
(define-public stargate (define-public stargate
(package (package
(name "stargate") (name "stargate")
@@ -7593,6 +7465,31 @@ standalone JACK application.")
;; Expat or CC0 ;; Expat or CC0
(license (list license:expat license:cc0)))) (license (list license:expat license:cc0))))
(define-public regrader
(package
(inherit vl1-emulator)
(name "regrader")
(version "1.0.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/linuxmao-org/regrader")
(commit (string-append "v" version))
;; bundles a specific commit of the DISTRHO plugin framework
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32
"0gl4d5lf2afqknz22jz7hh7029sc9v1xrz6nbz9dlv42bwc0cvl0"))))
(home-page "https://github.com/linuxmao-org/regrader")
(synopsis "Delay effect plugin")
(description
"Regrader is a delay effect where the repeats degrade in resolution.
This is an unofficial port of the Regrader plugin created by Igorski. It
is available as an LV2 plugin and a standalone JACK application.")
(license license:expat)))
(define-public fogpad (define-public fogpad
(package (package
(inherit vl1-emulator) (inherit vl1-emulator)
File diff suppressed because it is too large Load Diff
+68 -15
View File
@@ -591,7 +591,7 @@ Android, and ChromeOS.")
(define-public libnice (define-public libnice
(package (package
(name "libnice") (name "libnice")
(version "0.1.23") (version "0.1.22")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -601,7 +601,7 @@ Android, and ChromeOS.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0zqnqhcm1rx5axbzd448yi6j4bq4kykiqb4wihs2p8h1k49nkyjh")))) "0ik45q1qlr04llr2ssm6zb73840dmn31q303k3qrcpgj0jp578hg"))))
(build-system meson-build-system) (build-system meson-build-system)
(outputs '("out" "doc")) (outputs '("out" "doc"))
(arguments (arguments
@@ -614,25 +614,23 @@ Android, and ChromeOS.")
(add-after 'unpack 'disable-failing-tests (add-after 'unpack 'disable-failing-tests
(lambda _ (lambda _
(substitute* "tests/meson.build" (substitute* "tests/meson.build"
;; This test is flaky (see:
;; <https://gitlab.freedesktop.org/libnice/libnice/-/work_items/210>).
((".*'test-send-recv',.*") "")
;; test-set-port-range.c:66:main: assertion failed: ;; test-set-port-range.c:66:main: assertion failed:
;; (nice_agent_gather_candidates (agent, stream1)) ;; (nice_agent_gather_candidates (agent, stream1))
(("'test-set-port-range'" all) (("'test-set-port-range'" all)
(string-append "# " all)) (string-append "# " all))
;; The following test is disabled as it fails in a ;; The following test is disabled as it fails in a
;; nondeterministic fashion (see: ;; nondeterministic fashion (see:
;; <https://gitlab.freedesktop.org/libnice/libnice/-/issues/151>). ;; https://gitlab.freedesktop.org/libnice/libnice/-/issues/151).
(("'test-bsd'" all) (("'test-bsd'" all)
(string-append "# " all)) (string-append "# " all))
;; This test uses getaddrinfo, which cannot resolve in the ;; The test-new-trickle fails with GLib 2.83.0 (see:
;; build environment. ;; https://gitlab.freedesktop.org/libnice/libnice/-/issues/198).
((".*'test-slow-resolving',.*") "")) (("'test-new-trickle'" all)
(string-append "# " all)))
(substitute* "stun/tests/meson.build" (substitute* "stun/tests/meson.build"
;; test-bind.c:234: bad_responses: Assertion `len >= 20' ;; test-bind.c:234: bad_responses: Assertion `len >= 20'
;; failed (see: ;; failed (see:
;; <https://gitlab.freedesktop.org/libnice/libnice/-/issues/150>). ;; https://gitlab.freedesktop.org/libnice/libnice/-/issues/150).
(("'bind', ") (("'bind', ")
"")))) ""))))
(add-after 'install 'move-docs (add-after 'install 'move-docs
@@ -2043,7 +2041,7 @@ of the same name.")
(define-public wireshark (define-public wireshark
(package (package
(name "wireshark") (name "wireshark")
(version "4.6.5") (version "4.6.4")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -2052,7 +2050,7 @@ of the same name.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0cws5gaxkbdwqjawkwfr3iz39vdd0m0m0q7h2z4fzdv6lrp8ys31")))) (base32 "05jivnnlmbbhc6b3r7zdahiw22fvb9r6pg4pc83ascnja49xlyq6"))))
(build-system qt-build-system) (build-system qt-build-system)
(arguments (arguments
(list (list
@@ -2141,6 +2139,62 @@ replies, fping will send out a ping packet and move on to the next target in a
round-robin fashion.") round-robin fashion.")
(license license:expat))) (license license:expat)))
(define-public gandi-cli
(package
(name "gandi-cli")
(version "1.6")
(source
(origin
(method url-fetch)
(uri (pypi-uri name version))
(sha256
(base32 "1h36jahbp7273wn3yd747kbiwjc0bm3sja67bcxdsd54ln0vyndg"))))
(build-system pyproject-build-system)
(arguments
(list
#:test-flags
#~(list "--pyargs" "gandi.cli")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'embed-store-file-names
(lambda _
(substitute* (list "gandi/cli/modules/cert.py"
"gandi/cli/tests/commands/test_certificate.py")
(("openssl") (which "openssl")))))
(add-after 'install 'install-documentation
;; The included man page may be outdated but we install it anyway,
;; since it's mentioned in 'gandi --help' and better than nothing.
(lambda _
(let* ((man1 (string-append #$output "/share/man/man1")))
(mkdir-p man1)
(with-output-to-file (string-append man1 "/gandi.1")
(lambda _
(invoke "rst2man.py" "gandicli.man.rst")))))))))
(native-inputs
(list python-docutils-0.19
python-pytest
python-pytest-cov
python-setuptools
python-wheel))
(inputs
(list openssl
python-click-7
python-ipy
python-pyyaml
python-requests))
(propagated-inputs
(list openssh))
(home-page "https://cli.gandi.net")
(synopsis "Command-line interface to the Gandi.net Web API")
(description
"This package provides a command-line client (@command{gandi}) to buy,
manage, and delete Internet resources from Gandi.net such as domain names,
virtual machines, and certificates.")
(license license:gpl3+)))
(define-deprecated-package gandi.cli
gandi-cli)
(define-public go-sctp (define-public go-sctp
;; docker-libnetwork-cmd-proxy requires this exact commit. ;; docker-libnetwork-cmd-proxy requires this exact commit.
;; This commit is mentioned in docker-libnetwork-cmd-proxy's vendor.conf. ;; This commit is mentioned in docker-libnetwork-cmd-proxy's vendor.conf.
@@ -3350,7 +3404,7 @@ speedtest.net.")
(define-public librespeed-cli (define-public librespeed-cli
(package (package
(name "librespeed-cli") (name "librespeed-cli")
(version "1.0.13") (version "1.0.12")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
@@ -3359,7 +3413,7 @@ speedtest.net.")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "0zgwdz955vlyy1yricgcbdlbxxh1z08xpbhxa8zs64bsg68mv8j3")))) (base32 "08x09b3j2qvhnwy8lrbfxqh1lbs64wyqlr4jj6m31b5r2zy90dly"))))
(build-system go-build-system) (build-system go-build-system)
(arguments (arguments
(list (list
@@ -3383,7 +3437,6 @@ speedtest.net.")
(list go-github-com-briandowns-spinner (list go-github-com-briandowns-spinner
go-github-com-go-ping-ping go-github-com-go-ping-ping
go-github-com-gocarina-gocsv go-github-com-gocarina-gocsv
go-github-com-prometheus-community-pro-bing
go-github-com-sirupsen-logrus go-github-com-sirupsen-logrus
go-github-com-urfave-cli-v2 go-github-com-urfave-cli-v2
go-golang-org-x-sys)) go-golang-org-x-sys))
+3 -3
View File
@@ -313,7 +313,7 @@ functional, imperative and object-oriented styles of programming.")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://caml.inria.fr/pub/distrib/ocaml-" "http://caml.inria.fr/pub/distrib/ocaml-"
(version-major+minor version) (version-major+minor version)
"/ocaml-" version ".tar.xz")) "/ocaml-" version ".tar.xz"))
(sha256 (sha256
@@ -373,7 +373,7 @@ functional, imperative and object-oriented styles of programming.")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://caml.inria.fr/pub/distrib/ocaml-" "http://caml.inria.fr/pub/distrib/ocaml-"
(version-major+minor version) (version-major+minor version)
"/ocaml-" version ".tar.xz")) "/ocaml-" version ".tar.xz"))
(patches (search-patches (patches (search-patches
@@ -421,7 +421,7 @@ patch-/bin/sh-references: ~a: changing `\"/bin/sh\"' to `~a'~%"
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
"https://caml.inria.fr/pub/distrib/ocaml-" "http://caml.inria.fr/pub/distrib/ocaml-"
(version-major+minor version) (version-major+minor version)
"/ocaml-" version ".tar.xz")) "/ocaml-" version ".tar.xz"))
(sha256 (sha256
+2 -60
View File
@@ -31,7 +31,6 @@
#:use-module (guix build-system cmake) #:use-module (guix build-system cmake)
#:use-module (guix build-system copy) #:use-module (guix build-system copy)
#:use-module (guix build-system gnu) #:use-module (guix build-system gnu)
#:use-module (guix build-system pyproject)
#:use-module (guix build-system qt) #:use-module (guix build-system qt)
#:use-module (gnu packages) #:use-module (gnu packages)
#:use-module (gnu packages autotools) #:use-module (gnu packages autotools)
@@ -47,16 +46,13 @@
#:use-module (gnu packages glib) #:use-module (gnu packages glib)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
#:use-module (gnu packages icu4c) #:use-module (gnu packages icu4c)
#:use-module (gnu packages image)
#:use-module (gnu packages pdf) #:use-module (gnu packages pdf)
#:use-module (gnu packages pkg-config) #:use-module (gnu packages pkg-config)
#:use-module (gnu packages python) #:use-module (gnu packages python)
#:use-module (gnu packages python-build)
#:use-module (gnu packages python-science)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt) #:use-module (gnu packages qt)
#:use-module (gnu packages scanner) #:use-module (gnu packages scanner)
#:use-module (gnu packages xml)) #:use-module (gnu packages xml)
#:use-module (gnu packages image))
(define-public ocrad (define-public ocrad
(package (package
@@ -79,60 +75,6 @@ feature extraction method. It can read images in PBM, PGM or PPM formats and
it produces text in 8-bit or UTF-8 formats.") it produces text in 8-bit or UTF-8 formats.")
(license license:gpl3+))) (license license:gpl3+)))
(define-public python-pytesseract
(package
(name "python-pytesseract")
(version "0.3.13")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/madmaze/pytesseract")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "16arn7ygk7ain5j5ayjcy10y6yhwfcc090i3r8q553m89rr1w0w1"))))
(build-system pyproject-build-system)
(arguments
(list
#:test-flags
#~(map (lambda (name)
(string-append "--deselect=tests/pytesseract_test.py::" name))
;; These tests cannot find generated files
'("test_image_to_pdf_or_hocr[pdf]"
"test_run_and_get_multiple_output[extensions0]"
"test_run_and_get_multiple_output[extensions1]"))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'set-tesseract-path
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "pytesseract/pytesseract.py"
(("tesseract_cmd = 'tesseract'")
(format #f "tesseract_cmd = '~a'"
(search-input-file inputs "/bin/tesseract"))))))
(add-before 'check 'set-tessdata-prefix
(lambda _
(setenv "TESSDATA_PREFIX"
;; needs "fra" language
(string-append #$(this-package-native-input
"tesseract-ocr-tessdata-fast")
"/share/tessdata")))))))
(native-inputs (list python-numpy
python-packaging
python-pandas
python-pytest
python-setuptools
tesseract-ocr
tesseract-ocr-tessdata-fast))
(inputs (list tesseract-ocr))
(propagated-inputs (list python-pandas python-pillow))
(home-page "https://github.com/madmaze/pytesseract")
(synopsis "Python wrapper for Google's Tesseract-OCR")
(description
"This package provides @command{pytesseract} and Python wrapper library
for Google's Tesseract-@acronym{OCR, optical character recognition}.")
(license license:asl2.0)))
(define-public tesseract-ocr-tessdata-fast (define-public tesseract-ocr-tessdata-fast
(package (package
(name "tesseract-ocr-tessdata-fast") (name "tesseract-ocr-tessdata-fast")
+10 -7
View File
@@ -802,7 +802,7 @@ high-performance computing} clusters.")
(define-public toys (define-public toys
(package (package
(name "toys") (name "toys")
(version "0.1.1") (version "0.1.0")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@@ -811,7 +811,7 @@ high-performance computing} clusters.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"05zkvjs3wkwdswl4irkqaxgdassiji5pq8qaqcrzscvp24vkjjja")))) "169jxh5knp5f2y9wbnc454jjdvvyqb5r0ydv3qkpm332vr0cl6p9"))))
(build-system guile-build-system) (build-system guile-build-system)
(arguments (arguments
(list (list
@@ -838,8 +838,11 @@ high-performance computing} clusters.")
(append (list ,@load-compiled-path) (append (list ,@load-compiled-path)
%load-compiled-path)))) %load-compiled-path))))
(substitute* "guix/extensions/toys.scm" (substitute* "guix/extensions/toys.scm"
((";;@load-paths@") (("^\\(define-module \\(guix extensions toys\\)")
(with-output-to-string (lambda () (write search-paths-header))))))) (string-append
(with-output-to-string
(lambda () (write search-paths-header)))
"\n(define-module (guix extensions toys)")))))
(add-after 'set-load-paths-in-entry-point 'register-guix-extension (add-after 'set-load-paths-in-entry-point 'register-guix-extension
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((ext-path (string-append #$output "/share/guix/extensions"))) (let ((ext-path (string-append #$output "/share/guix/extensions")))
@@ -1201,8 +1204,8 @@ transactions from C or Python.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public bffe (define-public bffe
(let ((commit "d6c90f217595674c7910a858edcb735f88d3a14f") (let ((commit "723fd5ea6af1b14c215baf80524c8ff4b21fcc82")
(revision "18")) (revision "17"))
(package (package
(name "bffe") (name "bffe")
(version (git-version "0" revision commit)) (version (git-version "0" revision commit))
@@ -1213,7 +1216,7 @@ transactions from C or Python.")
(commit commit))) (commit commit)))
(sha256 (sha256
(base32 (base32
"0f7i68k6l5ylg8nch54xw4bxn0hayx2ng9j5dvwvai1vi887vmbj")) "1sd62arq80kkfjnynivrp7jh8j359965ank8sglq1wgfdah9k8ii"))
(file-name (string-append name "-" version "-checkout")))) (file-name (string-append name "-" version "-checkout"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
+3 -3
View File
@@ -82,7 +82,7 @@
(define-public parallel (define-public parallel
(package (package
(name "parallel") (name "parallel")
(version "20260422") (version "20260322")
(outputs '("out" "doc")) (outputs '("out" "doc"))
(source (source
(origin (origin
@@ -90,7 +90,7 @@
(uri (string-append "mirror://gnu/parallel/parallel-" (uri (string-append "mirror://gnu/parallel/parallel-"
version ".tar.bz2")) version ".tar.bz2"))
(sha256 (sha256
(base32 "1fq7v60x9jm8mg19qn8n0sfhrygccmw6mncwyjr1g8kfsrjz2k36")) (base32 "1q7g5f13nlwichgh0dk8w5fqjnfnxvwxk6rjy0fd5l7l6blq0ikn"))
(snippet (snippet
'(begin '(begin
(use-modules (guix build utils)) (use-modules (guix build utils))
@@ -734,7 +734,7 @@ single-instruction multiple-data (SIMD) intrinsics.")
(substitute* "src/include/pmix_config.h" (substitute* "src/include/pmix_config.h"
(("#define PMIX_CONFIGURE_CLI .*") (("#define PMIX_CONFIGURE_CLI .*")
"#define PMIX_CONFIGURE_CLI \"[scrubbed]\"\n"))))))) "#define PMIX_CONFIGURE_CLI \"[scrubbed]\"\n")))))))
(inputs (list libevent `(,hwloc "lib") munge zlib)) (inputs (list libevent `(,hwloc "lib") zlib))
(native-inputs (native-inputs
(list autoconf (list autoconf
automake automake
@@ -1,32 +0,0 @@
From 5eed2d2ca7c13c08ca7eb92fc4a78c30ca4b6b3d Mon Sep 17 00:00:00 2001
From: Hellseher <sharlatanus@gmail.com>
Date: Sat, 18 Apr 2026 08:26:29 +0000
Subject: [PATCH] Remove CUDA error handling from network.c
Removed error handling for CUDA compilation check.
Fixes: https://github.com/Deyht/CIANNA/issues/4
---
src/network.c | 9 ---------
1 file changed, 9 deletions(-)
diff --git a/src/network.c b/src/network.c
index d454f64..5a9497c 100644
--- a/src/network.c
+++ b/src/network.c
@@ -155,15 +155,6 @@ CIANNA V-1.0.1.2 stable build (04/2026), by D.Cornu\n\
init_cuda(networks[network_number]);
#endif
- #ifndef CUDA
- if(comp_int == C_CUDA)
- {
- printf("\n ERROR: compute method set to CUDA while CIANNA was not compiled for it.\n");
- printf(" Install Nvidia CUDA and recompile CIANNA with the appropriate option.\n\n");
- exit(EXIT_FAILURE);
- }
- #endif
-
#ifndef BLAS
if(comp_int == C_BLAS)
{
@@ -1,165 +0,0 @@
Ensures that cvc5 is compatible with our version of SymFPU.
Taken from: https://github.com/cvc5/cvc5/commit/2ed457049cf52bd0f21a6332c1be487d82bf5678
diff --git a/cmake/FindSymFPU.cmake b/cmake/FindSymFPU.cmake
index 765ee8d36..05a86e9ee 100644
--- a/cmake/FindSymFPU.cmake
+++ b/cmake/FindSymFPU.cmake
@@ -29,8 +29,8 @@ if(NOT SymFPU_FOUND_SYSTEM)
include(ExternalProject)
include(deps-helper)
- set(SymFPU_COMMIT "e6ac3af9c2c574498ea171c957425b407625448b")
- set(SymFPU_CHECKSUM "823aa663fcc2f6844ae5e9ea83ceda4ed393cdb3dadefce9b3c7c41cd0f4f702")
+ set(SymFPU_COMMIT "227a7246b8ce513b393cc2645d6d65d3490ea1de")
+ set(SymFPU_CHECKSUM "ff22e37dbc133120ada5760878974811737bec65b12a8883f92b1ed9e3f96e99")
ExternalProject_Add(
SymFPU-EP
diff --git a/src/theory/fp/fp_word_blaster.cpp b/src/theory/fp/fp_word_blaster.cpp
index 7f2086c35..3efb0eeed 100644
--- a/src/theory/fp/fp_word_blaster.cpp
+++ b/src/theory/fp/fp_word_blaster.cpp
@@ -119,6 +119,23 @@ CVC5_SYM_ITE_DFN(traits::ubv);
#undef CVC5_SYM_ITE_DFN
+#define CVC5_SYM_ITE_BOOL_DFN(T) \
+ template <> \
+ struct ite<bool, T> \
+ { \
+ static const T iteOp(const bool& cond, const T& l, const T& r) \
+ { \
+ return cond ? l : r; \
+ } \
+ }
+
+CVC5_SYM_ITE_BOOL_DFN(traits::rm);
+CVC5_SYM_ITE_BOOL_DFN(traits::prop);
+CVC5_SYM_ITE_BOOL_DFN(traits::sbv);
+CVC5_SYM_ITE_BOOL_DFN(traits::ubv);
+
+#undef CVC5_SYM_ITE_BOOL_DFN
+
template <>
traits::ubv orderEncode<traits, traits::ubv>(const traits::ubv& b)
{
@@ -564,6 +581,13 @@ symbolicBitVector<isSigned> symbolicBitVector<isSigned>::modularAdd(
return *this + op;
}
+template <bool isSigned>
+symbolicBitVector<isSigned> symbolicBitVector<isSigned>::modularSubtract(
+ const symbolicBitVector<isSigned>& op) const
+{
+ return *this - op;
+}
+
template <bool isSigned>
symbolicBitVector<isSigned> symbolicBitVector<isSigned>::modularNegate() const
{
diff --git a/src/theory/fp/fp_word_blaster.h b/src/theory/fp/fp_word_blaster.h
index 6ce365382..8179ceb32 100644
--- a/src/theory/fp/fp_word_blaster.h
+++ b/src/theory/fp/fp_word_blaster.h
@@ -242,6 +242,8 @@ class symbolicBitVector : public nodeWrapper
symbolicBitVector<isSigned> modularDecrement() const;
symbolicBitVector<isSigned> modularAdd(
const symbolicBitVector<isSigned>& op) const;
+ symbolicBitVector<isSigned> modularSubtract(
+ const symbolicBitVector<isSigned>& op) const;
symbolicBitVector<isSigned> modularNegate() const;
/*** Comparisons ***/
diff --git a/src/util/floatingpoint_literal_symfpu_traits.cpp b/src/util/floatingpoint_literal_symfpu_traits.cpp
index af56c2b87..181069427 100644
--- a/src/util/floatingpoint_literal_symfpu_traits.cpp
+++ b/src/util/floatingpoint_literal_symfpu_traits.cpp
@@ -223,6 +223,13 @@ wrappedBitVector<isSigned> wrappedBitVector<isSigned>::modularAdd(
return *this + op;
}
+template <bool isSigned>
+wrappedBitVector<isSigned> wrappedBitVector<isSigned>::modularSubtract(
+ const wrappedBitVector<isSigned>& op) const
+{
+ return *this - op;
+}
+
template <bool isSigned>
wrappedBitVector<isSigned> wrappedBitVector<isSigned>::modularNegate() const
{
diff --git a/src/util/floatingpoint_literal_symfpu_traits.h b/src/util/floatingpoint_literal_symfpu_traits.h
index 78fc69a18..b49ef3a2a 100644
--- a/src/util/floatingpoint_literal_symfpu_traits.h
+++ b/src/util/floatingpoint_literal_symfpu_traits.h
@@ -199,6 +199,8 @@ class wrappedBitVector : public BitVector
wrappedBitVector<isSigned> modularDecrement() const;
wrappedBitVector<isSigned> modularAdd(
const wrappedBitVector<isSigned>& op) const;
+ wrappedBitVector<isSigned> modularSubtract(
+ const wrappedBitVector<isSigned>& op) const;
wrappedBitVector<isSigned> modularNegate() const;
/** Bit-vector equality. */
diff --git a/test/regress/cli/CMakeLists.txt b/test/regress/cli/CMakeLists.txt
index 915a19e09..35ff58bc7 100644
--- a/test/regress/cli/CMakeLists.txt
+++ b/test/regress/cli/CMakeLists.txt
@@ -949,12 +949,15 @@ set(regress_0_tests
regress0/fp/issue6164.smt2
regress0/fp/issue7002.smt2
regress0/fp/issue7569.smt2
+ regress0/fp/issue9505.smt2
regress0/fp/issue9854.smt2
regress0/fp/issue9858.smt2
regress0/fp/issue9864.smt2
regress0/fp/issue9966.smt2
regress0/fp/issue9972.smt2
regress0/fp/issue9972-2.smt2
+ regress0/fp/issue11139.smt2
+ regress0/fp/issue12335.smt2
regress0/fp/issuepr650.smt2
regress0/fp/proj-issue329-prereg-context.smt2
regress0/fp/proj-issue477-fp-set-comprehension.smt2
diff --git a/test/regress/cli/regress0/fp/issue11139.smt2 b/test/regress/cli/regress0/fp/issue11139.smt2
new file mode 100644
index 000000000..f4c00360e
--- /dev/null
+++ b/test/regress/cli/regress0/fp/issue11139.smt2
@@ -0,0 +1,9 @@
+; COMMAND-LINE: --check-models
+; EXPECT: sat
+(set-logic QF_FP)
+(declare-const FP_VAR_a (_ FloatingPoint 11 53))
+(declare-const FP_VAR_b (_ FloatingPoint 11 53))
+(assert ( = (fp #b0 #b00000000000 #b0000000000000000000000000000000000000000000000000000)
+(fp.div RTN (fp.fma RTP FP_VAR_a FP_VAR_a
+(fp #b0 #b00000000000 #b0000000000000000000000000000000000000000000000000000)) FP_VAR_b)))
+(check-sat)
diff --git a/test/regress/cli/regress0/fp/issue12335.smt2 b/test/regress/cli/regress0/fp/issue12335.smt2
new file mode 100644
index 000000000..bc2580a89
--- /dev/null
+++ b/test/regress/cli/regress0/fp/issue12335.smt2
@@ -0,0 +1,7 @@
+; EXPECT: sat
+(set-logic FP)
+(declare-const x Float32)
+(declare-const a Float32)
+(assert (forall ((V Float32) (A Float32)) (or (not (fp.lt V x)) (not (fp.eq a a)) (not (fp.gt A (fp (_ bv0 1) (_ bv0 8) (_ bv0 23)))) (not (fp.eq (fp.div RNE A V) (fp (_ bv0 1) (_ bv0 8) (_ bv0 23)))))))
+(assert (fp.geq a (fp (_ bv0 1) (_ bv0 8) (_ bv0 23))))
+(check-sat)
diff --git a/test/regress/cli/regress0/fp/issue9505.smt2 b/test/regress/cli/regress0/fp/issue9505.smt2
new file mode 100644
index 000000000..05674b8ff
--- /dev/null
+++ b/test/regress/cli/regress0/fp/issue9505.smt2
@@ -0,0 +1,6 @@
+; COMMAND-LINE: --fp-exp
+; EXPECT: sat
+(set-logic QF_FP)
+(declare-fun m () (_ FloatingPoint 4 12))
+(assert (fp.eq (fp (_ bv0 1) (_ bv0 8) (_ bv0 23)) ((_ to_fp 8 24) roundNearestTiesToEven (fp.rem m (fp (_ bv0 1) (_ bv9 4) (_ bv1536 11))))))
+(check-sat)
@@ -1,32 +0,0 @@
From 158304fb31177304d41fe495f8c1cca1fb5cff70 Mon Sep 17 00:00:00 2001
From: xenodium <8107219+xenodium@users.noreply.github.com>
Date: Wed, 25 Mar 2026 12:37:17 +0000
Subject: [PATCH] Fixing test
---
tests/agent-shell-tests.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/tests/agent-shell-tests.el b/tests/agent-shell-tests.el
index f602912d..9263e051 100644
--- a/tests/agent-shell-tests.el
+++ b/tests/agent-shell-tests.el
@@ -1233,14 +1233,16 @@ code block content
test-buffer))
((symbol-function 'shell-maker--process) (lambda () fake-process))
((symbol-function 'shell-maker-finish-output) #'ignore)
+ ((symbol-function 'agent-shell--handle) #'ignore)
(agent-shell-file-completion-enabled nil))
(let* ((shell-buffer (agent-shell--start :config config
:no-focus t
:new-session t))
(subs (map-elt (buffer-local-value 'agent-shell--state shell-buffer)
:event-subscriptions)))
- (should (= 1 (length subs)))
- (should (eq 'turn-complete (map-elt (car subs) :event))))))
+ (should (seq-find (lambda (sub)
+ (eq 'turn-complete (map-elt sub :event)))
+ subs)))))
(remove-hook 'agent-shell-mode-hook hook-fn)
(when (process-live-p fake-process)
(delete-process fake-process))
@@ -0,0 +1,92 @@
From 8d651d7247c4e8cf07ba805712cdb09e8095dd89 Mon Sep 17 00:00:00 2001
Message-ID: <8d651d7247c4e8cf07ba805712cdb09e8095dd89.1773006315.git.dannym@friendly-machines.com>
From: Danny Milosavljevic <dannym@friendly-machines.com>
Date: Sun, 8 Mar 2026 21:44:05 +0000
Subject: [PATCH] Scope native-comp trampoline disabling to spy-on only
See: <https://github.com/jorgenschaefer/emacs-buttercup/pull/257>
buttercup-with-cleanup disabled native-comp-enable-subr-trampolines
for the entire spec execution. This was a workaround for Emacs
bug#61880, where trampoline compilation fails when spy-on redefines
primitives that the trampoline compiler itself depends on (e.g.
file-exists-p).
However, disabling trampolines globally has the side effect that fset
overrides of C primitives become invisible to natively compiled code.
This breaks shut-up's message override when called indirectly through
native-compiled functions like display-message-or-buffer (from
simple.eln), because without a trampoline, the native code calls the C
primitive directly, bypassing the fset'd function.
Move the trampoline disabling from buttercup-with-cleanup into
buttercup--spy-on-and-call-replacement, scoping it to just the fset
call that installs the spy. This avoids the trampoline compilation
issue while allowing other fset overrides (e.g. from shut-up or
cl-letf) to work correctly with native-compiled callers.
---
buttercup.el | 34 +++++++++++++++++-----------------
1 file changed, 17 insertions(+), 17 deletions(-)
diff --git a/buttercup.el b/buttercup.el
index 07e003f..417786d 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -1293,12 +1293,23 @@ responsibility to ensure ARG is a command."
(error "Spies can only be created in `before-each' or `it'"))))
+(defvar native-comp-enable-subr-trampolines)
+(defvar comp-enable-subr-trampolines)
+
(defun buttercup--spy-on-and-call-replacement (spy fun)
"Replace the function in symbol SPY with a spy calling FUN."
(let ((orig-function (and (fboundp spy) (symbol-function spy))))
(when (buttercup--add-cleanup (lambda ()
(fset spy orig-function)))
- (fset spy (buttercup--make-spy fun)))))
+ ;; Disable subr trampoline generation around the fset call.
+ ;; Redefining certain primitives causes trampoline compilation
+ ;; to fail because the trampoline compiler itself depends on
+ ;; primitives that may have just been redefined.
+ ;; See <https://github.com/jorgenschaefer/emacs-buttercup/issues/230>
+ ;; and <https://debbugs.gnu.org/61880>.
+ (let ((native-comp-enable-subr-trampolines nil)
+ (comp-enable-subr-trampolines nil))
+ (fset spy (buttercup--make-spy fun))))))
(defun buttercup--make-spy (fun)
"Create a new spy function wrapping FUN and tracking every call to itself."
@@ -1343,24 +1354,13 @@ responsibility to ensure ARG is a command."
Should always be set to a value that is not `listp', except while
in a `buttercup-with-cleanup' environment.")
-(defvar native-comp-enable-subr-trampolines)
-(defvar comp-enable-subr-trampolines)
-
(defmacro buttercup-with-cleanup (&rest body)
"Execute BODY, cleaning spys and the rest afterwards."
- `(,@(if (fboundp 'with-suppressed-warnings)
- '(with-suppressed-warnings ((obsolete comp-enable-subr-trampolines)))
- '(progn))
- (let ((buttercup--cleanup-functions nil)
- ;; Redefining certain primitive's trampolines will cause problems,
- ;; see https://github.com/jorgenschaefer/emacs-buttercup/issues/230 and
- ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=61880
- (comp-enable-subr-trampolines nil)
- (native-comp-enable-subr-trampolines nil))
- (unwind-protect (progn ,@body)
- (dolist (fun buttercup--cleanup-functions)
- (ignore-errors
- (funcall fun)))))))
+ `(let ((buttercup--cleanup-functions nil))
+ (unwind-protect (progn ,@body)
+ (dolist (fun buttercup--cleanup-functions)
+ (ignore-errors
+ (funcall fun))))))
(defun buttercup--add-cleanup (function)
"Register FUNCTION for cleanup in `buttercup-with-cleanup'."
base-commit: cc5a2ab7c7f18aaaf525fac61fe59bae5ad018dd
--
2.52.0
@@ -1,3 +1,6 @@
Pretend that stat's mtime is broken, so that the fontconfig cache does not
depend upon modification time to determine if a cache is stale.
diff --git a/src/fcstat.c b/src/fcstat.c diff --git a/src/fcstat.c b/src/fcstat.c
index 9b54e2b4..76d7780e 100644 index 9b54e2b4..76d7780e 100644
--- a/src/fcstat.c --- a/src/fcstat.c
@@ -7,6 +10,6 @@ index 9b54e2b4..76d7780e 100644
FcIsFsMtimeBroken (const FcChar8 *dir) FcIsFsMtimeBroken (const FcChar8 *dir)
{ {
+ return FcTrue; + return FcTrue;
int fd = FcOpen ((const char *)dir, O_RDONLY); int fd = FcOpen ((const char *) dir, O_RDONLY);
if (fd != -1) { if (fd != -1)

Some files were not shown because too many files have changed in this diff Show More