amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge branch 'master' into mesa-updates

Browse source 
Change-Id: I46ca25bea98d25150877421c6d5161752afabb25
This commit is contained in:
John Kehayias 2024-01-04 00:03:40 -05:00
commit ef4e4c9a2c
No known key found for this signature in database
GPG key ID: 499097AE5EA815D9
71 changed files with 40670 additions and 35858 deletions
Download patch file Download diff file Expand all files Collapse all files

2
doc/contributing.texi
View file

@ -457,7 +457,7 @@ configuration file:
(group-n 3 (one-or-more digit))
line-end))
;; Reduce the number of prompts with 'M-x debbugs-gnu'.
;; Change the default when run as 'M-x debbugs-gnu'.
(setq debbugs-gnu-default-packages '("guix" "guix-patches"))
;; Show feature requests.

236
doc/guix-cookbook.texi
View file

@ -77,6 +77,7 @@ manual}).
* Packaging:: Packaging tutorials
* System Configuration:: Customizing the GNU System
* Containers:: Isolated environments and nested systems
* Virtual Machines:: Virtual machines usage and configuration
* Advanced package management:: Power to the users!
* Software Development:: Environments, continuous integration, etc.
* Environment management:: Control environment
@ -155,6 +156,11 @@ Guix System Containers
* A Database Container::
* Container Networking::
Virtual Machines
* Network bridge for QEMU::
* Routed network for libvirt::
Advanced package management
* Guix Profiles in Practice:: Strategies for multiple profiles and manifests.
@ -3702,6 +3708,236 @@ sudo ip netns del $ns
sudo ip link del $host
@end example
@c *********************************************************************
@node Virtual Machines
@chapter Virtual Machines
Guix can produce disk images (@pxref{Invoking guix system,,, guix, GNU
Guix Reference Manual}) that can be used with virtual machines solutions
such as virt-manager, GNOME Boxes or the more bare QEMU, among others.
This chapter aims to provide hands-on, practical examples that relates
to the usage and configuration of virtual machines on a Guix System.
@menu
* Network bridge for QEMU::
* Routed network for libvirt::
@end menu
@node Network bridge for QEMU
@section Network bridge for QEMU
@cindex Network bridge interface
@cindex networking, bridge
@cindex qemu, network bridge
By default, QEMU uses a so-called ``user mode'' host network back-end,
which is convenient as it does not require any configuration.
Unfortunately, it is also quite limited. In this mode, the guest
@abbr{VM, virtual machine} can access the network the same way the host
would, but it cannot be reached from the host. Additionally, since the
QEMU user networking mode relies on ICMP, ICMP-based networking tools
such as @command{ping} do @emph{not} work in this mode. Thus, it is
often desirable to configure a network bridge, which enables the guest
to fully participate in the network. This is necessary, for example,
when the guest is to be used as a server.
@subsection Creating a network bridge interface
There are many ways to create a network bridge. The following command
shows how to use NetworkManager and its @command{nmcli} command line
interface (CLI) tool, which should already be available if your
operating system declaration is based on one of the desktop templates:
@example sh
# nmcli con add type bridge con-name br0 ifname br0
@end example
To have this bridge be part of your network, you must associate your
network bridge with the Ethernet interface used to connect with the
network. Assuming your interface is named @samp{enp2s0}, the following
command can be used to do so:
@example sh
# nmcli con add type bridge-slave ifname enp2s0 master br0
@end example
@quotation Important
Only Ethernet interfaces can be added to a bridge. For wireless
interfaces, consider the routed network approach detailed in
@xref{Routed network for libvirt}.
@end quotation
By default, the network bridge will allow your guests to obtain their IP
address via DHCP, if available on your local network. For simplicity,
this is what we will use here. To easily find the guests, they can be
configured to advertise their host names via mDNS.
@subsection Configuring the QEMU bridge helper script
QEMU comes with a helper program to conveniently make use of a network
bridge interface as an unprivileged user @pxref{Network options,,, QEMU,
QEMU Documentation}. The binary must be made setuid root for proper
operation; this can be achieved by adding it to the
@code{setuid-programs} field of your (host) @code{operating-system}
definition, as shown below:
@example lisp
(setuid-programs
(cons (file-append qemu "/libexec/qemu-bridge-helper")
%setuid-programs))
@end example
The file @file{/etc/qemu/bridge.conf} must also be made to allow the
bridge interface, as the default is to deny all. Add the following to
your list of services to do so:
@example lisp
(extra-special-file "/etc/qemu/host.conf" "allow br0\n")
@end example
@subsection Invoking QEMU with the right command line options
When invoking QEMU, the following options should be provided so that the
network bridge is used, after having selected a unique MAC address for
the guest.
@quotation Important
By default, a single MAC address is used for all guests, unless
provided. Failing to provided different MAC addresses to each virtual
machine making use of the bridge would cause networking issues.
@end quotation
@example sh
$ qemu-system-x86_64 [...] \
-device virtio-net-pci,netdev=user0,mac=XX:XX:XX:XX:XX:XX \
-netdev bridge,id=user0,br=br0 \
[...]
@end example
To generate MAC addresses that have the QEMU registered prefix, the
following snippet can be employed:
@example sh
mac_address="52:54:00:$(dd if=/dev/urandom bs=512 count=1 2>/dev/null \
| md5sum \
| sed -E 's/^(..)(..)(..).*$/\1:\2:\3/')"
echo $mac_address
@end example
@subsection Networking issues caused by Docker
If you use Docker on your machine, you may experience connectivity
issues when attempting to use a network bridge, which are caused by
Docker also relying on network bridges and configuring its own routing
rules. The solution is add the following @code{iptables} snippet to
your @code{operating-system} declaration:
@example lisp
(service iptables-service-type
(iptables-configuration
(ipv4-rules (plain-file "iptables.rules" "\
*filter
:INPUT ACCEPT [0:0]
:FORWARD DROP [0:0]
:OUTPUT ACCEPT [0:0]
-A FORWARD -i br0 -o br0 -j ACCEPT
COMMIT
"))
@end example
@node Routed network for libvirt
@section Routed network for libvirt
@cindex Virtual network bridge interface
@cindex networking, virtual bridge
@cindex libvirt, virtual network bridge
If the machine hosting your virtual machines is connected wirelessly to
the network, you won't be able to use a true network bridge as explained
in the preceding section (@pxref{Network bridge for QEMU}). In this
case, the next best option is to use a @emph{virtual} bridge with static
routing and to configure a libvirt-powered virtual machine to use it
(via the @command{virt-manager} GUI for example). This is similar to
the default mode of operation of QEMU/libvirt, except that instead of
using @abbr{NAT, Network Address Translation}, it relies on static
routes to join the @abbr{VM, virtual machine} IP address to the
@abbr{LAN, local area network}. This provides two-way connectivity to
and from the virtual machine, which is needed for exposing services
hosted on the virtual machine.
@subsection Creating a virtual network bridge
A virtual network bridge consists of a few components/configurations,
such as a @abbr{TUN, network tunnel} interface, DHCP server (dnsmasq)
and firewall rules (iptables). The @command{virsh} command, provided by
the @code{libvirt} package, makes it very easy to create a virtual
bridge. You first need to choose a network subnet for your virtual
bridge; if your home LAN is in the @samp{192.168.1.0/24} network, you
could opt to use e.g.@: @samp{192.168.2.0/24}. Define an XML file,
e.g.@: @file{/tmp/virbr0.xml}, containing the following:
@example
<network>
<name>virbr0</name>
<bridge name="virbr0" />
<forward mode="route"/>
<ip address="192.168.2.0" netmask="255.255.255.0">
<dhcp>
<range start="192.168.2.1" end="192.168.2.254"/>
</dhcp>
</ip>
</network>
@end example
Then create and configure the interface using the @command{virsh}
command, as root:
@example
virsh net-define /tmp/virbr0.xml
virsh net-autostart virbr0
virsh net-start virbr0
@end example
The @samp{virbr0} interface should now be visible e.g.@: via the
@samp{ip address} command. It will be automatically started every time
your libvirt virtual machine is started.
@subsection Configuring the static routes for your virtual bridge
If you configured your virtual machine to use your newly created
@samp{virbr0} virtual bridge interface, it should already receive an IP
via DHCP such as @samp{192.168.2.15} and be reachable from the server
hosting it, e.g.@: via @samp{ping 192.168.2.15}. There's one last
configuration needed so that the VM can reach the external network:
adding static routes to the network's router.
In this example, the LAN network is @samp{192.168.1.0/24} and the router
configuration web page may be accessible via e.g.@: the
@url{http://192.168.1.1} page. On a router running the
@url{https://librecmc.org/, libreCMC} firmware, you would navigate to
the @clicksequence{Network @click{} Static Routes} page
(@url{https://192.168.1.1/cgi-bin/luci/admin/network/routes}), and you
would add a new entry to the @samp{Static IPv4 Routes} with the
following information:
@table @samp
@item Interface
lan
@item Target
192.168.2.0
@item IPv4-Netmask
255.255.255.0
@item IPv4-Gateway
@var{server-ip}
@item Route type
unicast
@end table
where @var{server-ip} is the IP address of the machine hosting the VMs,
which should be static.
After saving/applying this new static route, external connectivity
should work from within your VM; you can e.g.@: run @samp{ping gnu.org}
to verify that it functions correctly.
@c *********************************************************************
@node Advanced package management

18
doc/guix.texi
View file

@ -35174,17 +35174,24 @@ services.
@subsubheading Libvirt daemon
@code{libvirtd} is the server side daemon component of the libvirt
virtualization management system. This daemon runs on host servers
and performs required management tasks for virtualized guests.
virtualization management system. This daemon runs on host servers and
performs required management tasks for virtualized guests. To connect
to the libvirt daemon as an unprivileged user, it must be added to the
@samp{libvirt} group, as shown in the example below.
@defvar libvirt-service-type
This is the type of the @uref{https://libvirt.org, libvirt daemon}.
Its value must be a @code{libvirt-configuration}.
@lisp
(users (cons (user-account
(name "user")
(group "users")
(supplementary-groups '("libvirt"
"audio" "video" "wheel")))
%base-user-accounts))
(service libvirt-service-type
(libvirt-configuration
(unix-sock-group "libvirt")
(tls-port "16555")))
@end lisp
@end defvar
@ -35266,7 +35273,7 @@ UNIX domain socket group ownership. This can be used to allow a
'trusted' set of users access to management capabilities without
becoming root.
Defaults to @samp{"root"}.
Defaults to @samp{"libvirt"}.
@end deftypevr
@ -39704,6 +39711,9 @@ This must be a list of strings where each string has the form
"TMPDIR=/tmp/dockerd")
@end lisp
@item @code{config-file} (type: maybe-file-like)
JSON configuration file pass to @command{dockerd}.
@end table
@end deftp

6
gnu/local.mk
View file

@ -306,6 +306,7 @@ GNU_SYSTEM_MODULES = \
%D%/packages/gobby.scm \
%D%/packages/golang.scm \
%D%/packages/golang-check.scm \
%D%/packages/golang-web.scm \
%D%/packages/gperf.scm \
%D%/packages/gpodder.scm \
%D%/packages/gps.scm \
@ -1114,7 +1115,6 @@ dist_patch_DATA = \
%D%/packages/patches/emacs-git-email-missing-parens.patch \
%D%/packages/patches/emacs-fix-scheme-indent-function.patch \
%D%/packages/patches/emacs-json-reformat-fix-tests.patch \
%D%/packages/patches/emacs-haskell-mode-no-redefine-builtin.patch \
%D%/packages/patches/emacs-helpful-fix-tests.patch \
%D%/packages/patches/emacs-highlight-stages-add-gexp.patch \
%D%/packages/patches/emacs-lispy-fix-thread-last-test.patch \
@ -1720,6 +1720,7 @@ dist_patch_DATA = \
%D%/packages/patches/online-judge-tools.patch \
%D%/packages/patches/onnx-optimizer-system-library.patch \
%D%/packages/patches/onnx-use-system-googletest.patch \
%D%/packages/patches/onnx-1.13.1-use-system-googletest.patch \
%D%/packages/patches/onnx-shared-libraries.patch \
%D%/packages/patches/onnx-skip-model-downloads.patch \
%D%/packages/patches/openbios-aarch64-riscv64-support.patch \
@ -1776,6 +1777,7 @@ dist_patch_DATA = \
%D%/packages/patches/python-random2-getrandbits-test.patch \
%D%/packages/patches/python-poppler-qt5-fix-build.patch \
%D%/packages/patches/python-pypdf-annotate-tests-appropriately.patch \
%D%/packages/patches/python-pytorch2-system-libraries.patch \
%D%/packages/patches/python-sip-include-dirs.patch \
%D%/packages/patches/python-sgmllib3k-assertions.patch \
%D%/packages/patches/python-sphinx-prompt-docutils-0.19.patch \
@ -2059,6 +2061,7 @@ dist_patch_DATA = \
%D%/packages/patches/tofi-32bit-compat.patch \
%D%/packages/patches/tpetra-remove-duplicate-using.patch \
%D%/packages/patches/transcode-ffmpeg.patch \
%D%/packages/patches/transmission-4.0.5-fix-build.patch \
%D%/packages/patches/trytond-add-egg-modules-to-path.patch \
%D%/packages/patches/trytond-add-guix_trytond_path.patch \
%D%/packages/patches/ttf2eot-cstddef.patch \
@ -2160,6 +2163,7 @@ dist_patch_DATA = \
%D%/packages/patches/xgboost-use-system-dmlc-core.patch \
%D%/packages/patches/xmonad-dynamic-linking.patch \
%D%/packages/patches/xnnpack-system-libraries.patch \
%D%/packages/patches/xnnpack-for-torch2-system-libraries.patch \
%D%/packages/patches/xplanet-1.3.1-cxx11-eof.patch \
%D%/packages/patches/xplanet-1.3.1-libdisplay_DisplayOutput.cpp.patch \
%D%/packages/patches/xplanet-1.3.1-libimage_gif.c.patch \

1
gnu/packages/backup.scm
View file

@ -71,6 +71,7 @@
#:use-module (gnu packages glib)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages gperf)
#:use-module (gnu packages gtk)
#:use-module (gnu packages guile)

136
gnu/packages/bioconductor.scm
View file

@ -7462,6 +7462,37 @@ chromosome region or transcript models of lincRNA genes.")
;; No version specified
(license license:lgpl3+)))
(define-public r-epidish
(package
(name "r-epidish")
(version "2.18.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "EpiDISH" version))
(sha256
(base32 "170ym3y6gd1kxghz2g5ynvgi1wrxx87b568cjcvzidpqkrkg87s6"))))
(properties `((upstream-name . "EpiDISH")))
(build-system r-build-system)
(propagated-inputs (list r-e1071
r-locfdr
r-mass
r-matrix
r-matrixstats
r-quadprog
r-stringr))
(native-inputs (list r-knitr))
(home-page "https://github.com/sjczheng/EpiDISH")
(synopsis "Epigenetic dissection of intra-sample-heterogeneity")
(description
"@code{EpiDISH} is a R package to infer the proportions of a priori known
cell-types present in a sample representing a mixture of such cell-types.
Right now, the package can be used on DNAm data of whole blood, generic
epithelial tissue and breast tissue. Besides, the package provides a function
that allows the identification of differentially methylated cell-types and
their directionality of change in Epigenome-Wide Association Studies.")
(license license:gpl2)))
(define-public r-fastseg
(package
(name "r-fastseg")
@ -7611,13 +7642,13 @@ genomic intervals. In addition, it can use BAM or BigWig files as input.")
(define-public r-genomeinfodb
(package
(name "r-genomeinfodb")
(version "1.38.2")
(version "1.38.5")
(source (origin
(method url-fetch)
(uri (bioconductor-uri "GenomeInfoDb" version))
(sha256
(base32
"07xncxak8yjy04m7zh779jfjbsdmdbk8a5xs4rbajx4zp3hm4wb7"))))
"17w5zrvpk2x0sc55xfkbn9krphg4aszmvwmj1qfsf1bdrazfpwic"))))
(properties
`((upstream-name . "GenomeInfoDb")))
(build-system r-build-system)
@ -10314,6 +10345,49 @@ includes methods formerly found in the scran package, and the new fast and
comprehensive scDblFinder method.")
(license license:gpl3)))
;; This is a CRAN package, but it depends on packages from Bioconductor.
(define-public r-scgate
(package
(name "r-scgate")
(version "1.6.0")
(source
(origin
(method url-fetch)
(uri (cran-uri "scGate" version))
(sha256
(base32 "0h12d36zjc6fvxbhkxrzbpvw49z9fgyn1jc941q70ajw1yqi2hhh"))))
(properties `((upstream-name . "scGate")))
(build-system r-build-system)
(propagated-inputs
(list r-biocparallel
r-dplyr
r-ggplot2
r-ggridges
r-patchwork
r-reshape2
r-seurat
r-ucell))
(native-inputs (list r-knitr))
(home-page "https://github.com/carmonalab/scGate")
(synopsis
"Marker-based cell type purification for single-cell sequencing data")
(description
"This package provides a method to purify a cell type or cell population
of interest from heterogeneous datasets. scGate package automatizes
marker-based purification of specific cell populations, without requiring
training data or reference gene expression profiles. scGate takes as input a
gene expression matrix stored in a Seurat object and a @acronym{GM, gating
model}, consisting of a set of marker genes that define the cell population of
interest. It evaluates the strength of signature marker expression in each
cell using the rank-based method UCell, and then performs @acronym{kNN,
k-nearest neighbor} smoothing by calculating the mean UCell score across
neighboring cells. kNN-smoothing aims at compensating for the large degree of
sparsity in scRNAseq data. Finally, a universal threshold over kNN-smoothed
signature scores is applied in binary decision trees generated from the
user-provided gating model, to annotate cells as either “pure” or “impure”,
with respect to the cell population of interest.")
(license license:gpl3)))
;; This is a CRAN package, but it depends on packages from Bioconductor.
(define-public r-scistreer
(package
@ -10793,6 +10867,44 @@ identifier translation via the GDC API.")
"This package implements widgets to provide user interfaces.")
(license license:artistic2.0)))
(define-public r-toast
(package
(name "r-toast")
(version "1.16.0")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "TOAST" version))
(sha256
(base32 "00wpgs2zdrgrh9xmp6m5h9xgv85mhdi36qvwg9gwbz9i7cfabmy1"))))
(properties `((upstream-name . "TOAST")))
(build-system r-build-system)
(propagated-inputs (list r-corpcor
r-doparallel
r-epidish
r-ggally
r-ggplot2
r-limma
r-nnls
r-quadprog
r-summarizedexperiment
r-tidyr))
(native-inputs (list r-knitr))
(home-page "https://bioconductor.org/packages/TOAST")
(synopsis "Tools for the analysis of heterogeneous tissues")
(description
"This package is devoted to analyzing high-throughput data (e.g. gene
expression microarray, DNA methylation microarray, RNA-seq) from complex
tissues. Current functionalities include
@enumerate
@item detect cell-type specific or cross-cell type differential signals
@item tree-based differential analysis
@item improve variable selection in reference-free deconvolution
@item partial reference-free deconvolution with prior knowledge.
@end enumerate")
(license license:gpl2)))
;; TODO: check javascript
(define-public r-trackviewer
(package
@ -13085,14 +13197,14 @@ samples.")
(define-public r-biocneighbors
(package
(name "r-biocneighbors")
(version "1.20.0")
(version "1.20.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "BiocNeighbors" version))
(sha256
(base32
"0a5wg099fgwjbzd6r3mr4l02rcmjqlkdcz1w97qzwx1mir41fmas"))))
"0w7hd6w0lmj1jaaq9zd5gwnnpkzcr0byqm5q584wjg4xgvsb981j"))))
(properties `((upstream-name . "BiocNeighbors")))
(build-system r-build-system)
(propagated-inputs
@ -13242,14 +13354,14 @@ data.")
(define-public r-metapod
(package
(name "r-metapod")
(version "1.10.0")
(version "1.10.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "metapod" version))
(sha256
(base32
"1nhxwj6gwc3hqji7icp1q6n0hj1gnvv1y5zhd2myhm7kj3sic2qc"))))
"05cy3xvj78n2p9l2pxfys7aczr51gm2ywprn4qmzr7ppb6rq5f66"))))
(properties `((upstream-name . "metapod")))
(build-system r-build-system)
(propagated-inputs
@ -13728,14 +13840,14 @@ multiplication and calculation of row/column sums or means.")
(define-public r-batchelor
(package
(name "r-batchelor")
(version "1.18.0")
(version "1.18.1")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "batchelor" version))
(sha256
(base32
"1d5zik3bhz26ky2kpxd9kdzs9ff696qqys5gl8qwmmp8qym520l2"))))
"1z4ddkdd3mzqg0c6l94qmrdwrm7427k5xiwzgkzx43gh1j4911d5"))))
(properties `((upstream-name . "batchelor")))
(build-system r-build-system)
(propagated-inputs
@ -15821,14 +15933,14 @@ type and symbol colors.")
(define-public r-genomicscores
(package
(name "r-genomicscores")
(version "2.14.2")
(version "2.14.3")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "GenomicScores" version))
(sha256
(base32
"1wjq6lb2x7vazlr838hlh1ar5pis2bgzya9lm8ki30d1m0hpk66k"))))
"0rhyfbm5whz4jygar9cqcrfy92h1lyam5wd8d9svhh80f15v53m9"))))
(properties `((upstream-name . "GenomicScores")))
(build-system r-build-system)
(propagated-inputs
@ -21332,13 +21444,13 @@ variable and significantly correlated genes.")
(define-public r-sparsearray
(package
(name "r-sparsearray")
(version "1.2.2")
(version "1.2.3")
(source
(origin
(method url-fetch)
(uri (bioconductor-uri "SparseArray" version))
(sha256
(base32 "1kjs3v2ycpcc0plr88af1661ngmclmalkiy6am7i4m75cpa3889p"))))
(base32 "19cy1nmmi65fxh012ymgp1kg112yl1m0khcs4y034p5iwlfv7fp6"))))
(properties `((upstream-name . "SparseArray")))
(build-system r-build-system)
(propagated-inputs (list r-biocgenerics

232
gnu/packages/bioinformatics.scm
View file

@ -617,6 +617,50 @@ Compared to cellSNP, this package is more efficient with higher speed and less
memory usage.")
(license license:asl2.0))))
(define-public cpat
(package
(name "cpat")
(version "3.0.4")
(source (origin
(method url-fetch)
(uri (pypi-uri "CPAT" version))
(sha256
(base32
"0dfrwwbhv1n4nh2a903d1qfb30fgxgya89sa70aci3wzf8h2z0vd"))
(modules '((guix build utils)))
(snippet
'(for-each delete-file-recursively
(list ".eggs"
"lib/__pycache__/"
"lib/cpmodule/__pycache__/")))))
(build-system pyproject-build-system)
(arguments
(list
#:phases
'(modify-phases %standard-phases
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(with-directory-excursion "test"
;; There is no test4.fa
(substitute* "test.sh"
((".*-g test4.fa.*") ""))
(invoke "bash" "test.sh"))))))))
(propagated-inputs
(list python-numpy python-pysam))
(inputs
(list r-minimal))
(home-page "https://wlcb.oit.uci.edu/cpat/")
(synopsis "Alignment-free distinction between coding and noncoding RNA")
(description
"CPAT is a method to distinguish coding and noncoding RNA by using a
logistic regression model based on four pure sequence-based, linguistic
features: ORF size, ORF coverage, Ficket TESTCODE, and Hexamer usage bias.
Linguistic features based method does not require other genomes or protein
databases to perform alignment and is more robust. Because it is
alignment-free, it runs much faster and also easier to use.")
(license license:gpl2+)))
(define-public pbcopper
(package
(name "pbcopper")
@ -1070,6 +1114,42 @@ of single-cell data using Seurat, RcppML nmf, SingleCellExperiments and
similar.")
(license license:gpl2+))))
(define-public r-stacas
(package
(name "r-stacas")
(version "2.2.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/carmonalab/STACAS")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "13i0h5i6vlbrb8ndq9gr81560z9d74b2c7m3rjfzls01irjza9hm"))))
(properties `((upstream-name . "STACAS")))
(build-system r-build-system)
(propagated-inputs
(list r-biocneighbors
r-biocparallel
r-ggplot2
r-ggridges
r-pbapply
r-r-utils
r-seurat))
(home-page "https://github.com/carmonalab/STACAS")
(synopsis "Sub-type anchoring correction for alignment in Seurat")
(description
"This package implements methods for batch correction and integration of
scRNA-seq datasets, based on the Seurat anchor-based integration framework.
In particular, STACAS is optimized for the integration of heterogenous
datasets with only limited overlap between cell sub-types (e.g. TIL sets of
CD8 from tumor with CD8/CD4 T cells from lymphnode), for which the default
Seurat alignment methods would tend to over-correct biological differences.
The 2.0 version of the package allows the users to incorporate explicit
information about cell-types in order to assist the integration process.")
(license license:gpl3)))
(define-public r-stringendo
(let ((commit "15594b1bba11048a812874bafec0eea1dcc8618a")
(revision "1"))
@ -1156,6 +1236,32 @@ shape. This package provides an @code{htmlwidget} for building streamgraph
visualizations.")
(license license:expat))))
(define-public r-wasabi
(let ((commit "8c33cabde8d18c2657cd6e38e7cb834f87cf9846")
(revision "1"))
(package
(name "r-wasabi")
(version (git-version "1.0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/COMBINE-lab/wasabi")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0rpdj6n4cnx8n2zl60dzgl638474sg49dknwi9x3qb4g56dpphfa"))))
(properties `((upstream-name . "wasabi")))
(build-system r-build-system)
(propagated-inputs (list r-data-table r-rhdf5 r-rjson))
(home-page "https://github.com/COMBINE-lab/wasabi")
(synopsis "Use Sailfish and Salmon with Sleuth")
(description
"This package converts the output of the Sailfish and Salmon RNA-seq
quantification tools so that it can be used with the Sleuth differential
analysis package.")
(license license:bsd-3))))
(define-public pbbam
(package
(name "pbbam")
@ -10313,6 +10419,51 @@ data. This package includes panel editing or renaming for FCS files,
bead-based normalization and debarcoding.")
(license license:gpl3))))
(define-public r-projectils
(let ((commit "cc73b97471b4b6eea11ce779b5c4a7dc5c3e1709")
(revision "1"))
(package
(name "r-projectils")
(version (git-version "3.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/carmonalab/ProjecTILs")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0dpzvbhhb9andnj7angpj32cgkwd6rs6qgpl6i21pqzcn6vqqhqw"))))
(properties `((upstream-name . "ProjecTILs")))
(build-system r-build-system)
(propagated-inputs
(list r-biocneighbors
r-biocparallel
r-dplyr
r-ggplot2
r-matrix
r-patchwork
r-pheatmap
r-pracma
r-purrr
r-rcolorbrewer
r-reshape2
r-scales
r-scgate
r-seurat
r-seuratobject
r-stacas
r-ucell
r-umap
r-uwot))
(home-page "https://github.com/carmonalab/ProjecTILs")
(synopsis "Reference-based analysis of scRNA-seq data")
(description
"This package implements methods to project single-cell RNA-seq data
onto a reference atlas, enabling interpretation of unknown cell transcriptomic
states in the the context of known, reference states.")
(license license:gpl3))))
(define-public r-presto
(let ((commit "052085db9c88aa70a28d11cc58ebc807999bf0ad")
(revision "0"))
@ -10527,6 +10678,43 @@ analysis of cell types, subtypes, transcriptional gradients,cell-cycle
variation, gene modules and their regulatory models and more.")
(license license:expat))))
(define-public r-sleuth
(package
(name "r-sleuth")
(version "0.30.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/pachterlab/sleuth")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "09xgc7r6iisjkk0c0wn0q56zy0aph386kphwixfzq4422y7vlqci"))))
(properties `((upstream-name . "sleuth")))
(build-system r-build-system)
(propagated-inputs (list r-aggregation
r-data-table
r-dplyr
r-ggplot2
r-lazyeval
r-matrixstats
r-pheatmap
r-reshape2
r-rhdf5
r-shiny
r-tidyr))
(native-inputs (list r-knitr))
(home-page "https://github.com/pachterlab/sleuth")
(synopsis "Tools for investigating RNA-Seq")
(description
"Sleuth is a program for differential analysis of RNA-Seq data.
It makes use of quantification uncertainty estimates obtained via Kallisto for
accurate differential analysis of isoforms or genes, allows testing in the
context of experiments with complex designs, and supports interactive
exploratory data analysis via sleuth live.")
(license license:gpl3)))
(define-public r-snapatac
(package
(name "r-snapatac")
@ -17996,12 +18184,40 @@ The tool enables the de novo search for new structural elements and
facilitates comparative analysis of known RNA families.")
(license license:bsd-3)))
(define-public r-databaselinke-r
(let ((commit "cf3d6cc3d36f2e1c9a557390232e9a8ed5abb7fd")
(revision "1"))
(package
(name "r-databaselinke-r")
(version (git-version "1.7.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/vertesy/DatabaseLinke.R")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0hk76sb3w1v8a7c1knpc572ypsbgqlrv0p49c9y55a0dr12n16s1"))))
(properties `((upstream-name . "DatabaseLinke.R")))
(build-system r-build-system)
(propagated-inputs (list r-readwriter))
(home-page "https://github.com/vertesy/DatabaseLinke.R")
(synopsis
"Parse links to databases from your list of gene symbols")
(description
"This package provides a set of functions to parse and open (search
query) links to genomics related and other websites for R. Useful when you
want to explore e.g.: the function of a set of differentially expressed
genes.")
(license license:gpl3))))
(define-public r-seurat-utils
(let ((commit "0b6f5b548a49148cfbeaa654e8a618c0a020afa5")
(let ((commit "c0374cc9e25ce391ba8013fda0f8c7babbb9201d")
(revision "1"))
(package
(name "r-seurat-utils")
(version (git-version "1.6.5" revision commit))
(version (git-version "2.5.0" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
@ -18010,12 +18226,15 @@ facilitates comparative analysis of known RNA families.")
(file-name (git-file-name name version))
(sha256
(base32
"1mn64h375mkj6x4ix5493z32gqg96yc507j5jr0lx9g5wk1bf762"))))
"15l86b43q245gzz7gsr5rhs4sir74lc14d64yqxfqcb0zrb2bzzd"))))
(properties `((upstream-name . "Seurat.utils")))
(build-system r-build-system)
(propagated-inputs (list r-codeandroll2
r-cowplot
r-databaselinke-r
r-dplyr
r-enhancedvolcano
r-foreach
r-ggcorrplot
r-ggexpress
r-ggplot2
@ -18023,15 +18242,21 @@ facilitates comparative analysis of known RNA families.")
r-ggrepel
r-hgnchelper
r-htmlwidgets
r-job
r-magrittr
r-markdownhelpers
r-markdownreports
r-matrix
r-matrixstats
r-pheatmap
r-plotly
r-princurve
r-qs
r-r-utils
r-readr
r-readwriter
r-reshape2
r-rstudioapi
r-scales
r-seurat
r-soupx
@ -18040,6 +18265,7 @@ facilitates comparative analysis of known RNA families.")
r-stringr
r-tibble
r-tictoc
r-tidyverse
r-vroom))
(home-page "https://github.com/vertesy/Seurat.utils")
(synopsis "Collection of utility functions for Seurat")

11
gnu/packages/bittorrent.scm
View file

@ -87,15 +87,16 @@
(define-public transmission
(package
(name "transmission")
(version "4.0.4")
(version "4.0.5")
(source (origin
(method url-fetch)
(uri (string-append "https://github.com/transmission/transmission"
"/releases/download/" version "/transmission-"
version ".tar.xz"))
(patches (search-patches "transmission-4.0.5-fix-build.patch"))
(sha256
(base32
"19nm7f4x3zq610da5fl63vpycj4kv07np6ldm8czpgyziwqv9xqm"))))
"0mv3ds3bbp1fbmdlrjinmzvk46acpafydirh7h2014j7988zys7x"))))
(build-system cmake-build-system)
(outputs '("out" ; library and command-line interface
"gui")) ; graphical user interface
@ -253,8 +254,8 @@ XML-RPC over SCGI.")
(license l:gpl2+)))
(define-public tremc
(let ((commit "6c15e3f5637c8f3641473328bd8c5b0cc122d930")
(revision "0"))
(let ((commit "d8deaa5ac25bb45a2ca3a930309d6ecc74836a54")
(revision "1"))
(package
(name "tremc")
(version (git-version "0.9.3" revision commit))
@ -267,7 +268,7 @@ XML-RPC over SCGI.")
(file-name (git-file-name name version))
(sha256
(base32
"1anlqzbwgmhrxlh20pfzf4iyw5l2w227h95rq6xf29ai7vddr82k"))))
"08kpqmgisja98918f2hlmdrld5662dqlkssp0pqlki38l6fvbj7r"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; no test suite

8
gnu/packages/check.scm
View file

@ -39,7 +39,7 @@
;;; Copyright © 2021 Hugo Lecomte <hugo.lecomte@inria.fr>
;;; Copyright © 2022 Maxime Devos <maximedevos@telenet.be>
;;; Copyright © 2022, 2023 David Elsing <david.elsing@posteo.net>
;;; Copyright © 2022 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2022, 2023 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2022 jgart <jgart@dismail.de>
;;; Copyright © 2023 Luis Felipe López Acevedo <luis.felipe.la@protonmail.com>
;;; Copyright © 2023 Timo Wilken <guix@twilken.net>
@ -1069,7 +1069,7 @@ but it works for any C/C++ project.")
(define-public actionlint
(package
(name "actionlint")
(version "1.6.23")
(version "1.6.26")
(source (origin
(method git-fetch)
(uri (git-reference
@ -1078,7 +1078,7 @@ but it works for any C/C++ project.")
(file-name (git-file-name name version))
(sha256
(base32
"07is4920a40zrl7mfldg0az2pisi7f6dv4vh3ijn3nzb4i7fqbni"))))
"0j4ni2cryvqn3qim1r6q6sargh0wig6l4vjjwc40cgqvvkrdla04"))))
(build-system go-build-system)
(arguments
'(#:import-path "github.com/rhysd/actionlint/cmd/actionlint"
@ -1087,7 +1087,7 @@ but it works for any C/C++ project.")
(inputs (list go-github-com-fatih-color
go-github-com-mattn-go-colorable
go-github-com-mattn-go-runewidth
go-github-com-robfig-cron-1.2
go-github-com-robfig-cron
go-golang.org-x-sync-errgroup
go-golang.org-x-sync-semaphore
go-gopkg-in-yaml-v3))

1
gnu/packages/configuration-management.scm
View file

@ -21,6 +21,7 @@
#:use-module (guix build-system go)
#:use-module (guix git-download)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages version-control)
#:use-module (gnu packages textutils)
#:use-module ((guix licenses) #:prefix license:)

447
gnu/packages/cran.scm
View file

File diff suppressed because it is too large Load diff

5
gnu/packages/databases.scm
View file

@ -108,6 +108,7 @@
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages gperf)
#:use-module (gnu packages gtk)
#:use-module (gnu packages guile)
@ -1600,14 +1601,14 @@ types are supported, as is encryption.")
(define-public emacs-rec-mode
(package
(name "emacs-rec-mode")
(version "1.9.1")
(version "1.9.3")
(source (origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/"
"rec-mode-" version ".tar"))
(sha256
(base32
"0f60bw07l6kk1kkjjxsk30p6rxj9mpngaxqy8piyabnijfgjzd3s"))
"15m0h84fcrcxpx67mc9any4ap2dcqysfjm1d2a7sx4clx8h3mgk0"))
(snippet #~(begin (delete-file "rec-mode.info")))))
(build-system emacs-build-system)
(arguments

4
gnu/packages/diffoscope.scm
View file

@ -74,7 +74,7 @@
(define-public diffoscope
(package
(name "diffoscope")
(version "252")
(version "253")
(source
(origin
(method git-fetch)
@ -83,7 +83,7 @@
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1hnsnqpr0v9siqja1wxm64wv0vjacg6j9ph9n4xsiaarpndj1b4r"))))
(base32 "1nvq0lv246rah0ryb2qd20yf3gfy0iwfi3335rg9c3gpz0ha4wnb"))))
(build-system python-build-system)
(arguments
(list

9
gnu/packages/disk.scm
View file

@ -27,6 +27,7 @@
;;; Copyright © 2022 Disseminate Dissent <disseminatedissent@protonmail.com>
;;; Copyright © 2023 Timotej Lazar <timotej.lazar@araneo.si>
;;; Copyright © 2023 Morgan Smith <Morgan.J.Smith@outlook.com>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -843,11 +844,11 @@ systems. Output format is completely customizable.")
(base32 "17l5vspfcgfbkqg7bakp3gql29yb05gzawm8n3im30ilzdr53678"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; no check target
#:make-flags (list (string-append "CC=" ,(cc-for-target))
(string-append "PREFIX=" %output))
(list #:tests? #f ; no check target
#:make-flags #~(list (string-append "CC=" #$(cc-for-target))
(string-append "PREFIX=" #$output))
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
(delete 'configure) ; no configure script
(add-after 'build 'build-extra
(lambda* (#:key make-flags #:allow-other-keys)

290
gnu/packages/emacs-xyz.scm
View file

@ -14,7 +14,7 @@
;;; Copyright © 2016, 2017 Roel Janssen <roel@gnu.org>
;;; Copyright © 2016, 2017 Nikita <nikita@n0.is>
;;; Copyright © 2016, 2019 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2016-2023 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2016-2024 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2016, 2017, 2018 Alex Vong <alexvong1995@gmail.com>
;;; Copyright © 2016-2022 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2017 Christopher Baines <mail@cbaines.net>
@ -435,7 +435,7 @@ input via a small child-frame spawned at the position of the cursor.")
(define-public emacs-geiser
(package
(name "emacs-geiser")
(version "0.29.1")
(version "0.30")
(source
(origin
(method git-fetch)
@ -444,7 +444,7 @@ input via a small child-frame spawned at the position of the cursor.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1jbjhljjbwz2inh8x0ivsx6l1amm550cji6q2rdaay2jl8a8db0q"))))
(base32 "1y9k9v7ll816rs20krchrk080b3a5q4hikskaamvr5hrmi0jw938"))))
(build-system emacs-build-system)
(arguments
'(#:phases
@ -482,7 +482,7 @@ e.g. emacs-geiser-guile for Guile.")
(define-public emacs-gptel
(package
(name "emacs-gptel")
(version "0.4.0")
(version "0.5.5")
(source (origin
(method git-fetch)
(uri (git-reference
@ -491,7 +491,7 @@ e.g. emacs-geiser-guile for Guile.")
(file-name (git-file-name name version))
(sha256
(base32
"1aac0jds8hzyfvav06mhqm32v81swrnvyv0ldrkd7qxc2b1x4q7n"))))
"1vqs03plivb1dmal53j53y4r567ggx4781n2mqyjk6s6wfvyvn93"))))
(build-system emacs-build-system)
(arguments
(list
@ -2403,7 +2403,7 @@ replacement.")
(define-public emacs-haskell-mode
(package
(name "emacs-haskell-mode")
(version "17.4")
(version "17.5")
(source
(origin
(method git-fetch)
@ -2412,9 +2412,7 @@ replacement.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "03j94fgw1bljbjqmikbn9mnrfifxf7g9zrb727zmnnrjwyi0wd4n"))
(patches
(search-patches "emacs-haskell-mode-no-redefine-builtin.patch"))))
(base32 "0ndi986rxq9gz61ss2vazadn7rn0niv1gnpk9nfq9sw3m336glsf"))))
(propagated-inputs
(list emacs-dash))
(native-inputs
@ -3348,14 +3346,14 @@ podcasts) in Emacs.")
(define emacs-emms-print-metadata
(package
(name "emacs-emms-print-metadata")
(version "16")
(version "17")
(source
(origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/"
"emms-" version ".tar"))
(sha256
(base32 "1c18lrrfg1n5vn1av9p7q3jys27pdmxq8pq5gqb6397jnv9xywby"))))
(base32 "103gqlmda24izhb5xrh14k0bwhijr98vnlnmdr9a9xxfla9n5xw0"))))
(build-system gnu-build-system)
(arguments
(list
@ -4194,7 +4192,7 @@ while paused.")
(package
(name "emacs-async")
(home-page "https://github.com/jwiegley/emacs-async")
(version "1.9.7")
(version "1.9.8")
(source (origin
(method git-fetch)
(uri (git-reference
@ -4203,8 +4201,13 @@ while paused.")
(file-name (git-file-name name version))
(sha256
(base32
"18pysi1pf6hbv6w0nq50j5xclvgd006iqqijh44wck9hxhdwyfr1"))))
"191bjmwg5bgih1322n4q4i2jxx7aa3cb9lx0ymkwc3r2bdhkn0lp"))))
(build-system emacs-build-system)
(arguments
`(#:tests? #t
#:test-command '("buttercup" "-L" ".")))
(native-inputs
(list emacs-buttercup))
(synopsis "Asynchronous processing in Emacs")
(description
"This package provides the ability to call asynchronous functions and
@ -4216,14 +4219,14 @@ as a library for other Emacs packages.")
(define-public emacs-auctex
(package
(name "emacs-auctex")
(version "13.2.2")
(version "13.2.3")
(source
(origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/"
"auctex-" version ".tar"))
(sha256
(base32 "1k8ypxp2iwg7a0m5lyk1sy5chcnmas0gs6frk6xw6k0r974f193s"))))
(base32 "1590g2yd8q88xgxc449fxbxwgrbjh2cbcalcs7jk50lhzy3y8mc8"))))
(build-system emacs-build-system)
;; We use 'emacs' because AUCTeX requires dbus at compile time
;; ('emacs-minimal' does not provide dbus).
@ -4576,7 +4579,7 @@ of bibliographic references.")
(define-public emacs-corfu
(package
(name "emacs-corfu")
(version "0.38")
(version "1.1")
(source
(origin
(method git-fetch)
@ -4585,7 +4588,7 @@ of bibliographic references.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0wh1lw96b2nghwk6lic4k01pfqj73ssw710lx3s8nj2lv5bzh94n"))))
(base32 "1c900hl01vf43r6vikjy2glrac1cl2z54rahs5kb4q77cz0z1zxf"))))
(build-system emacs-build-system)
(arguments
(list
@ -4670,7 +4673,7 @@ be regarded as @code{emacs-company-quickhelp} for @code{emacs-corfu}.")
(define-public emacs-cape
(package
(name "emacs-cape")
(version "0.17")
(version "1.1")
(source
(origin
(method git-fetch)
@ -4679,7 +4682,7 @@ be regarded as @code{emacs-company-quickhelp} for @code{emacs-corfu}.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1kzhiffzv20rwjcx0iywj39hxibw0wga9ck77yam9xv7ips2mav4"))))
(base32 "0nx08i11s0z9kk711r7wp8sgj00n8hjk5gx0rqr9awrl9fmw1kp2"))))
(build-system emacs-build-system)
(arguments
(list
@ -5879,7 +5882,7 @@ kmonad's configuration files (@file{.kbd}).")
(define-public emacs-keycast
(package
(name "emacs-keycast")
(version "1.3.2")
(version "1.3.3")
(source
(origin
(method git-fetch)
@ -5888,7 +5891,7 @@ kmonad's configuration files (@file{.kbd}).")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0nqx53a1hjgibqrmkdic6syqb2fb5fkna0k5dbbg6igb5k775c8r"))))
(base32 "0hwmjy90ngnbvhxiyf4l3lb7212i5bsqdz73qnfg1iwa7vgkv1q7"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-compat))
@ -6504,7 +6507,7 @@ This mode supports Apache HTTP Server 2.4 and major modules.")
(define-public emacs-apheleia
(package
(name "emacs-apheleia")
(version "3.2")
(version "4.0")
(source
(origin
(method git-fetch)
@ -6513,7 +6516,7 @@ This mode supports Apache HTTP Server 2.4 and major modules.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0rcga3nq1ly5xg61zv3jxgqi0krxk86c24wcrij4vzidhn0s9ncn"))))
(base32 "0afv75w028v59qf777nrf57xj9yaz3jj2bixfmkgiqrn1wii9pm6"))))
(build-system emacs-build-system)
(home-page "https://github.com/raxod502/apheleia")
(synopsis "Reformat buffer stably")
@ -6996,7 +6999,7 @@ then refine or modify the search results.")
(define-public emacs-inf-ruby
(package
(name "emacs-inf-ruby")
(version "2.8.0")
(version "2.8.1")
(source
(origin
(method git-fetch)
@ -7005,7 +7008,7 @@ then refine or modify the search results.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0dxjcr34xsa0m25yw8pp4iwjq8cqdgs6r8ls4lwfb69rnii7jmn5"))))
(base32 "043ml560z69rlgw60w7m03r6cdwp8gfi1zs38qykg2yi98l6gg3x"))))
(build-system emacs-build-system)
(home-page "https://github.com/nonsequitur/inf-ruby")
(synopsis "Provides a REPL buffer connected to a Ruby subprocess in Emacs")
@ -8749,14 +8752,14 @@ user.")
(define-public emacs-subed
(package
(name "emacs-subed")
(version "1.2.7")
(version "1.2.11")
(source (origin
(method url-fetch)
(uri (string-append "https://elpa.nongnu.org/nongnu/subed-"
version ".tar"))
(sha256
(base32
"1rvc17pvig3ihc74d7i25kl3lnigp0h8lh634x0676hdx38h91ib"))))
"1dlh7vd8kc16wr9sqd3v7kkxfvqadi56pa52h35b86krndh4vazp"))))
(arguments
(list
#:tests? #t
@ -9686,20 +9689,18 @@ one Emacs buffer.")
(license license:gpl3+))))
(define-public emacs-mc-extras
(let ((commit "053abc52181b8718559d7361a587bbb795faf164")
(revision "1"))
(package
(name "emacs-mc-extras")
(version (git-version "1.2.4" revision commit))
(version "1.3.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/knu/mc-extras.el")
(commit commit)))
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "16y48qrd20m20vypvys5jp4v4gc1qrqlkm75s1pk1r68i9zrw481"))))
(base32 "1xrlp192wi51qpzgpkn9ph5zlpj08ifd8r3444llskyv0bay6g14"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-multiple-cursors))
@ -9709,7 +9710,7 @@ one Emacs buffer.")
"This package provides additional functions for
@code{multiple-cursors}, including functions for marking s-expressions,
comparing characters, removing cursors, and more.")
(license license:bsd-2))))
(license license:bsd-2)))
(define-public emacs-substitute
(package
@ -10647,7 +10648,7 @@ sgml/html integration, and indentation (working with sgml).")
(define-public emacs-jinx
(package
(name "emacs-jinx")
(version "1.0")
(version "1.1")
(source
(origin
(method git-fetch)
@ -10657,7 +10658,7 @@ sgml/html integration, and indentation (working with sgml).")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "00rlp7iby02zd3sqigpyskph4a26r0dgp53y17hm4xjr6zqifhz5"))))
(base32 "08ajkhpds3m8dk1m2h84vcn6pg5w6hbq55xyd50593kb012a2pmz"))))
(build-system emacs-build-system)
(arguments
(list
@ -11739,7 +11740,7 @@ include installing, removing or visiting the homepage.")
(define-public emacs-prescient
(package
(name "emacs-prescient")
(version "6.1")
(version "6.2")
(source
(origin
(method git-fetch)
@ -11748,7 +11749,7 @@ include installing, removing or visiting the homepage.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1mc9pjb80bxcmzaylfwh0sgpvwbx3h35jalznwz464hw3vqfff83"))))
(base32 "1vj21kcqlsa02nvslmxgxsbv4pc93gakj4x2a6rbk87zl6ccw7pk"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-company emacs-corfu emacs-ivy emacs-selectrum emacs-vertico))
@ -11822,7 +11823,7 @@ style, or as multiple word prefixes.")
(define-public emacs-consult
(package
(name "emacs-consult")
(version "0.35")
(version "1.1")
(source
(origin
(method git-fetch)
@ -11830,7 +11831,7 @@ style, or as multiple word prefixes.")
(url "https://github.com/minad/consult")
(commit version)))
(sha256
(base32 "0a20rfqv2yfwqal1vx6zzg92qgr32p3rp7n6awnyb010jnykqszw"))
(base32 "11fgjgny10falyjs0dlb8cvvfqpvc538mskq4j60j68v36nnkb23"))
(file-name (git-file-name name version))))
(build-system emacs-build-system)
(arguments
@ -11977,21 +11978,18 @@ call.")
(license license:gpl3+))))
(define-public emacs-consult-flycheck
;; This particular commit introduces bug fixes above latest release.
(let ((commit "3f2a7c17cc2fe64e0c07e3bf90e33c885c0d7062")
(revision "0"))
(package
(name "emacs-consult-flycheck")
(version (git-version "0.9" revision commit))
(version "1.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/minad/consult-flycheck")
(commit commit)))
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"0cvxl6ynbns3wlpzilhg4ldakb91ikpibbr9wpb2wkzbgi5c766c"))))
"1yi2qa4gbxlyhwc4rj3iidgr1dpdij68gbkgkk55l53p3yl1p2ww"))))
(build-system emacs-build-system)
(propagated-inputs (list emacs-consult emacs-flycheck))
(home-page "https://github.com/minad/consult-flycheck")
@ -11999,7 +11997,7 @@ call.")
(description
"This package provides the @code{consult-flycheck} command for Emacs,
which integrates @code{Consult} with @code{Flycheck}.")
(license license:gpl3+))))
(license license:gpl3+)))
(define-public emacs-eglot-tempel
(let ((commit "e08b203d6a7c495d4b91ed4537506b5f1ea8a84f")
@ -12090,7 +12088,7 @@ expansion and overwriting the marked region with a new snippet completion.")
(define-public emacs-marginalia
(package
(name "emacs-marginalia")
(version "1.3")
(version "1.5")
(source
(origin
(method git-fetch)
@ -12099,7 +12097,7 @@ expansion and overwriting the marked region with a new snippet completion.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0fjbif2l5fj4xjb9drqfc8zxla8y7mha0imdd1nm4x83i0y4fa6l"))))
(base32 "12ncif2lv6d7r2g87lyjr7idbqa283ijb3qgd5a61i3760czs7d6"))))
(build-system emacs-build-system)
(arguments
(list
@ -13227,7 +13225,7 @@ allowing unprefixed keys to insert their respective characters as expected.")
(define-public emacs-clojure-mode
(package
(name "emacs-clojure-mode")
(version "5.18.0")
(version "5.18.1")
(source
(origin
(method git-fetch)
@ -13236,7 +13234,7 @@ allowing unprefixed keys to insert their respective characters as expected.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0g4x587fpzcj9y59k8sb1g7c6yvga9gjs8ximpmar7d8jq2cv5qa"))))
(base32 "1d5kkq2i8d04k2qfrb31zyjpij92ckbccnzvz01mls3xrvpr57m5"))))
(build-system emacs-build-system)
(native-inputs
(list emacs-buttercup emacs-dash emacs-paredit emacs-s))
@ -13279,7 +13277,7 @@ Clojure projects from templates.")
(define-public emacs-clj-refactor
(package
(name "emacs-clj-refactor")
(version "3.10.0")
(version "3.11.2")
(source
(origin
(method git-fetch)
@ -13288,7 +13286,7 @@ Clojure projects from templates.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "100ngpgvff0xvw1h5krvh40sa3ympl241imwskcv62yk29m9z411"))))
(base32 "1y8xphmmd2ciwnrr7lbiwq0v5c7chq60wssxng9mw0fiz2i3ix22"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-cider
@ -13816,7 +13814,7 @@ to all the other commands, too.")
(define-public emacs-js2-mode
(package
(name "emacs-js2-mode")
(version "20230408")
(version "20231224")
(source
(origin
(method git-fetch)
@ -13825,7 +13823,7 @@ to all the other commands, too.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1vwykla43315wlky52807pn2nm508dx6593alk7hnrl2qkl7852s"))))
(base32 "11ppp1m7hl4ii79zjw62bqvksyzh5xmp3q1qw21wlj2s47mkpm73"))))
(build-system emacs-build-system)
(arguments
`(#:tests? #t
@ -14981,7 +14979,7 @@ that uses the standard completion function completing-read.")
(define-public emacs-yaml
(package
(name "emacs-yaml")
(version "0.5.4")
(version "0.5.5")
(source
(origin
(method git-fetch)
@ -14990,8 +14988,15 @@ that uses the standard completion function completing-read.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "10sdcihgd8yvdf7yab5fsvq65amp25msjh7mbrxgk3w4zc96fxzi"))))
(base32 "0qq9jr1ihk1b5wfvppyvb8c2pq2gma9wysggd22iln4nqz2mjc81"))))
(build-system emacs-build-system)
(arguments
(list
#:tests? #true
#:test-command #~(list "emacs" "--batch" "-Q"
"-l" "yaml.el"
"-l" "yaml-tests.el"
"-f" "ert-run-tests-batch-and-exit")))
(home-page "https://github.com/zkry/yaml.el")
(synopsis "YAML parser in Elisp")
(description
@ -15148,7 +15153,7 @@ ack, ag, helm and pt.")
(define-public emacs-helm
(package
(name "emacs-helm")
(version "3.9.5")
(version "3.9.6")
(source
(origin
(method git-fetch)
@ -15157,7 +15162,7 @@ ack, ag, helm and pt.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "067nc728dfbwzfs07z26cwcqjj00l4lvw3n9bl1zw094v0x6hxxm"))))
(base32 "01b2608gsly557927wdkp71mbakk7h23icjnxq097r12zra4agc7"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-async emacs-popup))
@ -15444,7 +15449,7 @@ implementation.")
(define-public emacs-cider
(package
(name "emacs-cider")
(version "1.9.0")
(version "1.12.0")
(source
(origin
(method git-fetch)
@ -15453,7 +15458,7 @@ implementation.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0sjscbi3qgwn3wcpq5lz7k4gam69h0svh8wbhxcbskr9ys1rmysp"))))
(base32 "11bibkbv3x0z4ilxra3p91nh8klgg3mg3h4f63pxnnp8fjhqpsph"))))
(build-system emacs-build-system)
(arguments
'(#:include (cons* "^lein\\.sh$" "^clojure\\.sh$" %default-include)
@ -16528,7 +16533,7 @@ passive voice.")
(define-public emacs-org
(package
(name "emacs-org")
(version "9.6.12")
(version "9.6.14")
(source
(origin
(method git-fetch)
@ -16537,7 +16542,7 @@ passive voice.")
(commit (string-append "release_" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1anzvsa7kj2rp419qc5rv8jz50h7np391lcgbxcin727njyc7wpr"))))
(base32 "0g59nfx8gqzkqidqvyvh83yd7mahjm9khhr1ccwqj3r4phwpciqx"))))
(build-system emacs-build-system)
(arguments
(list
@ -17134,7 +17139,7 @@ you to deal with multiple log levels.")
(define-public emacs-denote
(package
(name "emacs-denote")
(version "2.1.0")
(version "2.2.0")
(source
(origin
(method git-fetch)
@ -17143,7 +17148,7 @@ you to deal with multiple log levels.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1gfjckqh170z8slhm0wdqf0570ywgni7b1wdnifxf5cb69h3izpr"))))
(base32 "0w9r5d0br5hpay13vbx78ak2n0yy8bbwlaxnz4p5ggxiv8g5044q"))))
(build-system emacs-build-system)
(native-inputs (list texinfo))
(home-page "https://protesilaos.com/emacs/denote/")
@ -17263,7 +17268,7 @@ using a convenient notation.")
(define-public emacs-beframe
(package
(name "emacs-beframe")
(version "0.3.0")
(version "1.0.0")
(source (origin
(method git-fetch)
(uri (git-reference
@ -17272,7 +17277,7 @@ using a convenient notation.")
(file-name (git-file-name name version))
(sha256
(base32
"1nblpac1pkhgwpbw0k0p9xx6yc5kiai4pznw39slx703mzzqzqyj"))))
"08k9lwfxfvpm50n1c0gcm07sicd6yw7dbyyvhp8lai6pfxl465v9"))))
(build-system emacs-build-system)
(arguments
(list
@ -18673,7 +18678,7 @@ in Emacs.")
(define-public emacs-php-mode
(package
(name "emacs-php-mode")
(version "1.25.0")
(version "1.25.1")
(home-page "https://github.com/emacs-php/php-mode")
(source
(origin
@ -18683,7 +18688,7 @@ in Emacs.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1vwbxaxjvz2hhb6pli1bh1qlrc2r991zl4i18wiwk78ffanqx6q0"))))
(base32 "1pxv4c63dma1il6w8vl2485yddp0ngm3gvfdqwjjszanfdxa4fg1"))))
(build-system emacs-build-system)
(arguments
(list
@ -19601,14 +19606,14 @@ more information.")
(define-public emacs-eldoc
(package
(name "emacs-eldoc")
(version "1.14.0")
(version "1.15.0")
(source
(origin
(method url-fetch)
(uri (string-append
"https://elpa.gnu.org/packages/eldoc-" version ".tar"))
(sha256
(base32 "15bg61nbfb6l51frlsn430ga3vscns2651wvi6377vlyra7kgn39"))))
(base32 "1wn7q2f19lfdc3b639ffhbmsglnm3zc6rvgyc6amqwnpc2n2gkdl"))))
(build-system emacs-build-system)
(home-page "https://elpa.gnu.org/packages/eldoc.html")
(synopsis "Show function arglist or variable docstring in echo area")
@ -19844,7 +19849,7 @@ a @url{http://json.org/, JSON} file.")
(define-public emacs-json-mode
(package
(name "emacs-json-mode")
(version "1.8.0")
(version "1.9.0")
(source
(origin
(method git-fetch)
@ -19853,7 +19858,7 @@ a @url{http://json.org/, JSON} file.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0r0k56q58kb133l9x9nbisz9p2kbphfgw1l4g2xp0pjqsc9wvq8z"))))
(base32 "0irz9gpw43wkhiq8828wm9nsc3baqg299dgly9iv7jiygk2lp14s"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-json-snatcher))
@ -19868,10 +19873,10 @@ highlighting.")
;; upstreamed. By convention, it should refer to a commit in which
;; jsonrpc.el was actually touched. In order to find this, you can refer to
;; <https://git.savannah.gnu.org/cgit/emacs.git/log/?qt=grep&q=jsonrpc>.
(let ((commit "2d835d64ba339bb375f0d55c4679149d6da3f209")) ;version bump
(let ((commit "731cfee3b45361158d88bded3c32c9a48ace7bdb")) ;version bump
(package
(name "emacs-jsonrpc")
(version "1.0.17")
(version "1.0.23")
(source
(origin
(method git-fetch)
@ -19881,7 +19886,7 @@ highlighting.")
(file-name (git-file-name name version))
(sha256
(base32
"1jv8pcq0yad5wmqsdvamwq6674p6ghpyyznbd2x5mlxyp6za6cx5"))))
"0xrlqjd4kj7z5ssidi159n8fm1hx35if2h1ds586ppf8y057bmhn"))))
(build-system emacs-build-system)
(arguments
(list #:phases
@ -23055,7 +23060,7 @@ according to a parsing expression grammar.")
(define-public emacs-eldev
(package
(name "emacs-eldev")
(version "1.7")
(version "1.8.1")
(source
(origin
(method git-fetch)
@ -23064,7 +23069,7 @@ according to a parsing expression grammar.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1q30r6di3r8dxxfbxfyii7kfvjj83c16bxx8ixadki3ix6imd6l5"))))
(base32 "058f2k2qhwbyr7a759wig9x6v6n2rl7zshqjbp4jnhnkcqkr70g5"))))
(build-system emacs-build-system)
(arguments
(list
@ -23144,7 +23149,7 @@ interactive commands and functions, such as @code{completing-read}.")
(define-public emacs-org-ql
(package
(name "emacs-org-ql")
(version "0.7.3")
(version "0.8")
(source (origin
(method git-fetch)
(uri (git-reference
@ -23152,7 +23157,7 @@ interactive commands and functions, such as @code{completing-read}.")
(commit (string-append "v" version))))
(sha256
(base32
"1jdkk837z8fw2dff5v8fh2dhx7rz348sf5jqpj2aja5ji48p0fs9"))
"0l403n75xyjf14pbk7hfdzajv393mk5m0xp9csv8dl805rgzrdkr"))
(file-name (git-file-name name version))))
(build-system emacs-build-system)
(arguments
@ -23162,7 +23167,8 @@ interactive commands and functions, such as @code{completing-read}.")
(native-inputs
(list emacs-buttercup emacs-with-simulated-input emacs-xr))
(propagated-inputs
(list emacs-dash
(list emacs-compat
emacs-dash
emacs-f
emacs-helm
emacs-helm-org
@ -23269,7 +23275,7 @@ files to be expanded upon opening them.")
(define-public emacs-ebib
(package
(name "emacs-ebib")
(version "2.39.4")
(version "2.40.3")
(source
(origin
(method git-fetch)
@ -23278,10 +23284,10 @@ files to be expanded upon opening them.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "08j6z4rpnvz7vhdrm7y3prf2jpxclqicid6as4qljysq3czzfhay"))))
(base32 "07pyb76impqpczx6hl6amfs4hfnszfwydp27az46dkqc17hy0fgy"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-biblio emacs-ivy emacs-parsebib))
(list emacs-biblio emacs-compat emacs-ivy emacs-parsebib))
(home-page "https://joostkremers.github.io/ebib/")
(synopsis "BibTeX database manager for Emacs")
(description
@ -24145,14 +24151,14 @@ or expressions with SVG rounded box labels that are fully customizable.")
(define-public emacs-kind-icon
(package
(name "emacs-kind-icon")
(version "0.2.0")
(version "0.2.1")
(source
(origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/kind-icon-"
version ".tar"))
(sha256
(base32 "1vgwbd99vx793iy04albkxl24c7vq598s7bg0raqwmgx84abww6r"))))
(base32 "0ri5k2bgr9cf0qsdznsil70b4zs4z00fs4k35c3dj7kxx9nlncfi"))))
(build-system emacs-build-system)
(propagated-inputs (list emacs-svg-lib))
(home-page "https://github.com/jdtsmith/kind-icon")
@ -24774,7 +24780,7 @@ powerful Org contents.")
(define-public emacs-org-re-reveal
(package
(name "emacs-org-re-reveal")
(version "3.23.0")
(version "3.24.2")
(source
(origin
(method git-fetch)
@ -24783,7 +24789,7 @@ powerful Org contents.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1ss71iy1xnhr3p4mmfbnbgvp7kjqxpqag49f851wgmmwwg8gajvd"))))
(base32 "10x1cinn97wlm3dmv35dxrs78gfzgw59qf4j57m3vgss5q93mqq5"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-htmlize emacs-org))
@ -27112,37 +27118,6 @@ to start sxiv from a Dired buffer, allowing you to mark or unmark image files
in said buffer using sxiv.")
(license license:unlicense)))
(define-public emacs-mu4e-conversation
(let ((commit "98110bb9c300fc9866dee8e0023355f9f79c9b96")
(revision "5"))
(package
(name "emacs-mu4e-conversation")
(version (git-version "0.0.1" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/Ambrevar/mu4e-conversation.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"080s96jkcw2p288sp1vgds91rgl693iz6hi2dv56p2ih0nnivwlg"))))
(build-system emacs-build-system)
(propagated-inputs
(list mu))
(home-page
"https://gitlab.com/Ambrevar/mu4e-conversation")
(synopsis
"Show a complete thread in a single buffer")
(description
"This package offers an alternate view to mu4e's e-mail display. It
shows all e-mails of a thread in a single view, where each correspondent has
their own face. Threads can be displayed linearly (in which case e-mails are
displayed in chronological order) or as an Org document where the node tree
maps the thread tree.")
(license license:gpl3+))))
;; Package has no releases or tags. Version is extracted from "Version:"
;; keyword in main file.
(define-public emacs-mu4e-dashboard
@ -28297,7 +28272,7 @@ This package also includes a @code{yt-dlp} front-end.")
(define-public emacs-org-web-tools
(package
(name "emacs-org-web-tools")
(version "1.2")
(version "1.3")
(source
(origin
(method git-fetch)
@ -28307,10 +28282,15 @@ This package also includes a @code{yt-dlp} front-end.")
(file-name (git-file-name name version))
(sha256
(base32
"1w24d1cxzgjqycqz894kg3707n3ckwpv5cmbywfaffsz1v5i2p3a"))))
"0x1j1y2pl6a8f97cw04nm0w6g4jh449cjfsr2aryn316ms4nj1a0"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-compat emacs-dash emacs-esxml emacs-request emacs-s))
(list emacs-compat
emacs-dash
emacs-esxml
emacs-plz
emacs-request
emacs-s))
(inputs
(list pandoc))
(arguments
@ -28897,7 +28877,7 @@ targets the Emacs based IDEs (CIDER, ESS, Geiser, Robe, SLIME etc.)")
(define-public emacs-buttercup
(package
(name "emacs-buttercup")
(version "1.31")
(version "1.33")
(source
(origin
(method git-fetch)
@ -28907,7 +28887,7 @@ targets the Emacs based IDEs (CIDER, ESS, Geiser, Robe, SLIME etc.)")
(file-name (git-file-name name version))
(sha256
(base32
"1rvc9r6swb74lhzd877jidkkf2cxl5v4zz302j2imqhsbk844qzh"))))
"10q6zr837yaal1g3l7vmj08b3c301j99b290pylshb0si360a27h"))))
(build-system emacs-build-system)
(arguments
(list
@ -30102,7 +30082,7 @@ constant expressions.")
(define-public emacs-docker
(package
(name "emacs-docker")
(version "2.2.0")
(version "2.3.1")
(source
(origin
(method git-fetch)
@ -30111,7 +30091,7 @@ constant expressions.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1743x2s7ss7h329yayima3pqi62f0qjv56g5y6b7iwk40wpnhv9v"))))
(base32 "13927ns3393q40gxrfzyqh6ajxzfjg14d0srfxi6ild3pmaz0460"))))
(inputs
(list emacs-undercover))
(propagated-inputs
@ -30745,22 +30725,18 @@ as Emacs Lisp.")
(license license:gpl3+)))
(define-public emacs-transient
;; Use this unreleased commit to support a recent Magit change needed to add
;; Reviewed-by: tags for any contributor.
(let ((commit "cc0fa80530b02493f73b870032bfcdd1435286cd")
(revision "0"))
(package
(name "emacs-transient")
(version (git-version "0.4.3" revision commit))
(version "0.5.3")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/magit/transient")
(commit commit)))
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"10yaanpz3krh3f9vzyafg6n85yp8sk58gj9vrpsqg926x4m0w1p1"))))
"0fr0pan4dffckfywnx7a0dkb2l71fnc47cqqqb1lckqwr1gr9z6l"))))
(build-system emacs-build-system)
(arguments
`(#:tests? #f ;no test suite
@ -30785,7 +30761,7 @@ in Emacs, Transient implements a similar abstraction involving a prefix
command, infix arguments and suffix commands. We could call this abstraction
a \"transient command\", but because it always involves at least two
commands (a prefix and a suffix) we prefer to call it just a \"transient\".")
(license license:gpl3+))))
(license license:gpl3+)))
(define-public emacs-forge
(package
@ -32023,7 +31999,7 @@ all of your projects, then override or add variables on a per-project basis.")
(define-public emacs-el-patch
(package
(name "emacs-el-patch")
(version "3.0")
(version "3.1")
(source
(origin
(method git-fetch)
@ -32032,7 +32008,7 @@ all of your projects, then override or add variables on a per-project basis.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0qkx7f19kl85n56bp3q40200a6ynpkhimcnb3k6x4n6idn6ff2pa"))))
(base32 "0x2x3ci5i428wgagbwjh9qp2zlflkzlrkbpi6qa4fv7dq3vgkrv2"))))
(build-system emacs-build-system)
(home-page "https://github.com/raxod502/el-patch")
(synopsis "Future-proof your Emacs customizations")
@ -32275,14 +32251,14 @@ well as an option for visually flashing evaluated s-expressions.")
(define-public emacs-tramp
(package
(name "emacs-tramp")
(version "2.6.1.4")
(version "2.6.2.0")
(source
(origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/"
"tramp-" version ".tar"))
(sha256
(base32 "1ajlx0982hx6ypby9dvw1yh9zyl1h4j9xp4n9rfzxhfvvq3139bi"))))
(base32 "06wpaqjr3qw1424k9rh5i28yxrkzh1z5dczpgp7mpv823l2x8ip3"))))
(build-system emacs-build-system)
(arguments
(list
@ -33316,14 +33292,14 @@ federated microblogging social network.")
(define-public emacs-ebdb
(package
(name "emacs-ebdb")
(version "0.8.18")
(version "0.8.20")
(source
(origin
(method url-fetch)
(uri (string-append "https://elpa.gnu.org/packages/"
"ebdb-" version ".tar"))
(sha256
(base32 "1mb1qsw3dfaa6x52vsg73by6w7x5i6w5l7b0d2jr667y006q2vvf"))))
(base32 "1kcygkfw7r3ixbb2dgsf3rl2662xls24992y2j1w32fdh9gqk03s"))))
(build-system emacs-build-system)
(home-page "https://github.com/girzel/ebdb")
(synopsis "EIEIO port of BBDB, Emacs's contact-management package")
@ -34222,11 +34198,11 @@ other @code{helm-type-file} sources such as @code{helm-locate}.")
(license license:gpl3+)))
(define-public emacs-telega-server
(let ((commit "4f08c835c08e762137ca04e12055cf9dc0b2b8cf")
(let ((commit "304705fa007c3dae3c5d0c6dc66641ae783f0081")
(revision "0"))
(package
(name "emacs-telega-server")
(version (git-version "0.8.203" revision commit))
(version (git-version "0.8.230" revision commit))
(source
(origin
(method git-fetch)
@ -34234,7 +34210,7 @@ other @code{helm-type-file} sources such as @code{helm-locate}.")
(url "https://github.com/zevlg/telega.el")
(commit commit)))
(sha256
(base32 "02iv2cxwsmfpx2b6wvp7l22izvqw21f1b98jm0yihmfh39idxwn8"))
(base32 "02yxjaxpf2f6pjg3ixw7jvx56x6lfh30mnsmiz1p2yi64kyllaan"))
(file-name (git-file-name "emacs-telega" version))
(patches
(search-patches "emacs-telega-path-placeholder.patch"
@ -34371,7 +34347,7 @@ icon support, git integration, and several other utilities.")
(define-public emacs-mood-line
(package
(name "emacs-mood-line")
(version "2.2.0")
(version "3.1.1")
(source
(origin
(method git-fetch)
@ -34380,7 +34356,7 @@ icon support, git integration, and several other utilities.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "1z50vr3ymn466z26qh0ybbm8aaizl5ghi471a47cp8bnnn9y9dqg"))))
(base32 "19yh93kkyailczv1yyg7jhmzwl768sg0rk4as5kgqays87h9bnfn"))))
(build-system emacs-build-system)
(home-page "https://gitlab.com/jessieh/mood-line")
(synopsis "Minimal mode-line for Emacs")
@ -34984,7 +34960,7 @@ data, including buffers, window configuration, variables, and more.")
(define-public emacs-parseedn
(package
(name "emacs-parseedn")
(version "1.2.0")
(version "1.2.1")
(source
(origin
(method git-fetch)
@ -34993,7 +34969,7 @@ data, including buffers, window configuration, variables, and more.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1pxm50i74id3c4c0j2ifac0wx5zkdq431dmcqbyb6w6k0s05l23c"))))
(base32 "0b2jralm5lm4z4lpkn8ygzfga67xsalaszc8gqqv36khmz2mrckc"))))
(build-system emacs-build-system)
(propagated-inputs
(list emacs-a emacs-parseclj))
@ -35007,7 +34983,7 @@ It uses parseclj's shift-reduce parser internally.")
(define-public emacs-parseclj
(package
(name "emacs-parseclj")
(version "1.1.0")
(version "1.1.1")
(source
(origin
(method git-fetch)
@ -35016,7 +34992,7 @@ It uses parseclj's shift-reduce parser internally.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0ifc9gyp7hr97ssnsqxiwrzmldqysz874crlg6jm4iy5l9fyls22"))))
(base32 "1iz7qbsq4whmb3iqy777jlm47chjp62313hc6nfcp0lfqsanmcmv"))))
(build-system emacs-build-system)
(propagated-inputs (list emacs-a))
(home-page "https://cider.mx")
@ -37437,7 +37413,7 @@ and preferred services can easily be configured.")
(define-public emacs-vertico
(package
(name "emacs-vertico")
(version "1.4")
(version "1.6")
(source
(origin
(method git-fetch)
@ -37446,7 +37422,7 @@ and preferred services can easily be configured.")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32 "0pf6qm89nysrri3xx7pda32yfsyv5fwswg6695qivldpq2biwx2x"))))
(base32 "088x0xqmhicdg44xprhimay0v9hcy12g15c7lk5kvhylxmkbg8wb"))))
(build-system emacs-build-system)
(arguments
(list
@ -37662,10 +37638,10 @@ future.")
(define-public emacs-code-cells
;; XXX: Upstream does not tag releases. The commit below matches version
;; bump.
(let ((commit "fd68a33eb43b3cbd44fed767f48e230382903592"))
(let ((commit "44546ca256f3da29e3ac884e3d699c8455acbd6e"))
(package
(name "emacs-code-cells")
(version "0.3")
(version "0.4")
(source
(origin
(method git-fetch)
@ -37674,7 +37650,7 @@ future.")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "072d5vldjfg9mj4a86bw8xmxl3hmywsnx4f2k6nayqy4whry5fmq"))))
(base32 "1fc5l87kzmnwxmrq2v7x4jzcplq375v9j0h2yz4grzaql3jcc419"))))
(build-system emacs-build-system)
(home-page "https://github.com/astoff/code-cells.el")
(synopsis "Emacs utilities for code split into cells, including Jupyter
@ -38259,7 +38235,7 @@ hacker.")
(define-public emacs-osm
(package
(name "emacs-osm")
(version "0.14")
(version "1.2")
(source (origin
(method git-fetch)
(uri (git-reference
@ -38268,7 +38244,7 @@ hacker.")
(file-name (git-file-name name version))
(sha256
(base32
"1y0zkfc27pnhz5hqpapsqin2kc6al1zjgd6cd4nhzqmh49h81bsb"))))
"0mmq83ill1vzx1x07vxjn53di2cskid2gmj5qqa6694s1xzpywf4"))))
(build-system emacs-build-system)
(arguments
(list #:phases #~(modify-phases %standard-phases
@ -38928,7 +38904,7 @@ in Emacs.")
(define-public emacs-vertico-posframe
(package
(name "emacs-vertico-posframe")
(version "0.7.3")
(version "0.7.5")
(source (origin
(method url-fetch)
(uri (string-append
@ -38936,7 +38912,7 @@ in Emacs.")
".tar"))
(sha256
(base32
"1gfapchkj9jkzlyz3hzkb9kpifcak0fn4y5jw6f2cs6379sjwvzm"))))
"1fa8kg5lqpa1xk2vf1mp420iqki866gd83vzsj166b8mnd34fdlr"))))
(build-system emacs-build-system)
(propagated-inputs (list emacs-posframe emacs-vertico))
(home-page "https://github.com/tumashu/vertico-posframe")

31
gnu/packages/file-systems.scm
View file

@ -11,6 +11,7 @@
;;; Copyright © 2021 Noisytoot <noisytoot@disroot.org>
;;; Copyright © 2021, 2023 Kaelyn Takata <kaelyn.alexi@protonmail.com>
;;; Copyright © 2022 Brian Cully <bjc@spork.org>
;;; Copyright © 2023 Aaron Covrig <aaron.covrig.us@ieee.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -64,8 +65,10 @@
#:use-module (gnu packages docbook)
#:use-module (gnu packages elf)
#:use-module (gnu packages flex)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages gawk)
#:use-module (gnu packages glib)
#:use-module (gnu packages gnome)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-check)
@ -81,6 +84,7 @@
#:use-module (gnu packages nfs)
#:use-module (gnu packages onc-rpc)
#:use-module (gnu packages openldap)
#:use-module (gnu packages password-utils)
#:use-module (gnu packages pcre)
#:use-module (gnu packages perl)
#:use-module (gnu packages photo)
@ -91,6 +95,7 @@
#:use-module (gnu packages python-crypto)
#:use-module (gnu packages python-web)
#:use-module (gnu packages python-xyz)
#:use-module (gnu packages qt)
#:use-module (gnu packages readline)
#:use-module (gnu packages rsync)
#:use-module (gnu packages sssd)
@ -2112,3 +2117,29 @@ filtering and ordering functionality.
@end itemize\n")
(license license:gpl3)))
(define-public sirikali
(package
(name "sirikali")
(version "1.5.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mhogomchungu/sirikali")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"1l52s8rxkfcxcx3s2fnsh08wy6hhjjvp7gcggdi84aqc4dq3rdnm"))))
(build-system cmake-build-system)
(arguments
'(#:tests? #f ;No tests
#:configure-flags '("-DQT5=true")))
(inputs (list xdg-utils libpwquality libgcrypt libsecret qtbase-5))
(native-inputs (list pkg-config))
(home-page "https://mhogomchungu.github.io/sirikali/")
(synopsis "Graphical program for managing encrypted file-systems")
(description "@dfn{SiriKali} is a Qt / C++ @acronym{GUI, graphical user
interface} application that manages ecryptfs, cryfs, encfs, gocryptfs, fscrypt
and securefs based encrypted folders.")
(license license:gpl2+)))

1
gnu/packages/finance.scm
View file

@ -93,6 +93,7 @@
#:use-module (gnu packages gnome)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages graphviz)
#:use-module (gnu packages groff)
#:use-module (gnu packages gsasl)

4
gnu/packages/fonts.scm
View file

@ -3159,7 +3159,7 @@ and readability. This package bundles those icons into a font.")
(define-public font-lxgw-wenkai
(package
(name "font-lxgw-wenkai")
(version "1.311")
(version "1.315")
(source (origin
(method url-fetch)
(uri (string-append
@ -3167,7 +3167,7 @@ and readability. This package bundles those icons into a font.")
version "/lxgw-wenkai-v" version ".tar.gz"))
(sha256
(base32
"0f5fnqcwp8kicrbkncn5j1w06cil771jfdcjf2w48vl62m4gmf27"))))
"0isb7rbg8yb6hv8xk1ngngkgzpyb3papkl19jczwrwm373m8bn3f"))))
(build-system font-build-system)
(home-page "https://lxgw.github.io/2021/01/28/Klee-Simpchin/")
(synopsis "Simplified Chinese Imitation Song typeface")

52
gnu/packages/game-development.scm
View file

@ -56,6 +56,7 @@
#:use-module (guix svn-download)
#:use-module (guix utils)
#:use-module (guix build-system cmake)
#:use-module (guix build-system copy)
#:use-module (guix build-system gnu)
#:use-module (guix build-system python)
#:use-module (guix build-system scons)
@ -2583,6 +2584,57 @@ added. The permanent goal is to create a Quake 3 distribution upon which
people base their games, ports to new platforms, and other projects.")
(license license:gpl2))))
(define-public inform
;; The latest release does not yet have a build system.
;; This commit is the earliest to have one.
(let ((commit "20cbfff96015938809d0e3da6cd0d83b76d27f14")
(revision "0"))
(package
(name "inform")
(version (git-version "6.41" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://jxself.org/git/inform.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "19z8pgrj1s2irany5s6xxwsm3bdnri1as46fdi16zdp4aah523jy"))))
(build-system gnu-build-system)
(native-inputs (list autoconf automake))
(synopsis "The Inform 6 compiler")
(description
"Inform 6 is a programming language designed for interactive fiction.
This version of the compiler has been modified slightly to work better when the
Inform standard library is in a non-standard location.")
(home-page "https://jxself.org/git/inform.git")
(license license:gpl3+))))
(define-public informlib
(package
(name "informlib")
(version "6.12.6")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://jxself.org/git/informlib.git")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "0fcnw4jjzln402qk097n2s8y24vw1p3mmlmh6k1mbr2zfajjcn5r"))))
(build-system copy-build-system)
(arguments
(list
#:install-plan
#~'(("." "lib"))))
(synopsis "Inform 6 standard library")
(description
"This package provides the standard library for Inform 6.")
(home-page "https://jxself.org/git/informlib.git")
(license license:agpl3+)))
(define-public instead
(package
(name "instead")

74
gnu/packages/games.scm
View file

@ -10939,6 +10939,80 @@ implemented using ncurses user interface. An SDL graphical version is also
available.")
(license license:gpl3+)))
(define-public devours
(let ((commit "d50e745aa14aa48f7555ae12eb3d1000de1cc150")
(revision "0"))
(package
(name "devours")
(version (git-version "3" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://jxself.org/git/devours.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1ksl6mh76jfx64rmasz2571f88ws45vby2977srhgkh355zp3lzn"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ; no tests
#:phases
#~(modify-phases %standard-phases
(delete 'configure) ; no configure
(replace 'build
(lambda _
(invoke "inform"
(string-append "+include_path="
#$(this-package-native-input "informlib")
"/lib")
"devours.inf")))
(replace 'install
(lambda* (#:key inputs #:allow-other-keys)
;; Create standalone executable.
(let* ((bash (search-input-file inputs "/bin/bash"))
(share (string-append #$output "/share"))
(scummvm (search-input-file inputs "/bin/scummvm"))
(bin (string-append #$output "/bin"))
(executable (string-append bin "/devours")))
(mkdir-p share)
(copy-file "devours.z5" (string-append share "/devours.z5"))
(mkdir-p bin)
(with-output-to-file executable
(lambda ()
(format #t "#!~a~%" bash)
(format #t
"exec ~a --path=~a glk:zcode~%"
scummvm share)))
(chmod executable #o755))))
(add-after 'install-executable 'install-desktop-file
(lambda _
(let* ((apps (string-append #$output "/share/applications"))
(share (string-append #$output "")))
(mkdir-p apps)
(make-desktop-entry-file
(string-append apps "/devours.desktop")
#:name "All Things Devours"
#:generic-name "All Things Devours"
#:exec (string-append #$output "/bin/devours")
#:categories '("AdventureGame" "Game" "RolePlaying")
#:keywords '("game" "adventure" "sci-fi")
#:comment '((#f "Sci-fi text adventure game")))))))))
(inputs
(list bash scummvm))
(native-inputs
(list inform informlib))
(synopsis "All Things Devours")
(description
"All Things Devours is a short piece of sci-fi interactive fiction,
leaning strongly towards the text-adventure end of the spectrum.
Any move you make may put things into an unwinnable state. You are therefore
encouraged to save frequently, and also to realise that you will probably have
to start over several times to find the most satisfactory ending.")
(home-page "https://jxself.org/git/devours.git")
(license license:agpl3+))))
(define-public schiffbruch
;; There haven't been any releases for several years, so I've taken the most
;; recent commit from the master branch that didn't fail to build (the last

15
gnu/packages/gcc.scm
View file

@ -1182,6 +1182,21 @@ provides the GNU compiler for the Go programming language.")
(substitute-keyword-arguments (package-arguments gccgo)
((#:phases phases)
#~(modify-phases #$phases
#$@(if (version>=? (package-version gccgo) "12.0")
#~((add-after 'unpack 'adjust-libgo-dependencies
(lambda _
(substitute* "Makefile.in"
;; libgo.la depends on libbacktrace.la but the
;; current dependency rules don't have libbacktrace
;; building early enough for libgo. When built
;; with more than 1 core this issue doesn't appear.
;; see commit 5fee5ec362f7a243f459e6378fd49dfc89dc9fb5.
(("all-target-libgo: maybe-all-target-libffi")
(string-append
"all-target-libgo: maybe-all-target-libbacktrace\n"
"all-target-libgo: maybe-all-target-libffi\n"
"all-target-libgo: maybe-all-target-libatomic"))))))
#~())
(add-after 'install 'wrap-go-with-tool-path
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))

9
gnu/packages/geo.scm
View file

@ -1940,7 +1940,7 @@ to the OSM opening hours specification.")
(define-public josm
(package
(name "josm")
(version "18822")
(version "18907")
(source (origin
(method svn-fetch)
(uri (svn-reference
@ -1949,7 +1949,7 @@ to the OSM opening hours specification.")
(recursive? #f)))
(sha256
(base32
"0b4q6n3jbqrh7dsfmcf2g0xdd1wjj62sjq8lwvggvrpqlk1fyn1b"))
"0vkczijw537f4y1b7hfxa45k3ww6nf2cf485b19dnbgh9ab6mnjl"))
(file-name (string-append name "-" version "-checkout"))
(modules '((guix build utils)))
(snippet
@ -1963,6 +1963,7 @@ to the OSM opening hours specification.")
(list java-commons-jcs
java-commons-compress
java-jmapviewer
java-jakarta-annotations-api
java-jakarta-json
java-jsr305
java-metadata-extractor
@ -2329,7 +2330,7 @@ associated attribute file (@file{.dbf}).")
(define-public spatialite-tools
(package
(name "spatialite-tools")
(version "5.1.0")
(version "5.1.0a")
(source
(origin
(method url-fetch)
@ -2337,7 +2338,7 @@ associated attribute file (@file{.dbf}).")
"spatialite-tools-sources/"
"spatialite-tools-" version ".tar.gz"))
(sha256
(base32 "1dc3hnqa9ns0ycsac6wyl96pi052y7rrf233lq7sk708ghv30c6z"))))
(base32 "1kh1amab452m3801knmpn1jcg27axakb90gd8fxwv240irsk97hi"))))
(build-system gnu-build-system)
(native-inputs
(list pkg-config))

11
gnu/packages/gl.scm
View file

@ -690,7 +690,12 @@ glxdemo, glxgears, glxheads, and glxinfo.")
#t))))
(build-system gnu-build-system)
(arguments
(list #:make-flags #~(list (string-append "GLEW_PREFIX=" #$output)
(list #:make-flags #~(list #$@(if (%current-target-system)
#~((string-append "CC=" #$(cc-for-target))
(string-append "LD=" #$(cc-for-target))
(string-append "STRIP=" #$(strip-for-target)))
#~())
(string-append "GLEW_PREFIX=" #$output)
(string-append "GLEW_DEST=" #$output))
#:phases
#~(modify-phases %standard-phases
@ -915,7 +920,7 @@ OpenGL.")
(define-public glfw
(package
(name "glfw")
(version "3.3.4")
(version "3.3.9")
(source (origin
(method url-fetch)
(uri (string-append "https://github.com/glfw/glfw"
@ -923,7 +928,7 @@ OpenGL.")
"/glfw-" version ".zip"))
(sha256
(base32
"1kcrpl4d6b6h23ib5j9q670d9w3knd07whgbanbmwwhbcqnc9lmv"))))
"023dn97n4h14n5lbjpzjv0y6a2plj254c0w3rr3wraf3z08189jm"))))
(build-system cmake-build-system)
(arguments
(list

15
gnu/packages/gnunet.scm
View file

@ -262,7 +262,7 @@ supports HTTP, HTTPS and GnuTLS.")
(define-public gnunet
(package
(name "gnunet")
(version "0.19.4")
(version "0.20.0")
(source
(origin
(method url-fetch)
@ -270,14 +270,7 @@ supports HTTP, HTTPS and GnuTLS.")
".tar.gz"))
(sha256
(base32
"16q0mkkr9b33wlm307ignfgvv0kilzr42155m5dpz66m13s3v9h0"))
(modules '((guix build utils)))
(snippet
#~(begin
;; This is fixed in the upstream repository but the fix
;; has not been released.
(substitute* "src/gns/test_proxy.sh"
(("test_gnunet_proxy.conf") "test_gns_proxy.conf"))))))
"064mmhksznbsymanikwqkgmdhk2f0zjll2aq2cmxa14wm5w9w0jn"))))
(build-system gnu-build-system)
(inputs
(list bluez
@ -450,14 +443,14 @@ The following services are supported:
(define-public gnunet-gtk
(package (inherit gnunet)
(name "gnunet-gtk")
(version "0.19.0")
(version "0.20.0")
(source (origin
(method url-fetch)
(uri (string-append "mirror://gnu/gnunet/gnunet-gtk-"
version ".tar.gz"))
(sha256
(base32
"0z2731l69vnfsa0cdsw8wh8g1d08wz15y5n0a58qjpf7baric01k"))))
"0bandj2f24v4wfq1v5j73zn5jp25dn8r7y0wd7znlkmbh86fb4g9"))))
(arguments
(list #:configure-flags
#~(list "--with-libunique"

7
gnu/packages/gnupg.scm
View file

@ -23,6 +23,7 @@
;;; Copyright © 2021 Aleksandr Vityazev <avityazev@posteo.org>
;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2024 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -236,6 +237,12 @@ generation.")
(base32
"1r1lvcp67gn5lfrj1g388sd77ca6qwnmxndirdysd71gk362z34f"))))
(build-system gnu-build-system)
(arguments (if (%current-target-system)
(list #:configure-flags
#~(list (string-append
"--with-libgpg-error-prefix="
#$(this-package-input "libgpg-error"))))
'()))
(propagated-inputs
(list libgpg-error pth))
(home-page "https://gnupg.org")

2
gnu/packages/gnuzilla.scm
View file

@ -1774,7 +1774,7 @@ ca495991b7852b855"))
(format #t
"[Desktop Entry]~@
Name=Icedove~@
Exec=~a/bin/icedove~@
Exec=~a/bin/icedove %u~@
Icon=icedove~@
GenericName=Mail/News Client~@
Categories=Network;Email;~@

12
gnu/packages/golang-check.scm
View file

@ -414,6 +414,18 @@ Features include:
@end itemize")
(license license:expat)))
(define-public go-github-com-stretchr-testify-bootstrap
(hidden-package
(package
(inherit go-github-com-stretchr-testify)
(arguments
'(#:import-path "github.com/stretchr/testify"
#:tests? #f
#:phases (modify-phases %standard-phases
(delete 'build))))
(propagated-inputs
(list go-gopkg-in-yaml-v3)))))
(define-public go-github-com-tdewolff-test
(package
(name "go-github-com-tdewolff-test")

1466
gnu/packages/golang-web.scm Normal file
View file

File diff suppressed because it is too large Load diff

1550
gnu/packages/golang.scm
View file

File diff suppressed because it is too large Load diff

9
gnu/packages/guile-xyz.scm
View file

@ -2267,7 +2267,7 @@ users and in some situations.")
(define-public guile-udev
(package
(name "guile-udev")
(version "0.2.4")
(version "0.3.0")
(source (origin
(method git-fetch)
(uri (git-reference
@ -2276,7 +2276,7 @@ users and in some situations.")
(file-name (git-file-name name version))
(sha256
(base32
"1q1snj8gz2bvqw2v2jvwlzn5xfh7f7wlp922isnzismrp4adc918"))))
"0zvn7ph6sbz5q8jnbkrxxlbxlyf0j8q34hr4a2yxklvg29ya7sd3"))))
(build-system gnu-build-system)
(arguments
(list
@ -2289,7 +2289,10 @@ users and in some situations.")
(substitute* (find-files "." "\\.scm")
(("load-extension \"libguile-udev\"")
(format #f "load-extension \"~a/lib/libguile-udev.so\""
#$output))))))))
#$output)))))
(delete 'check) ;moved after install
(add-after 'install 'check
(assoc-ref %standard-phases 'check)))))
(native-inputs (list autoconf
automake
gettext-minimal

1
gnu/packages/high-availability.scm
View file

@ -35,6 +35,7 @@
#:use-module (gnu packages gettext)
#:use-module (gnu packages glib)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages hardware)
#:use-module (gnu packages linux)
#:use-module (gnu packages lua)

44
gnu/packages/image.scm
View file

@ -1483,6 +1483,26 @@ channels.")
(base32
"1lvxnpds0vcf0lil6ia2036ghqlbl740c4d2sz0q5g6l93fjyija"))))
(build-system gnu-build-system)
(arguments
(if (and (target-riscv64?)
(%current-target-system))
(list #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'update-config-scripts
(lambda* (#:key inputs native-inputs #:allow-other-keys)
;; Replace outdated config.guess and config.sub.
(for-each (lambda (file)
(install-file
(search-input-file
(or native-inputs inputs)
(string-append "/bin/" file)) "."))
'("config.guess" "config.sub"))))))
'()))
(native-inputs
(if (and (target-riscv64?)
(%current-target-system))
(list config)
'()))
(propagated-inputs
;; These are all in the 'Libs.private' field of libmng.pc.
(list lcms libjpeg-turbo zlib))
@ -2205,20 +2225,24 @@ identical visual appearance.")
(define-public grim
(package
(name "grim")
(version "1.4.0")
(version "1.4.1")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/emersion/grim")
(url "https://git.sr.ht/~emersion/grim")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1b1k5cmmk7gzis0rncyl98lnhdwpjkdsv9pada5mmgxcpka6f0lp"))))
(base32 "1snp4qlj05d0nx4f0qr8kywv0i1xcw5i278ybng1rand2alhkjz5"))))
(build-system meson-build-system)
(native-inputs (list pkg-config scdoc))
(native-inputs (append (if (%current-target-system)
;; for wayland-scanner
(list pkg-config-for-build wayland)
'())
(list pkg-config scdoc)))
(inputs (list pixman libpng libjpeg-turbo wayland wayland-protocols))
(home-page "https://github.com/emersion/grim")
(home-page "https://sr.ht/~emersion/grim/")
(synopsis "Create screenshots from a Wayland compositor")
(description "grim can create screenshots from a Wayland compositor.")
;; MIT license.
@ -2227,7 +2251,7 @@ identical visual appearance.")
(define-public slurp
(package
(name "slurp")
(version "1.4.0")
(version "1.5.0")
(source
(origin
(method git-fetch)
@ -2236,10 +2260,14 @@ identical visual appearance.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "1i6g4dfiv2mwkjvvrx3wizb1n05xmd4j9nkhdii4klwd1gdrhjwd"))))
(base32 "0wlml42c3shma50bsvqzll7p3zn251jaf0jm59q2idks8gg1zkyq"))))
(build-system meson-build-system)
(native-inputs
(list pkg-config scdoc))
(append (if (%current-target-system)
;; for wayland-scanner
(list wayland pkg-config-for-build)
'())
(list pkg-config scdoc)))
(inputs
(list cairo libxkbcommon wayland wayland-protocols))
(home-page "https://github.com/emersion/slurp")

1
gnu/packages/ipfs.scm
View file

@ -30,6 +30,7 @@
#:use-module (guix build-system go)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages python)
#:use-module (gnu packages shells)
#:use-module (gnu packages syncthing))

28
gnu/packages/java.scm
View file

@ -13719,6 +13719,34 @@ Processing specification.")
;; with classpath exception
(license license:epl2.0)))
(define-public java-jakarta-annotations-api
(package
(name "java-jakarta-annotations-api")
(version "2.1.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/jakartaee/common-annotations-api")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"0xq2n2pijal5p75vl9dz10i6hhdmaxw5q8j3aza717xkpxxby9p6"))))
(build-system ant-build-system)
(arguments
`(#:jar-name "jakarta-annotations-api.jar"
#:source-dir "api/src/main/java"
#:tests? #f; no tests
#:jdk ,openjdk11))
(home-page "https://github.com/jakartaee/common-annotations-api")
(synopsis "Collection of Java annotations")
(description "Jakarta Annotations defines a collection of annotations
representing common semantic concepts that enable a declarative style of
programming that applies across a variety of Java technologies.")
;; with classpath exception
(license (list license:epl2.0
license:gpl2))))
(define-public java-xmp
(package
(name "java-xmp")

4
gnu/packages/linux.scm
View file

@ -527,7 +527,7 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(%upstream-linux-source version hash)
deblob-scripts-6.1)))
(define-public linux-libre-5.15-version "5.15.144")
(define-public linux-libre-5.15-version "5.15.145")
(define-public linux-libre-5.15-gnu-revision "gnu")
(define deblob-scripts-5.15
(linux-libre-deblob-scripts
@ -537,7 +537,7 @@ corresponding UPSTREAM-SOURCE (an origin), using the given DEBLOB-SCRIPTS."
(base32 "1idjrn2w8jrixj8ifkk1awxyyq5042nc4p2mld4rda96azlnp948")))
(define-public linux-libre-5.15-pristine-source
(let ((version linux-libre-5.15-version)
(hash (base32 "0fsv18q64q17ad7mq818wfhb11dax4bdvbvqyk5ilxyfmypsylzh")))
(hash (base32 "086nssif66s86wkixz4yb7xilz1k49g32l0ib28r8fjzc23rv95j")))
(make-linux-libre-source version
(%upstream-linux-source version hash)
deblob-scripts-5.15)))

40
gnu/packages/lisp-xyz.scm
View file

@ -3284,8 +3284,8 @@ C, C++, Java, Python, Erlang, Haskell, Objective-C, Diff, Webkit.")
(sbcl-package->ecl-package sbcl-colorize))
(define-public sbcl-3bmd
(let ((commit "4e08d82d7c8fb1b8fc708c87f4d9d13a1ab490cb")
(revision "3"))
(let ((commit "e68b2d442f29b4534c1c8e2f2cdf7583643a2fc5")
(revision "4"))
(package
(name "sbcl-3bmd")
(version (git-version "0.0.0" revision commit))
@ -3296,7 +3296,7 @@ C, C++, Java, Python, Erlang, Haskell, Objective-C, Diff, Webkit.")
(url "https://github.com/3b/3bmd")
(commit commit)))
(sha256
(base32 "1j885ykg2yds0l7dmw21lrhs7pd66lf541pf9lb677nkhc2f62jz"))
(base32 "12xqih1gnwsn1baqm7bq3kxss73phn06gvd0v1h1vwsjd1xgpq3g"))
(file-name (git-file-name "cl-3bmd" version))))
(build-system asdf-build-system/sbcl)
(arguments
@ -3666,11 +3666,11 @@ processes that doesn't run under Emacs. Lisp processes created by
(sbcl-package->ecl-package sbcl-slime-swank))
(define-public sbcl-mgl-pax
(let ((commit "ed82a80207b70801fab061f6592cf7d7355294a6")
(revision "0"))
(let ((commit "6782eb041c152721972420dfafa192692d16b7ce")
(revision "1"))
(package
(name "sbcl-mgl-pax")
(version (git-version "0.1.0" revision commit))
(version (git-version "0.3.0" revision commit))
(source
(origin
(method git-fetch)
@ -3678,7 +3678,7 @@ processes that doesn't run under Emacs. Lisp processes created by
(url "https://github.com/melisgl/mgl-pax")
(commit commit)))
(sha256
(base32 "008wfa70q68cj6npi4107mfjhjzfjmvrhm1x51jpndsn2165c5bx"))
(base32 "0fjbzc2fn17m80lfsc8121sa0bk7fg42fqlwhm01sk1fj4s48pma"))
(file-name (git-file-name "cl-mgl-pax" version))))
(build-system asdf-build-system/sbcl)
;; (native-inputs
@ -3690,7 +3690,8 @@ processes that doesn't run under Emacs. Lisp processes created by
sbcl-md5
sbcl-named-readtables
sbcl-pythonic-string-reader
sbcl-slime-swank))
sbcl-slime-swank
sbcl-trivial-utf-8))
(arguments
`(#:asd-systems '("mgl-pax"
"mgl-pax/navigate"
@ -18752,19 +18753,20 @@ attributes not supported by the Common Lisp standard functions.")
(sbcl-package->cl-source-package sbcl-file-attributes))
(define-public sbcl-filesystem-utils
(let ((commit "4455bb6c43f4433dd68a34ddad9ed5aa9b649243"))
(let ((commit "a07e8b61b89d4b46408fb9294d9b8130e8c8a02e")
(revision "2"))
(package
(name "sbcl-filesystem-utils")
(version (git-version "1.0.0" "1" commit))
(version (git-version "1.0.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Shinmera/filesystem-utils/")
(commit commit)))
(file-name (git-file-name "filesystem-utils" version))
(file-name (git-file-name "cl-filesystem-utils" version))
(sha256
(base32 "0rww9r26zh44qwmj0b4sl95jngdn2h0239x5gjzak3gpdc3i3nbr"))))
(base32 "1zv2i2gndnbs7hz3bgkkq1qfx604wbndpc7qqlqvg23fssn9w59f"))))
(build-system asdf-build-system/sbcl)
(inputs
(list sbcl-documentation-utils
@ -19939,8 +19941,8 @@ lQuery.")
(sbcl-package->cl-source-package sbcl-clip))
(define-public sbcl-pathname-utils
(let ((commit "13189c08f2480802a6cba207304c2e0cfdc57f47")
(revision "2"))
(let ((commit "f28068a79825f37002e96d13dfd739172382bf94")
(revision "3"))
(package
(name "sbcl-pathname-utils")
(version (git-version "1.1.0" revision commit))
@ -19952,7 +19954,7 @@ lQuery.")
(commit commit)))
(file-name (git-file-name "cl-pathname-utils" version))
(sha256
(base32 "0b5pjsrpfw0pmahi1zydzpaa5missg3cxqnyz4k6xwvk8fqscpha"))))
(base32 "10xs0wnnkbdiirr1cb7q7hzi2zmksfsrj0p7yws0j1l215vz8qs8"))))
(build-system asdf-build-system/sbcl)
(native-inputs
(list sbcl-parachute))
@ -26752,7 +26754,13 @@ inspired by Haskell package @code{Data.List}.")
sbcl-trivial-open-browser
sbcl-websocket-driver))
(arguments
'(#:asd-systems '("clog" "clog/docs" "clog/tools")))
'(#:asd-systems '("clog" "clog/docs" "clog/tools")
#:phases (modify-phases %standard-phases
(add-after 'unpack 'fix-symbol-name
(lambda _
(substitute* "source/clog-docs.lisp"
(("clog:@CLOG-MANUAL")
"clog::@CLOG_MANUAL")))))))
(home-page "https://github.com/rabbibotton/clog")
(synopsis "Common Lisp Omnificent GUI")
(description

124
gnu/packages/machine-learning.scm
View file

@ -1214,6 +1214,29 @@ an extensible computation graph model, as well as definitions of built-in
operators and standard data types.")
(license license:expat)))
(define-public onnx-for-torch2
(package
(inherit onnx)
(name "onnx")
(version "1.13.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/onnx/onnx")
(commit (string-append "v" version))))
(sha256
(base32
"16967dbq2j40diqd0s37r19llsab8q8vbxkg1ppgy0p9fpdhfhyp"))
(file-name (git-file-name name version))
(patches (search-patches "onnx-1.13.1-use-system-googletest.patch"
"onnx-shared-libraries.patch"))
(modules '((guix build utils)))
(snippet
'(begin
(delete-file-recursively "third_party")
(substitute* "onnx/backend/test/runner/__init__.py"
(("urlretrieve\\(.*") "raise unittest.SkipTest('Skipping download')\n"))))))))
(define-public python-onnx
;; This used to be called "python-onnx" because it provided nothing but
;; Python bindings. The package now provides shared libraries and C++
@ -1259,6 +1282,13 @@ aim is to provide all such passes along with ONNX so that they can be re-used
with a single function call.")
(license license:expat)))
(define-public onnx-optimizer-for-torch2
(package
(inherit onnx-optimizer)
(inputs
(modify-inputs (package-inputs onnx-optimizer)
(replace "onnx" onnx-for-torch2)))))
(define-public rxcpp
(package
(name "rxcpp")
@ -3878,6 +3908,34 @@ high-level machine learning frameworks, such as TensorFlow Lite,
TensorFlow.js, PyTorch, and MediaPipe.")
(license license:bsd-3))))
(define-public xnnpack-for-torch2
;; There's currently no tag on this repo.
(let ((version "0.0")
(commit "51a987591a6fc9f0fc0707077f53d763ac132cbf")
(revision "3"))
(package
(inherit xnnpack)
(name "xnnpack")
(version (git-version version revision commit))
(home-page "https://github.com/google/XNNPACK") ;fork of QNNPACK
(source (origin
(method git-fetch)
(uri (git-reference (url home-page) (commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"1rzby82xq8d0rl1d148yz88jh9cpsw5c8b2yw7yg39mi7qmr55rm"))
(patches (search-patches "xnnpack-for-torch2-system-libraries.patch"))))
(arguments
(list
#:tests? #false
#:configure-flags '(list "-DXNNPACK_USE_SYSTEM_LIBS=YES"
"-DBUILD_SHARED_LIBS=ON"
"-DCMAKE_POSITION_INDEPENDENT_CODE=ON"
"-DXNNPACK_LIBRARY_TYPE=shared"
"-DXNNPACK_BUILD_TESTS=FALSE" ;FIXME: see below
"-DXNNPACK_BUILD_BENCHMARKS=FALSE"))))))
;; Please also update python-torchvision when updating this package.
(define-public python-pytorch
(package
@ -4027,7 +4085,59 @@ PyTorch when needed.
Note: currently this package does not provide GPU support.")
(license license:bsd-3)))
(define-public python-pytorch-for-r-torch python-pytorch)
(define-public python-pytorch-for-r-torch
(package
(inherit python-pytorch)
(name "python-pytorch")
(version "2.0.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/pytorch/pytorch")
(commit (string-append "v" version))
(recursive? #t)))
(file-name (git-file-name name version))
(sha256
(base32
"14m7v54zyd2qg2xk9mqdpbf4ps7091mdzinzh4vq9p5k4bpznj65"))
(patches (search-patches "python-pytorch2-system-libraries.patch"
"python-pytorch-runpath.patch"))
(modules '((guix build utils)))
(snippet
'(begin
;; XXX: Let's be clear: this package is a bundling fest. We
;; delete as much as we can, but there's still a lot left.
(for-each (lambda (directory)
(delete-file-recursively
(string-append "third_party/" directory)))
'("benchmark" "cpuinfo" "eigen"
;; FIXME: QNNPACK (of which XNNPACK is a fork)
;; needs these.
;; "FP16" "FXdiv" "gemmlowp" "psimd"
"gloo" "googletest" "ios-cmake" "NNPACK"
"onnx" "protobuf" "pthreadpool"
"pybind11" "python-enum" "python-peachpy"
"python-six" "tbb" "XNNPACK" "zstd"))
(substitute* "caffe2/CMakeLists.txt"
(("target_link_libraries\\(\\$\\{test_name\\}_\\$\\{CPU_CAPABILITY\\} c10 sleef gtest_main\\)")
"target_link_libraries(${test_name}_${CPU_CAPABILITY} c10 sleef gtest gtest_main)"))
(substitute* "functorch/CMakeLists.txt"
(("\\$\\{_rpath_portable_origin\\}/../torch/lib")
"$ORIGIN/../torch/lib"))))))
(inputs
(modify-inputs (package-inputs python-pytorch)
(replace "xnnpack" xnnpack-for-torch2)))
(propagated-inputs
(modify-inputs (package-propagated-inputs python-pytorch)
(append python-filelock
python-jinja2
python-networkx
python-opt-einsum
python-sympy)
(replace "onnx" onnx-for-torch2)
(replace "onnx-optimizer" onnx-optimizer-for-torch2)))))
(define-public python-lightning-cloud
(package
@ -4440,18 +4550,22 @@ of Hidden Markov Models.")
;; Keep this in sync with the r-torch package.
(define-public liblantern
;; There has been no release or tagged commit for r-torch 0.12.0. The
;; selected commit corresponds to the 0.12.0 release.
(let ((commit "4d83bd087be581f7db321c27f55897ff021d2537")
(revision "1"))
(package
(name "liblantern")
(version "0.10.0")
(version (git-version "0.11.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/mlverse/torch")
(commit (string-append "v" version))))
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "12480fac9xq7rgw0q5f2cnvmakhakjsnq1gvh2ncjfwxz34n8fl7"))))
(base32 "1xxc6vr7sr2mg0va0hc2fs4f6v5b78mx43dp2shzzbcgw90mgpvk"))))
(build-system cmake-build-system)
(arguments
(list
@ -4503,7 +4617,7 @@ of Hidden Markov Models.")
(synopsis "C API to libtorch")
(description
"Lantern provides a C API to the libtorch machine learning library.")
(license license:expat)))
(license license:expat))))
(define-public python-lap
(package

1
gnu/packages/mail.scm
View file

@ -109,6 +109,7 @@
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages groff)
#:use-module (gnu packages gsasl)
#:use-module (gnu packages gtk)

6
gnu/packages/messaging.scm
View file

@ -2636,11 +2636,11 @@ replacement.")
(license license:gpl2+)))
(define-public tdlib
(let ((commit "4ed0b23c9c99868ab4d2d28e8ff244687f7b3144")
(let ((commit "27c3eaeb4964bd5f18d8488e354abde1a4383e49")
(revision "0"))
(package
(name "tdlib")
(version (git-version "1.8.20" revision commit))
(version (git-version "1.8.23" revision commit))
(source
(origin
(method git-fetch)
@ -2648,7 +2648,7 @@ replacement.")
(url "https://github.com/tdlib/td")
(commit commit)))
(sha256
(base32 "16kprlcnphi89yfwgnlaxjwwb1xx24az8xd710rx8cslb4zv00qw"))
(base32 "14f65dfmg2p5hyvi3lffvvazwcd3i3jrrw3c2pwrc5yfgxk3662g"))
(file-name (git-file-name name version))))
(build-system cmake-build-system)
(arguments

21
gnu/packages/mp3.scm
View file

@ -12,6 +12,7 @@
;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
;;; Copyright © 2022 John Kehayias <john.kehayias@protonmail.com>
;;; Copyright © 2022 Joeke de Graaf <joeke@posteo.net>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -161,7 +162,25 @@ This package contains the library.")
Version: ~a~@
Libs: -L${libdir} -lid3tag -lz~@
Cflags: -I${includedir}~%"
out ,version)))))))))
out ,version))))))
,@(if (and (%current-target-system)
(or (target-riscv64?)
(target-aarch64?)))
`((add-after 'unpack 'update-config
(lambda* (#:key native-inputs inputs #:allow-other-keys)
(for-each
(lambda (file)
(install-file
(search-input-file (or native-inputs inputs)
(string-append "/bin/" file))
"."))
'("config.guess" "config.sub")))))
'()))))
(native-inputs (if (and (%current-target-system)
(or (target-riscv64?)
(target-aarch64?)))
(list config)
'()))
(inputs (list zlib))
(synopsis "Library for reading ID3 tags")
(description

4
gnu/packages/mpd.scm
View file

@ -623,7 +623,7 @@ mpdevil loads all tags and covers on demand.")
(define-public mympd
(package
(name "mympd")
(version "13.0.5")
(version "13.0.6")
(source (origin
(method git-fetch)
(uri (git-reference
@ -632,7 +632,7 @@ mpdevil loads all tags and covers on demand.")
(file-name (git-file-name name version))
(sha256
(base32
"1ly3iw4irybfxyafgrldldwc28a879wwnd1pg32m2sgrwyhr0czm"))))
"17mx6qkdcnm4z6qw0ns8wmihahcnk3kidfcr6fapa34cdadsjapg"))))
(outputs '("out" "doc"))
(build-system cmake-build-system)
(arguments

1
gnu/packages/networking.scm
View file

@ -123,6 +123,7 @@
#:use-module (gnu packages gnome)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages graphviz)
#:use-module (gnu packages gstreamer)
#:use-module (gnu packages gtk)

1485
gnu/packages/ocaml.scm
View file

File diff suppressed because it is too large Load diff

75
gnu/packages/patches/emacs-haskell-mode-no-redefine-builtin.patch
View file

@ -1,75 +0,0 @@
From faa95a784d2c74c72e70367a5d531df6dd61aeab Mon Sep 17 00:00:00 2001
From: Steve Purcell <steve@sanityinc.com>
Date: Sun, 6 Aug 2023 16:41:48 +0200
Subject: [PATCH] Don't redefine built-in function
Fixes #1817
---
tests/haskell-indent-tests.el | 14 ++++++++------
tests/haskell-indentation-tests.el | 14 ++++++++------
2 files changed, 16 insertions(+), 12 deletions(-)
diff --git a/tests/haskell-indent-tests.el b/tests/haskell-indent-tests.el
index 7196405b8..9a3de4ad3 100644
--- a/tests/haskell-indent-tests.el
+++ b/tests/haskell-indent-tests.el
@@ -40,11 +40,13 @@
;; (haskell-indent-put-region-in-literate (point-min) (point-max) -1)
;; (buffer-substring-no-properties (point-min) (point-max))))))
-(defsubst string-trim-left (string)
- "Remove leading whitespace from STRING."
- (if (string-match "\\`[ \t\n\r]+" string)
- (replace-match "" t t string)
- string))
+(if (fboundp 'string-trim-left)
+ (defalias 'haskell--string-trim-left 'string-trim-left)
+ (defun haskell--string-trim-left (string &optional regexp)
+ "Remove leading whitespace from STRING."
+ (if (string-match (concat "\\`\\(?:" (or regexp "[ \t\n\r]+") "\\)") string)
+ (substring string (match-end 0))
+ string)))
(defun haskell-indent-format-info (info)
(if (cdr info)
@@ -128,7 +130,7 @@ macro quotes them for you."
:expected-result
,(if allow-failure :failed :passed)
(haskell-indent-check
- ,(string-trim-left source)
+ ,(haskell--string-trim-left source)
,@(mapcar (lambda (x)
(list 'quote x))
test-cases))))))
diff --git a/tests/haskell-indentation-tests.el b/tests/haskell-indentation-tests.el
index 4889b76a7..cd783a4f4 100644
--- a/tests/haskell-indentation-tests.el
+++ b/tests/haskell-indentation-tests.el
@@ -33,11 +33,13 @@
;;; Code:
-(defsubst string-trim-left (string)
- "Remove leading whitespace from STRING."
- (if (string-match "\\`[ \t\n\r]+" string)
- (replace-match "" t t string)
- string))
+(if (fboundp 'string-trim-left)
+ (defalias 'haskell--string-trim-left 'string-trim-left)
+ (defun haskell--string-trim-left (string &optional regexp)
+ "Remove leading whitespace from STRING."
+ (if (string-match (concat "\\`\\(?:" (or regexp "[ \t\n\r]+") "\\)") string)
+ (substring string (match-end 0))
+ string)))
(defun haskell-indentation-check (source &rest test-cases)
"Check if `haskell-indentation-find-indentations' returns expected results.
@@ -115,7 +117,7 @@ macro quotes them for you."
:expected-result
,(if allow-failure :failed :passed)
(haskell-indentation-check
- ,(string-trim-left source)
+ ,(haskell--string-trim-left source)
,@(mapcar (lambda (x)
(list 'quote x))
test-cases))))))

55
gnu/packages/patches/onnx-1.13.1-use-system-googletest.patch Normal file
View file

@ -0,0 +1,55 @@
ONNX will build googletest from a Git checkout. Patch CMake to use our
googletest package and enable tests by default.
diff --git a/CMakeLists.txt b/CMakeLists.txt
index 0aa9fda2..a573170c 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -22,7 +22,7 @@ option(BUILD_ONNX_PYTHON "Build Python binaries" OFF)
option(ONNX_GEN_PB_TYPE_STUBS "Generate protobuf python type stubs" ON)
option(ONNX_WERROR "Build with Werror" OFF)
option(ONNX_COVERAGE "Build with coverage instrumentation" OFF)
-option(ONNX_BUILD_TESTS "Build ONNX C++ APIs Tests" OFF)
+option(ONNX_BUILD_TESTS "Build ONNX C++ APIs Tests" ON)
option(ONNX_USE_LITE_PROTO "Use lite protobuf instead of full." OFF)
option(ONNXIFI_ENABLE_EXT "Enable onnxifi extensions." OFF)
if(NOT DEFINED ONNX_ML)
@@ -82,8 +82,10 @@ if(CMAKE_SYSTEM_NAME STREQUAL "AIX")
endif()
if(ONNX_BUILD_TESTS)
- list(APPEND CMAKE_MODULE_PATH ${ONNX_ROOT}/cmake/external)
- include(googletest)
+ find_package(GTest REQUIRED)
+ if(NOT GTest_FOUND)
+ message(FATAL_ERROR "cannot find googletest")
+ endif()
endif()
if((ONNX_USE_LITE_PROTO AND TARGET protobuf::libprotobuf-lite) OR ((NOT ONNX_USE_LITE_PROTO) AND TARGET protobuf::libprotobuf))
diff --git a/cmake/unittest.cmake b/cmake/unittest.cmake
index e29a93ff..ae146390 100644
--- a/cmake/unittest.cmake
+++ b/cmake/unittest.cmake
@@ -7,7 +7,7 @@
find_package(Threads)
-set(${UT_NAME}_libs ${googletest_STATIC_LIBRARIES})
+set(${UT_NAME}_libs ${GTEST_LIBRARIES})
list(APPEND ${UT_NAME}_libs onnx)
list(APPEND ${UT_NAME}_libs onnx_proto)
@@ -22,9 +22,9 @@
list(REMOVE_DUPLICATES _UT_SOURCES)
add_executable(${_UT_TARGET} ${_UT_SOURCES})
- add_dependencies(${_UT_TARGET} onnx onnx_proto googletest)
+ add_dependencies(${_UT_TARGET} onnx onnx_proto)
target_include_directories(${_UT_TARGET}
- PUBLIC ${googletest_INCLUDE_DIRS}
+ PUBLIC ${GTEST_INCLUDE_DIRS}
${ONNX_INCLUDE_DIRS}
${PROTOBUF_INCLUDE_DIRS}
${ONNX_ROOT}

156
gnu/packages/patches/python-pytorch2-system-libraries.patch Normal file
View file

@ -0,0 +1,156 @@
Use our own googletest rather than the bundled one.
Get NNPACK to use our own PeachPy rather than the bundled one.
diff --git a/caffe2/CMakeLists.txt b/caffe2/CMakeLists.txt
--- a/caffe2/CMakeLists.txt 2023-12-27 12:14:24.308751288 +0100
+++ b/caffe2/CMakeLists.txt 2023-12-27 12:30:15.941562126 +0100
@@ -1570,7 +1570,7 @@
add_executable(static_runtime_bench "${STATIC_RUNTIME_BENCHMARK_SRCS}")
add_executable(static_runtime_test "${STATIC_RUNTIME_TEST_SRCS}")
target_link_libraries(static_runtime_bench torch_library benchmark)
- target_link_libraries(static_runtime_test torch_library gtest_main)
+ target_link_libraries(static_runtime_test torch_library gtest_main gtest)
endif()
if(BUILD_TENSOREXPR_BENCHMARK)
@@ -1601,7 +1601,7 @@
foreach(test_src ${ATen_MOBILE_TEST_SRCS})
get_filename_component(test_name ${test_src} NAME_WE)
add_executable(${test_name} "${test_src}")
- target_link_libraries(${test_name} torch_library gtest_main)
+ target_link_libraries(${test_name} torch_library gtest_main gtest)
target_include_directories(${test_name} PRIVATE $<INSTALL_INTERFACE:include>)
target_include_directories(${test_name} PRIVATE $<BUILD_INTERFACE:${CMAKE_BINARY_DIR}/include>)
target_include_directories(${test_name} PRIVATE ${ATen_CPU_INCLUDE})
@@ -1628,7 +1628,7 @@
endif()
else()
add_executable(${test_name}_${CPU_CAPABILITY} "${test_src}")
- target_link_libraries(${test_name}_${CPU_CAPABILITY} torch_library gtest_main)
+ target_link_libraries(${test_name}_${CPU_CAPABILITY} torch_library gtest_main gtest)
endif()
target_include_directories(${test_name}_${CPU_CAPABILITY} PRIVATE $<INSTALL_INTERFACE:include>)
target_include_directories(${test_name}_${CPU_CAPABILITY} PRIVATE $<BUILD_INTERFACE:${CMAKE_BINARY_DIR}/include>)
@@ -1645,7 +1645,7 @@
foreach(test_src ${Caffe2_CPU_TEST_SRCS})
get_filename_component(test_name ${test_src} NAME_WE)
add_executable(${test_name} "${test_src}")
- target_link_libraries(${test_name} torch_library gtest_main)
+ target_link_libraries(${test_name} torch_library gtest_main gtest)
target_include_directories(${test_name} PRIVATE $<INSTALL_INTERFACE:include>)
target_include_directories(${test_name} PRIVATE $<BUILD_INTERFACE:${CMAKE_BINARY_DIR}/include>)
target_include_directories(${test_name} PRIVATE ${Caffe2_CPU_INCLUDE})
@@ -1666,7 +1666,7 @@
foreach(test_src ${Caffe2_MPS_TEST_SRCS})
get_filename_component(test_name ${test_src} NAME_WE)
add_executable(${test_name} "${test_src}")
- target_link_libraries(${test_name} torch_library gtest_main)
+ target_link_libraries(${test_name} torch_library gtest_main gtest)
target_include_directories(${test_name} PRIVATE $<INSTALL_INTERFACE:include>)
target_include_directories(${test_name} PRIVATE $<BUILD_INTERFACE:${CMAKE_BINARY_DIR}/include>)
target_include_directories(${test_name} PRIVATE ${Caffe2_CPU_INCLUDE})
diff --git a/cmake/Dependencies.cmake b/cmake/Dependencies.cmake
index 557ab649..ee9cf410 100644
--- a/cmake/Dependencies.cmake
+++ b/cmake/Dependencies.cmake
@@ -732,11 +732,6 @@ if(BUILD_TEST OR BUILD_MOBILE_BENCHMARK OR BUILD_MOBILE_TEST)
# this shouldn't be necessary anymore.
get_property(INC_DIR_temp DIRECTORY PROPERTY INCLUDE_DIRECTORIES)
set_property(DIRECTORY PROPERTY INCLUDE_DIRECTORIES "")
- add_subdirectory(${CMAKE_CURRENT_LIST_DIR}/../third_party/googletest)
- set_property(DIRECTORY PROPERTY INCLUDE_DIRECTORIES ${INC_DIR_temp})
-
- include_directories(BEFORE SYSTEM ${CMAKE_CURRENT_LIST_DIR}/../third_party/googletest/googletest/include)
- include_directories(BEFORE SYSTEM ${CMAKE_CURRENT_LIST_DIR}/../third_party/googletest/googlemock/include)
# We will not need to test benchmark lib itself.
set(BENCHMARK_ENABLE_TESTING OFF CACHE BOOL "Disable benchmark testing as we don't need it.")
@@ -1543,7 +1538,7 @@ if(CAFFE2_CMAKE_BUILDING_WITH_MAIN_REPO AND NOT INTERN_DISABLE_ONNX)
endif()
set_property(TARGET onnx_proto PROPERTY IMPORTED_LOCATION ${ONNX_PROTO_LIBRARY})
message("-- Found onnx: ${ONNX_LIBRARY} ${ONNX_PROTO_LIBRARY}")
- list(APPEND Caffe2_DEPENDENCY_LIBS onnx_proto onnx)
+ list(APPEND Caffe2_DEPENDENCY_LIBS onnx_proto onnx onnx_optimizer)
endif()
include_directories(${FOXI_INCLUDE_DIRS})
list(APPEND Caffe2_DEPENDENCY_LIBS foxi_loader)
diff --git a/cmake/External/nnpack.cmake b/cmake/External/nnpack.cmake
index a41343cb..6075bdd0 100644
--- a/cmake/External/nnpack.cmake
+++ b/cmake/External/nnpack.cmake
@@ -40,7 +40,7 @@ endif()
# (3) Android, iOS, Linux, macOS - supported
##############################################################################
-if(ANDROID OR IOS OR ${CMAKE_SYSTEM_NAME} STREQUAL "Linux" OR ${CMAKE_SYSTEM_NAME} STREQUAL "Darwin")
+if(FALSE)
message(STATUS "Brace yourself, we are building NNPACK")
set(CAFFE2_THIRD_PARTY_ROOT ${PROJECT_SOURCE_DIR}/third_party)
@@ -114,6 +114,5 @@ endif()
# (4) Catch-all: not supported.
##############################################################################
-message(WARNING "Unknown platform - I don't know how to build NNPACK. "
- "See cmake/External/nnpack.cmake for details.")
-set(USE_NNPACK OFF)
+set(NNPACK_FOUND TRUE)
+set(USE_NNPACK ON)
diff --git a/test/cpp/c10d/CMakeLists.txt b/test/cpp/c10d/CMakeLists.txt
index bf91460c..ef56948f 100644
--- a/test/cpp/c10d/CMakeLists.txt
+++ b/test/cpp/c10d/CMakeLists.txt
@@ -16,14 +16,14 @@ function(c10d_add_test test_src)
add_test(NAME ${test_name} COMMAND $<TARGET_FILE:${test_name}>)
endfunction()
-c10d_add_test(FileStoreTest.cpp torch_cpu gtest_main)
-c10d_add_test(TCPStoreTest.cpp torch_cpu gtest_main)
+c10d_add_test(FileStoreTest.cpp torch_cpu gtest_main gtest)
+c10d_add_test(TCPStoreTest.cpp torch_cpu gtest_main gtest)
if(INSTALL_TEST)
install(TARGETS FileStoreTest DESTINATION bin)
install(TARGETS TCPStoreTest DESTINATION bin)
endif()
if(NOT WIN32)
- c10d_add_test(HashStoreTest.cpp torch_cpu gtest_main)
+ c10d_add_test(HashStoreTest.cpp torch_cpu gtest_main gtest)
if(INSTALL_TEST)
install(TARGETS HashStoreTest DESTINATION bin)
endif()
@@ -31,11 +31,11 @@ endif()
if(USE_CUDA)
if(USE_GLOO AND USE_C10D_GLOO)
- c10d_add_test(ProcessGroupGlooTest.cpp torch_cpu c10d_cuda_test gtest_main)
+ c10d_add_test(ProcessGroupGlooTest.cpp torch_cpu c10d_cuda_test gtest_main gtest)
if(INSTALL_TEST)
install(TARGETS ProcessGroupGlooTest DESTINATION bin)
endif()
- c10d_add_test(ProcessGroupGlooAsyncTest.cpp torch_cpu c10d_cuda_test gtest_main)
+ c10d_add_test(ProcessGroupGlooAsyncTest.cpp torch_cpu c10d_cuda_test gtest_main gtest)
endif()
if(USE_NCCL AND USE_C10D_NCCL)
# NCCL is a private dependency of libtorch, but the tests include some
@@ -56,7 +56,7 @@ if(USE_CUDA)
endif()
else()
if(USE_GLOO AND USE_C10D_GLOO)
- c10d_add_test(ProcessGroupGlooTest.cpp torch_cpu gtest_main)
+ c10d_add_test(ProcessGroupGlooTest.cpp torch_cpu gtest_main gtest)
endif()
endif()
diff --git a/test/cpp/tensorexpr/CMakeLists.txt b/test/cpp/tensorexpr/CMakeLists.txt
index 8fc5a0a1..643202f6 100644
--- a/test/cpp/tensorexpr/CMakeLists.txt
+++ b/test/cpp/tensorexpr/CMakeLists.txt
@@ -53,7 +53,7 @@ target_include_directories(tutorial_tensorexpr PRIVATE ${ATen_CPU_INCLUDE})
# pthreadpool header. For some build environment we need add the dependency
# explicitly.
if(USE_PTHREADPOOL)
- target_link_libraries(test_tensorexpr PRIVATE pthreadpool_interface)
+ target_link_libraries(test_tensorexpr PRIVATE pthreadpool)
endif()
if(USE_CUDA)
target_link_libraries(test_tensorexpr PRIVATE

39
gnu/packages/patches/transmission-4.0.5-fix-build.patch Normal file
View file

@ -0,0 +1,39 @@
Fix the build with gtkmm 4:
https://github.com/transmission/transmission/issues/6392
Patch copied from upstream source repository:
https://github.com/transmission/transmission/commit/e116672b27b314d54514c96b1fa7aef1dee900b1
From e116672b27b314d54514c96b1fa7aef1dee900b1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?C=C5=93ur?= <coeur@gmx.fr>
Date: Sun, 17 Dec 2023 16:37:35 +0100
Subject: [PATCH] fix: build error on GTKMM-4 (#6393)
---
gtk/OptionsDialog.cc | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
diff --git a/gtk/OptionsDialog.cc b/gtk/OptionsDialog.cc
index 08198540c10..8c28fc76f98 100644
--- a/gtk/OptionsDialog.cc
+++ b/gtk/OptionsDialog.cc
@@ -338,7 +338,16 @@ void TorrentFileChooserDialog::onOpenDialogResponse(int response, Glib::RefPtr<S
bool const do_prompt = get_choice(std::string(ShowOptionsDialogChoice)) == "true";
bool const do_notify = false;
- auto const files = IF_GTKMM4(get_files2, get_files)();
+#if GTKMM_CHECK_VERSION(4, 0, 0)
+ auto files = std::vector<Glib::RefPtr<Gio::File>>();
+ auto files_model = get_files();
+ for (auto i = guint{ 0 }; i < files_model->get_n_items(); ++i)
+ {
+ files.push_back(gtr_ptr_dynamic_cast<Gio::File>(files_model->get_object(i)));
+ }
+#else
+ auto const files = get_files();
+#endif
g_assert(!files.empty());
/* remember this folder the next time we use this dialog */

2660
gnu/packages/patches/xnnpack-for-torch2-system-libraries.patch Normal file
View file

File diff suppressed because it is too large Load diff

4
gnu/packages/protobuf.scm
View file

@ -429,14 +429,14 @@ from protobuf specification files.")
(define-public python-protobuf
(package
(name "python-protobuf")
(version "3.20.1")
(version "3.20.2")
(source
(origin
(method url-fetch)
(uri (pypi-uri "protobuf" version))
(sha256
(base32
"1ja2vpk9nklllmsirmil2s4l7ni9yfqvbvj47zz5xx17s1k1bhxd"))))
"0l0p2lczs5iahgkhzm3298pjl49bk9iiwngkglg7ll7fkqqwlbbi"))))
(build-system python-build-system)
(inputs (list protobuf))
(arguments

27
gnu/packages/python-xyz.scm
View file

@ -5935,7 +5935,6 @@ flexibility and power of the Python language.")
(string-append "-Wl," "-rpath=" python "/lib")
"-fno-semantic-interposition"
"build/temp/tree/tree.o"
"-Wl,--whole-archive"
"-L" (string-append python "/lib")
(string-append abseil-cpp "/lib/libabsl_int128.a")
(string-append abseil-cpp "/lib/libabsl_raw_hash_set.a")
@ -5943,7 +5942,6 @@ flexibility and power of the Python language.")
(string-append abseil-cpp "/lib/libabsl_strings.a")
(string-append abseil-cpp "/lib/libabsl_strings_internal.a")
(string-append abseil-cpp "/lib/libabsl_throw_delegate.a")
"-Wl,--no-whole-archive"
"-o" "build/lib/tree/_tree.so")))))))
(home-page "https://github.com/deepmind/tree")
(synopsis "Work with nested data structures in Python")
@ -20288,6 +20286,31 @@ etc.")
support.")
(license license:bsd-3)))
(define-public python-pymemcache
(package
(name "python-pymemcache")
(version "4.0.0")
(source
(origin
(method url-fetch)
(uri (pypi-uri "pymemcache" version))
(sha256
(base32 "157z9blr8pjg9x84jph5hm0z2l6yaq6n421jcf1hzqn1pg8rpgr7"))))
(build-system pyproject-build-system)
(arguments
;; We don't have the zstd module.
(list
#:test-flags
'(list "--ignore=pymemcache/test/test_compression.py")))
(native-inputs
(list python-faker python-pytest python-pytest-cov))
(home-page "https://github.com/pinterest/pymemcache")
(synopsis "Comprehensive, fast, pure Python memcached client")
(description
"This package provides a comprehensive, fast, pure Python memcached
client.")
(license license:asl2.0)))
(define-public python-pymodbus
(package
(name "python-pymodbus")

48
gnu/packages/statistics.scm
View file

@ -716,13 +716,13 @@ nonlinear mixed-effects models.")
(define-public r-mgcv
(package
(name "r-mgcv")
(version "1.9-0")
(version "1.9-1")
(source
(origin
(method url-fetch)
(uri (cran-uri "mgcv" version))
(sha256
(base32 "0w1v0hdswb332xz3br1fcgacib7ddr4hb96cmlycxcpqq5w01cdj"))))
(base32 "0cnvbdda243as2bxfsgnnk7xjmp1msgr9i4vbd84jfnxpqvvq3vh"))))
(build-system r-build-system)
(propagated-inputs
(list r-matrix r-nlme))
@ -1178,14 +1178,14 @@ solution for sending email, including attachments, from within R.")
(define-public r-stringi
(package
(name "r-stringi")
(version "1.8.2")
(version "1.8.3")
(source
(origin
(method url-fetch)
(uri (cran-uri "stringi" version))
(sha256
(base32
"0bd7x9gl0rhpkpdi9j7a449dw2xsgczgbdj600658z5b6wq25l3a"))))
"09a964g8q3iphq24ln9c9g5158ynr75pfh3ghddarn0xvn7bw0hn"))))
(build-system r-build-system)
(inputs (list icu4c))
(native-inputs (list pkg-config))
@ -1408,13 +1408,13 @@ evaluation (NSE) in R.")
(define-public r-dbi
(package
(name "r-dbi")
(version "1.1.3")
(version "1.2.0")
(source (origin
(method url-fetch)
(uri (cran-uri "DBI" version))
(sha256
(base32
"13a2656w5j9shpcwa7gj2szy7nk9sajjhlisi5wdpgd57msk7frq"))))
"1g4c2qfyjwbjwbsczhk83xmx74764nn53gnqzb6xxrwqjbxj4dpn"))))
(build-system r-build-system)
(native-inputs
(list r-knitr))
@ -1560,13 +1560,13 @@ syntax that can be converted to XHTML or other formats.")
(define-public r-yaml
(package
(name "r-yaml")
(version "2.3.7")
(version "2.3.8")
(source (origin
(method url-fetch)
(uri (cran-uri "yaml" version))
(sha256
(base32
"1aw0cvaqw8a0d1r3cplj5kiabkcyz8fghcpi0ax8mi7rw0cv436j"))))
"1n1zlbnq3ldipnnm08whpvm8r21vxg4c9jzg7x7j3blw2pi7kl4y"))))
(build-system r-build-system)
(home-page "https://cran.r-project.org/web/packages/yaml/")
(synopsis "Methods to convert R data to YAML and back")
@ -2738,13 +2738,13 @@ SLURM and Sun Grid Engine. Multicore and SSH systems are also supported.")
(define-public r-brew
(package
(name "r-brew")
(version "1.0-8")
(version "1.0-10")
(source (origin
(method url-fetch)
(uri (cran-uri "brew" version))
(sha256
(base32
"09kq14nbaw0mmpb2vbfklz786q6lyizzkyg5bg64bmj2f1d2sr8i"))))
"13x3vnrhfcvr479r4dya61a5vcky2gb4kv2xbivy0ah39qrzg0a1"))))
(build-system r-build-system)
(home-page "https://cran.r-project.org/web/packages/brew")
(synopsis "Templating framework for report generation")
@ -3535,14 +3535,14 @@ statements.")
(define-public r-segmented
(package
(name "r-segmented")
(version "2.0-0")
(version "2.0-1")
(source
(origin
(method url-fetch)
(uri (cran-uri "segmented" version))
(sha256
(base32
"1j7flzav26ldhg50gzcx8azfh9sx4ay30g75ipq56vqibzc33fwd"))))
"0r3l39sihncrmhs6y3nydr6izp5ss86rfwjyhwf2x0clvqq2gkz9"))))
(build-system r-build-system)
(propagated-inputs (list r-mass r-nlme))
(home-page "https://cran.r-project.org/web/packages/segmented")
@ -4402,13 +4402,13 @@ t-probabilities, quantiles, random deviates and densities.")
(define-public r-matrixstats
(package
(name "r-matrixstats")
(version "1.1.0")
(version "1.2.0")
(source (origin
(method url-fetch)
(uri (cran-uri "matrixStats" version))
(sha256
(base32
"0h85hjvsmc8s3hyjdj83fykb2vl8jc7pb9ynp2xsl0q9v1sihrxl"))))
"0ws5lmzqm42vrn5791l21zr05l78x0xi6b89jw0gi0vjb4pc20z4"))))
(properties `((upstream-name . "matrixStats")))
(build-system r-build-system)
(arguments
@ -5190,13 +5190,13 @@ with alternating row colors) in LaTeX and HTML formats easily from
(define-public r-vipor
(package
(name "r-vipor")
(version "0.4.5")
(version "0.4.7")
(source (origin
(method url-fetch)
(uri (cran-uri "vipor" version))
(sha256
(base32
"112gc0d7f8iavgf56pnzfxb7hy75yhd0zlyjzshdcfbnqcd2a6bx"))))
"17hb6y1i9bva0fr4k9m6wncmnzdjad1b7fhsvfhva4xavpll3bds"))))
(build-system r-build-system)
(home-page "https://cran.r-project.org/web/packages/vipor")
(synopsis "Plot categorical data using noise and density estimates")
@ -5391,14 +5391,14 @@ Farebrother's algorithm or Liu et al.'s algorithm.")
(define-public r-cowplot
(package
(name "r-cowplot")
(version "1.1.1")
(version "1.1.2")
(source
(origin
(method url-fetch)
(uri (cran-uri "cowplot" version))
(sha256
(base32
"0j7d5vhzdxn1blrsfafx5z8lhq122rp8230hp9czrpsnnhjydp67"))))
"1ppsg3rbqz9a16zq87izdj5w8ylb6jb6v13xb01k7m3n2h4mv4f6"))))
(build-system r-build-system)
(propagated-inputs
(list r-ggplot2 r-gtable r-rlang r-scales))
@ -5779,14 +5779,14 @@ of the points.")
(define-public r-fpc
(package
(name "r-fpc")
(version "2.2-10")
(version "2.2-11")
(source
(origin
(method url-fetch)
(uri (cran-uri "fpc" version))
(sha256
(base32
"1lj7j74yx747iic1hcngzbym0sqxppja8bxw64m0j6na5s7m9d4r"))))
"06j1dzlf96qcaiqg8m5iah9rmwdppky04xjhs8k4rh0k12wr0mc2"))))
(build-system r-build-system)
(propagated-inputs
(list r-class
@ -6448,7 +6448,7 @@ can load multiple parameters to the current environment.")
(license license:gpl3+))))
(define-public r-tgutil
(let ((commit "0e4a2e84e5cf1f74bc66df0a3d8eac89633fd7b1")
(let ((commit "db4ff8b98082f8e4dbdeacb452641d215fd3c7ff")
(revision "1"))
(package
(name "r-tgutil")
@ -6461,7 +6461,7 @@ can load multiple parameters to the current environment.")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "0pmacpzhrigprlpl8b5j4xz7l110ifw98017xwk569dghbf8zrq1"))))
(base32 "00rsqs7f896piywh84jr8fkphbbx4jb7radf6znhhj6fip63yn91"))))
(properties `((upstream-name . "tgutil")))
(build-system r-build-system)
(propagated-inputs (list r-broom
@ -6481,7 +6481,9 @@ can load multiple parameters to the current environment.")
r-tidyr))
(home-page "https://github.com/tanaylab/tgutil")
(synopsis "Simple utility functions for Tanay lab code")
(description "Shared utility functions for multiple Tanay lab packages.")
(description
"This package provides simple utility functions that are shared
across several packages maintained by the Tanay lab.")
(license license:gpl3))))
(define-public r-catterplots

1
gnu/packages/uucp.scm
View file

@ -19,6 +19,7 @@
(define-module (gnu packages uucp)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages texinfo)
#:use-module (guix licenses)
#:use-module (guix packages)

5
gnu/packages/version-control.scm
View file

@ -107,6 +107,7 @@
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-check)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages groff)
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz)
@ -1440,7 +1441,7 @@ management by roles and individual account maintenance.")
(define-public shflags
(package
(name "shflags")
(version "1.2.3")
(version "1.3.0")
(source (origin
(method git-fetch)
(uri (git-reference
@ -1449,7 +1450,7 @@ management by roles and individual account maintenance.")
(file-name (git-file-name name version))
(sha256
(base32
"1ydx0sb6vz9s2dgp5bd64y7fpzh9qvmlfjxrbmzac8saknijrlly"))))
"0jj0zkly8yg42b8jvih2cmmafv95vm8mv80n3dyalvr5i14lzqd8"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; no tests

57
gnu/packages/vim.scm
View file

@ -470,11 +470,13 @@ trouble using them, because you do not have to remember each snippet name.")
"0av2m075n6z05ah9ndrgnp9s16yrz6n2lj0igd9fh3c5k41x5xks"))))
(build-system vim-build-system)
(arguments
'(#:plugin-name "coqtail"
`(#:plugin-name "coqtail"
#:vim ,vim-full ; Plugin needs Python 3.
#:phases
(modify-phases %standard-phases
(add-before 'install 'check
(lambda* (#:key inputs native-inputs tests? #:allow-other-keys)
(lambda* (#:key inputs native-inputs tests? vim? neovim?
#:allow-other-keys)
(when tests?
(display "Running Python unit tests.\n")
(setenv "PYTHONPATH" (string-append (getcwd) "/python"))
@ -488,23 +490,27 @@ trouble using them, because you do not have to remember each snippet name.")
"vim-vader"))
(vader-path (string-append
vim-vader
"/share/vim/vimfiles/pack/guix/start/vader")))
(with-directory-excursion "tests/vim"
(setenv "VADER_PATH" vader-path)
(invoke (string-append
(assoc-ref (or native-inputs inputs) "vim-full")
"/bin/vim")
"-E" "-Nu" "vimrc"
(if vim?
"/share/vim/vimfiles"
"/share/nvim/site")
"/pack/guix/start/vader"))
(command `(,@(if vim? '("vim" "-E") '())
,@(if neovim? '("nvim" "--headless") '())
"-Nu" "vimrc"
"-c" "Vader! *.vader")))
(with-directory-excursion "tests/vim"
(when neovim?
(setenv "HOME" (getcwd)))
(setenv "VADER_PATH" vader-path)
(apply invoke command)))
;; Remove __pycache__ files generated during testing so that
;; they don't get installed.
(delete-file-recursively "python/__pycache__")))))))
(native-inputs
`(("coq-for-coqtail" ,coq-for-coqtail)
("python-pytest" ,python-pytest)
("vim-full" ,vim-full) ; Plugin needs Python 3.
("vim-vader" ,vim-vader)))
(list coq-for-coqtail
python-pytest
vim-vader))
(propagated-inputs (list coq coq-ide-server))
(synopsis "Interactive Coq proofs in Vim")
(description "Coqtail enables interactive Coq proof development in Vim
@ -512,6 +518,18 @@ similar to CoqIDE or ProofGeneral.")
(home-page "https://github.com/whonore/Coqtail")
(license license:expat))))
(define-public neovim-coqtail
(package
(inherit vim-coqtail)
(name "neovim-coqtail")
(synopsis "Interactive Coq proofs in Neovim")
(description "Coqtail enables interactive Coq proof development in Neovim
similar to CoqIDE or ProofGeneral.")
(native-inputs
(modify-inputs (package-native-inputs vim-coqtail)
(replace "vim-vader" neovim-vader)
(append python-minimal python-pynvim)))))
(define-public vim-fugitive
(package
(name "vim-fugitive")
@ -1509,7 +1527,7 @@ operations are available for most filetypes.")
#:phases
(modify-phases %standard-phases
(add-before 'install 'check
(lambda* (#:key tests? #:allow-other-keys)
(lambda* (#:key tests? vim? neovim? #:allow-other-keys)
(when tests?
;; FIXME: suite1.vader fails with an unknown reason,
;; lang-if.vader requires Python and Ruby.
@ -1519,9 +1537,11 @@ operations are available for most filetypes.")
(display "Running Vim tests\n")
(with-directory-excursion "test"
(setenv "VADER_TEST_VIM" "vim -E")
(when vim?
(setenv "VADER_TEST_VIM" "vim -E"))
(when neovim?
(setenv "VADER_TEST_VIM" "nvim --headless"))
(invoke "bash" "./run-tests.sh"))))))))
(native-inputs (list vim))
(home-page "https://github.com/junegunn/vader.vim")
(synopsis "Test framework for Vimscript")
(description "Vader is a test framework for Vimscript designed to
@ -1531,6 +1551,11 @@ be integrated with @acronym{CI, Continuous Integration} pipelines to
automate testing and is compatible with Vim and Neovim.")
(license license:expat)))) ;; Specified in README.md.
(define-public neovim-vader
(package
(inherit vim-vader)
(name "neovim-vader")))
(define-public vim-jedi-vim
(package
(name "vim-jedi-vim")

7
gnu/packages/vulkan.scm
View file

@ -6,6 +6,7 @@
;;; Copyright © 2021 Mathieu Othacehe <othacehe@gnu.org>
;;; Copyright © 2022 Kaelyn Takata <kaelyn.alexi@protonmail.com>
;;; Copyright © 2022 dan <i@dan.games>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -270,7 +271,9 @@ interpretation of the specifications for these languages.")
(dirname (dirname
(search-input-directory
%build-inputs "include/vulkan"))))
"-DBUILD_TESTS=ON")
#$@(if (%current-target-system)
#~("-DBUILD_TESTS=OFF" "-DUSE_GAS=OFF")
#~("-DBUILD_TESTS=ON")))
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-pkg-config-file
@ -299,7 +302,7 @@ interpretation of the specifications for these languages.")
python
wayland))
(inputs
(list vulkan-headers))
(list vulkan-headers libxrandr))
(home-page
"https://github.com/KhronosGroup/Vulkan-Loader")
(synopsis "Khronos official ICD loader and validation layers for Vulkan")

5
gnu/packages/web.scm
View file

@ -142,6 +142,7 @@
#:use-module (gnu packages gnunet)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages golang)
#:use-module (gnu packages golang-web)
#:use-module (gnu packages gperf)
#:use-module (gnu packages graphviz)
#:use-module (gnu packages gtk)
@ -5159,7 +5160,7 @@ It uses the uwsgi protocol for all the networking/interprocess communications.")
(define-public jq
(package
(name "jq")
(version "1.7")
(version "1.7.1")
(source
(origin
(method url-fetch)
@ -5167,7 +5168,7 @@ It uses the uwsgi protocol for all the networking/interprocess communications.")
"/releases/download/jq-" version
"/jq-" version ".tar.gz"))
(sha256
(base32 "0qnv8k9x8i6i24n9vx3cxgw0yjj1411silc4wksfcinrfmlhsaj0"))
(base32 "1hl0wppdwwrqf3gzg3xwc260s7i1br2lnc97zr1k8bpx56hrr327"))
(modules '((guix build utils)))
(snippet
;; Remove bundled onigurama.

105
gnu/packages/wine.scm
View file

@ -304,7 +304,7 @@ integrate Windows applications into your desktop.")
(define-public wine-staging-patchset-data
(package
(name "wine-staging-patchset-data")
(version "8.0")
(version "8.18")
(source
(origin
(method git-fetch)
@ -313,10 +313,10 @@ integrate Windows applications into your desktop.")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "11q9fa1jdrv1pd9piaicgqvidq1c08imkwpqhyzcj5r711rl7581"))))
(base32 "0qabyw5139xdfsvzbwbrn1nnqssgwk8mn88mxnq2cdkk9gbjvq56"))))
(build-system trivial-build-system)
(native-inputs
(list bash coreutils))
(list coreutils))
(arguments
`(#:modules ((guix build utils))
#:builder
@ -324,16 +324,12 @@ integrate Windows applications into your desktop.")
(use-modules (guix build utils))
(let* ((build-directory ,(string-append name "-" version))
(source (assoc-ref %build-inputs "source"))
(bash (assoc-ref %build-inputs "bash"))
(coreutils (assoc-ref %build-inputs "coreutils"))
(out (assoc-ref %outputs "out"))
(wine-staging (string-append out "/share/wine-staging")))
(copy-recursively source build-directory)
(with-directory-excursion build-directory
(substitute* "patches/patchinstall.sh"
(("/bin/sh")
(string-append bash "/bin/sh")))
(substitute* "patches/gitapply.sh"
(substitute* '("patches/gitapply.sh" "staging/patchinstall.py")
(("/usr/bin/env")
(string-append coreutils "/bin/env"))))
(copy-recursively build-directory wine-staging)
@ -363,7 +359,7 @@ integrate Windows applications into your desktop.")
"wine-" wine-version ".tar.xz"))
(file-name (string-append name "-" wine-version ".tar.xz"))
(sha256
(base32 "0bkr3klvjy8h4djddr31fvapsi9pc2rsiyhaa7j1lwpq704w4wh2")))))
(base32 "1nv06awb3hv26v64nqnks9yiz7w368scxznj77vxa3zpmhafzyih")))))
(inputs (modify-inputs (package-inputs wine)
(prepend autoconf ; for autoreconf
ffmpeg
@ -373,6 +369,9 @@ integrate Windows applications into your desktop.")
python
util-linux ; for hexdump
wine-staging-patchset-data)))
(native-inputs
(modify-inputs (package-native-inputs wine)
(prepend python-3)))
(arguments
(substitute-keyword-arguments (package-arguments wine)
((#:phases phases)
@ -382,7 +381,7 @@ integrate Windows applications into your desktop.")
(lambda* (#:key inputs #:allow-other-keys)
(invoke (search-input-file
inputs
"/share/wine-staging/patches/patchinstall.sh")
"/share/wine-staging/staging/patchinstall.py")
"DESTDIR=."
"--all")))
(add-after 'apply-wine-staging-patches 'patch-SHELL
@ -417,7 +416,7 @@ integrated into the main branch.")
(lambda* (#:key inputs #:allow-other-keys)
(invoke (search-input-file
inputs
"/share/wine-staging/patches/patchinstall.sh")
"/share/wine-staging/staging/patchinstall.py")
"DESTDIR=."
"--all")))
(add-after 'apply-wine-staging-patches 'patch-SHELL
@ -425,87 +424,3 @@ integrated into the main branch.")
(synopsis "Implementation of the Windows API (staging branch, WoW64
version)")
(supported-systems '("x86_64-linux" "aarch64-linux"))))
(define dxvk32
;; This package provides 32-bit dxvk libraries on 64-bit systems.
(package
(name "dxvk32")
(version "1.5.5")
(home-page "https://github.com/doitsujin/dxvk/")
(source (origin
(method git-fetch)
(uri (git-reference
(url home-page)
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1inl0qswgvbp0fs76md86ilqf9mbshkpjm8ga81khn9zd6v3fvan"))))
(build-system meson-build-system)
(arguments
`(#:system "i686-linux"
#:configure-flags (list "--cross-file"
(string-append (assoc-ref %build-inputs "source")
"/build-wine32.txt"))))
(native-inputs
`(("glslang" ,glslang)))
(inputs
`(("wine" ,wine-staging)))
(synopsis "Vulkan-based D3D9, D3D10 and D3D11 implementation for Wine")
(description "A Vulkan-based translation layer for Direct3D 9/10/11 which
allows running complex 3D applications with high performance using Wine.
Use @command{setup_dxvk} to install the required libraries to a Wine prefix.")
(supported-systems '("x86_64-linux"))
(license license:zlib)))
(define-public dxvk
(package
(inherit dxvk32)
(name "dxvk")
(arguments
`(#:configure-flags (list "--cross-file"
(string-append (assoc-ref %build-inputs "source")
"/build-wine"
,(match (%current-system)
("x86_64-linux" "64")
(_ "32"))
".txt"))
#:phases
(modify-phases %standard-phases
,@(if (string=? (%current-system) "x86_64-linux")
`((add-after 'unpack 'install-32
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(dxvk32 (assoc-ref inputs "dxvk32")))
(mkdir-p (string-append out "/lib32"))
(copy-recursively (string-append dxvk32 "/lib")
(string-append out "/lib32"))
#t))))
'())
(add-after 'install 'install-setup
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin/setup_dxvk")))
(mkdir-p (string-append out "/bin"))
(copy-file "../source/setup_dxvk.sh"
bin)
(chmod bin #o755)
(substitute* bin
(("wine=\"wine\"")
(string-append "wine=" (assoc-ref inputs "wine") "/bin/wine"))
(("x32") ,(match (%current-system)
("x86_64-linux" "../lib32")
(_ "../lib")))
(("x64") "../lib"))))))))
(inputs
`(("wine" ,(match (%current-system)
;; ("x86_64-linux" wine64)
("x86_64-linux" wine64-staging)
;; ("x86_64-linux" mingw-w64-x86_64)
(_ wine)))
,@(match (%current-system)
("x86_64-linux"
`(("dxvk32" ,dxvk32)))
(_ '()))))
(supported-systems '("i686-linux" "x86_64-linux"))))

12
gnu/packages/wm.scm
View file

@ -41,7 +41,7 @@
;;; Copyright © 2020 B. Wilson <elaexuotee@wilsonb.com>
;;; Copyright © 2020 Niklas Eklund <niklas.eklund@posteo.net>
;;; Copyright © 2020 Robert Smith <robertsmith@posteo.net>
;;; Copyright © 2021 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2021, 2023 Zheng Junjie <873216071@qq.com>
;;; Copyright © 2021 Sharlatan Hellseher <sharlatanus@gmail.com>
;;; Copyright © 2021 qblade <qblade@protonmail.com>
;;; Copyright © 2021 lasnesne <lasnesne@lagunposprasihopre.org>
@ -1845,8 +1845,14 @@ corners, shadows, inactive window dimming, etc.")
(sha256
(base32 "03jrjwlwxkcyd6m9a1bbwapasnz7b7aws7h0y6jigjm4m478phv6"))))
(build-system meson-build-system)
(inputs (list cairo gdk-pixbuf libxkbcommon linux-pam wayland))
(native-inputs (list pango pkg-config scdoc wayland-protocols))
(inputs (append (if (%current-target-system)
(list wayland-protocols)
'())
(list cairo gdk-pixbuf libxkbcommon linux-pam wayland)))
(native-inputs (append (if (%current-target-system)
(list pkg-config-for-build wayland)
'())
(list pango pkg-config scdoc wayland-protocols)))
(home-page "https://github.com/swaywm/sway")
(synopsis "Screen locking utility for Wayland compositors")
(description "Swaylock is a screen locking utility for Wayland compositors.")

57
gnu/packages/xdisorg.scm
View file

@ -118,6 +118,7 @@
#:use-module (gnu packages gnome)
#:use-module (gnu packages gtk)
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz)
#:use-module (gnu packages haskell-xyz)
#:use-module (gnu packages icu4c)
#:use-module (gnu packages image)
@ -2931,6 +2932,62 @@ can optionally use some appearance settings from XSettings, tint2 and GTK.")
(home-page "https://jgmenu.github.io/")
(license license:gpl2)))
(define-public x-resize
(package
(name "x-resize")
(version "0.2")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.com/Apteryks/x-resize")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"10y2p55m5hbrma01kixsppq1a3ld0q1jk8hwx1d1jfgw9vd243j8"))))
(build-system gnu-build-system)
(arguments
(list
#:tests? #f ;no test suite
#:modules `(((guix build guile-build-system)
#:select (target-guile-effective-version))
,@%gnu-build-system-modules
(srfi srfi-26))
#:phases
(with-imported-modules `((guix build guile-build-system)
,@%gnu-build-system-modules)
#~(modify-phases %standard-phases
(add-after 'install 'wrap
(lambda* (#:key inputs #:allow-other-keys)
(let* ((version (target-guile-effective-version))
(site-ccache (string-append "/lib/guile/" version
"/site-ccache"))
(site (string-append "/share/guile/site/" version))
(dep-path
(lambda (env path)
(list env '=
(map (cut string-append <> path)
(list #$output
#$(this-package-input
"guile-lib")
#$(this-package-input
"guile-udev"))))))
(bin (string-append #$output "/bin/")))
(wrap-program (string-append bin "x-resize")
(dep-path "GUILE_LOAD_PATH" site)
(dep-path "GUILE_LOAD_COMPILED_PATH" site-ccache)
(dep-path "GUILE_EXTENSIONS_PATH" "/lib")))))))))
(native-inputs (list autoconf automake guile-3.0 pkg-config))
(inputs (list guile-lib guile-udev xrandr))
(home-page "https://gitlab.com/Apteryks/x-resize/")
(synopsis "Dynamic display resizing leveraging udev events")
(description "The @command{x-resize} command detects physical display
resolution changes via udev and invokes the @command{xrandr} command to
reconfigure the active display resolution accordingly. It can be used to
implement dynamic resize support for desktop environments that lack native
support such as Xfce.")
(license license:gpl3+)))
(define-public xwallpaper
(package
(name "xwallpaper")

22
gnu/packages/xorg.scm
View file

@ -5677,11 +5677,29 @@ The XCB util-keysyms module provides the following library:
"0nza1csdvvxbmk8vgv8vpmq7q8h05xrw3cfx9lwxd1hjzd47xsf6"))))
(build-system gnu-build-system)
(arguments
'(#:configure-flags '("--disable-static")))
`(#:configure-flags '("--disable-static")
,@(if (and (%current-target-system)
(target-riscv64?))
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'update-config-scripts
(lambda* (#:key inputs native-inputs #:allow-other-keys)
;; Replace outdated config.guess and config.sub.
(for-each (lambda (file)
(install-file
(search-input-file
(or native-inputs inputs)
(string-append "/bin/" file)) "."))
'("config.guess" "config.sub"))))))
'())))
(propagated-inputs
(list libxcb))
(native-inputs
(list pkg-config))
(append (if (and (%current-target-system)
(target-riscv64?))
(list config)
'())
(list pkg-config)))
(home-page "https://cgit.freedesktop.org/xcb/util-renderutil/")
(synopsis "Convenience functions for the Render extension")
(description

12
gnu/services/docker.scm
View file

@ -61,6 +61,8 @@
oci-container-service-type
oci-container-shepherd-service))
(define-maybe file-like)
(define-configuration docker-configuration
(docker
(file-like docker)
@ -87,6 +89,9 @@ loop-back communications.")
(environment-variables
(list '())
"Environment variables to set for dockerd")
(config-file
(maybe-file-like)
"JSON configuration file to pass to dockerd")
(no-serialization))
(define %docker-accounts
@ -131,7 +136,8 @@ loop-back communications.")
(enable-iptables? (docker-configuration-enable-iptables? config))
(environment-variables (docker-configuration-environment-variables config))
(proxy (docker-configuration-proxy config))
(debug? (docker-configuration-debug? config)))
(debug? (docker-configuration-debug? config))
(config-file (docker-configuration-config-file config)))
(shepherd-service
(documentation "Docker daemon.")
(provision '(dockerd))
@ -144,6 +150,10 @@ loop-back communications.")
(start #~(make-forkexec-constructor
(list (string-append #$docker "/bin/dockerd")
"-p" "/var/run/docker.pid"
#$@(if (not (eq? config-file %unset-value))
(list #~(string-append
"--config-file=" #$config-file))
'())
#$@(if debug?
'("--debug" "--log-level=debug")
'())

24
gnu/system/examples/vm-image.tmpl
View file

@ -8,7 +8,7 @@
(use-modules (gnu) (guix) (srfi srfi-1))
(use-service-modules desktop mcron networking spice ssh xorg sddm)
(use-package-modules bootloaders certs fonts
package-management xorg)
package-management xdisorg xorg)
(define vm-image-motd (plain-file "motd" "
\x1b[1;37mThis is the GNU system. Welcome!\x1b[0m
@ -25,18 +25,6 @@ Run '\x1b[1;37minfo guix\x1b[0m' to browse documentation.
accounts.\x1b[0m
"))
;;; XXX: Xfce does not implement what is needed for the SPICE dynamic
;;; resolution to work (see:
;;; https://gitlab.xfce.org/xfce/xfce4-settings/-/issues/142). Workaround it
;;; by manually invoking xrandr every second.
(define auto-update-resolution-crutch
#~(job '(next-second)
(lambda ()
(setenv "DISPLAY" ":0.0")
(setenv "XAUTHORITY" "/home/guest/.Xauthority")
(execl (string-append #$xrandr "/bin/xrandr") "xrandr" "-s" "0"))
#:user "guest"))
(operating-system
(host-name "gnu")
(timezone "Etc/UTC")
@ -77,7 +65,12 @@ accounts.\x1b[0m
root ALL=(ALL) ALL
%wheel ALL=NOPASSWD: ALL\n"))
(packages (append (list font-bitstream-vera nss-certs)
(packages
(append (list font-bitstream-vera nss-certs
;; Auto-started script providing SPICE dynamic resizing for
;; Xfce (see:
;; https://gitlab.xfce.org/xfce/xfce4-settings/-/issues/142).
x-resize)
%base-packages))
(services
@ -104,9 +97,6 @@ root ALL=(ALL) ALL
;; integration with the host, etc.
(service spice-vdagent-service-type)
(simple-service 'cron-jobs mcron-service-type
(list auto-update-resolution-crutch))
;; Use the DHCP client service rather than NetworkManager.
(service dhcp-client-service-type))

20
guix/import/cran.scm
View file

@ -85,6 +85,21 @@
(define %input-style
(make-parameter 'variable)) ; or 'specification
(define (format-inputs inputs)
"Generate a sorted list of package inputs from a list of upstream inputs."
(map (lambda (input)
(case (%input-style)
((specification)
`(specification->package ,(upstream-input-name input)))
(else
((compose string->symbol
upstream-input-downstream-name)
input))))
(sort inputs
(lambda (a b)
(string-ci<? (upstream-input-name a)
(upstream-input-name b))))))
(define (string->licenses license-string license-prefix)
(let ((licenses
(map string-trim-both
@ -177,9 +192,7 @@ package definition."
(()
'())
((package-inputs ...)
`((,input-type (list ,@(map (compose string->symbol
upstream-input-downstream-name)
package-inputs)))))))
`((,input-type (list ,@(format-inputs package-inputs)))))))
(define %cran-url "https://cran.r-project.org/web/packages/")
(define %cran-canonical-url "https://cran.r-project.org/package=")
@ -396,6 +409,7 @@ empty list when the FIELD cannot be found."
"gnu"
"posix.1-2001"
"linux"
"libR"
"none"
"unix"
"windows"

2843
po/doc/guix-cookbook.de.po
View file

File diff suppressed because it is too large Load diff

31609
po/doc/guix-manual.de.po
View file

File diff suppressed because one or more lines are too long

31669
po/doc/guix-manual.fr.po
View file

File diff suppressed because one or more lines are too long

16
po/guix/de.po
View file

@ -14,7 +14,7 @@ msgstr ""
"Project-Id-Version: guix 1.2.0-pre3\n"
"Report-Msgid-Bugs-To: bug-guix@gnu.org\n"
"POT-Creation-Date: 2023-06-19 03:18+0000\n"
"PO-Revision-Date: 2023-07-31 12:09+0000\n"
"PO-Revision-Date: 2023-12-31 16:35+0000\n"
"Last-Translator: Florian Pelz <pelzflorian@pelzflorian.de>\n"
"Language-Team: German <https://translate.fedoraproject.org/projects/guix/guix/de/>\n"
"Language: de\n"
@ -22,7 +22,7 @@ msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Plural-Forms: nplurals=2; plural=n != 1;\n"
"X-Generator: Weblate 4.18.2\n"
"X-Generator: Weblate 5.3.1\n"
"X-Bugs: Report translation errors to the Language-Team address.\n"
#: gnu.scm:81
@ -573,7 +573,7 @@ msgstr "Als Salt-Wert muss eine Zeichenkette mit ~d Zeichen verwendet werden"
#: gnu/services/file-sharing.scm:670
#, scheme-format
msgid "Wait period expired; killing transmission-daemon (pid ~a).~%"
msgstr "Wait-period abgelaufen; transmission-daemon wird abgewürgt (PID ~a).~%"
msgstr "Wait-period abgelaufen; transmission-daemon wird erzwungen beendet (PID ~a).~%"
#: gnu/services/file-sharing.scm:673
msgid ""
@ -783,7 +783,7 @@ msgstr ""
"damit das Wurzeldateisystem ohne Schreibrechte erneut eingebunden werden\n"
"kann („Remount“), bevor ein Neustart oder Anhalten des Systems durchgeführt\n"
"wird. Prozesse, die ein paar Sekunden nach @code{SIGTERM} immer noch laufen,\n"
"werden mit @code{SIGKILL} abgewürgt."
"werden mit @code{SIGKILL} erzwungen beendet."
#: gnu/services/samba.scm:161
msgid ""
@ -1851,7 +1851,7 @@ msgstr "Externer Befehl ~s fehlgeschlagen mit Exit-Code ~a."
#: gnu/installer/newt.scm:134
#, scheme-format
msgid "External command ~s terminated by signal ~a"
msgstr "Externer Befehl ~s abgewürgt durch Signal ~a"
msgstr "Externer Befehl ~s erzwungen beendet durch Signal ~a"
#: gnu/installer/newt.scm:137
#, scheme-format
@ -2807,7 +2807,7 @@ msgstr "Befehl ~s hat mit Exit-Code ~a geendet"
#: gnu/installer/utils.scm:207
#, scheme-format
msgid "Command ~s killed by signal ~a"
msgstr "Befehl ~s abgewürgt durch Signal ~a"
msgstr "Befehl ~s erzwungen beendet durch Signal ~a"
#: gnu/installer/utils.scm:213
#, scheme-format
@ -7594,7 +7594,7 @@ msgstr "~a: Befehl wurde durch Signal ~a angehalten~%"
#: guix/scripts/deploy.scm:228
#, scheme-format
msgid "~a: command terminated with signal ~a~%"
msgstr "~a: Befehl wurde durch Signal ~a abgewürgt~%"
msgstr "~a: Befehl wurde durch Signal ~a erzwungen beendet~%"
#: guix/scripts/deploy.scm:232
#, scheme-format
@ -7722,7 +7722,7 @@ msgstr "Kein solcher Prozess ~d~%"
#: guix/scripts/container/exec.scm:108 guix/scripts/home.scm:463
#, scheme-format
msgid "process terminated with signal ~a~%"
msgstr "Prozess wurde durch Signal ~a abgewürgt~%"
msgstr "Prozess wurde durch Signal ~a erzwungen beendet~%"
#: guix/scripts/container/exec.scm:110 guix/scripts/home.scm:465
#, scheme-format

8
po/guix/es.po
View file

@ -17,15 +17,15 @@ msgstr ""
"Project-Id-Version: guix 1.2.0-pre3\n"
"Report-Msgid-Bugs-To: bug-guix@gnu.org\n"
"POT-Creation-Date: 2023-06-19 03:18+0000\n"
"PO-Revision-Date: 2023-10-23 10:36+0000\n"
"Last-Translator: Alejandro Alcaide <alex@blueselene.com>\n"
"PO-Revision-Date: 2023-12-08 17:44+0000\n"
"Last-Translator: Florian Pelz <pelzflorian@pelzflorian.de>\n"
"Language-Team: Spanish <https://translate.fedoraproject.org/projects/guix/guix/es/>\n"
"Language: es\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Plural-Forms: nplurals=2; plural=n != 1;\n"
"X-Generator: Weblate 5.0.2\n"
"X-Generator: Weblate 5.2.1\n"
"X-Bugs: Report translation errors to the Language-Team address.\n"
#: gnu.scm:81
@ -316,7 +316,7 @@ msgstr "el dispositivo mapeado '~a' puede ser soslayado por el cargador de arran
#: gnu/system.scm:665
#, scheme-format
msgid "List elements of the field 'swap-devices' should now use the <swap-space> record, as the old method is deprecated. See \"(guix) operating-system Reference\" for more details.~%"
msgstr "Lista de elementos del campo 'swap-devices' que deberían usar ahora el registro <swap-space> puesto que el viejo método está obsoleto. See \"(guix) Referencia del sistema operativo\" para más detalles.~%"
msgstr "Lista de elementos del campo 'swap-devices' que deberían usar ahora el registro <swap-space> puesto que el viejo método está obsoleto. See \"(guix.es) Referencia de operating-system\" para más detalles.~%"
#: gnu/system.scm:1155
#, scheme-format

118
po/guix/it.po
View file

@ -8,21 +8,22 @@
# Tobias Geerinckx-Rice <fedora@tobias.gr>, 2023.
# Florian Pelz <pelzflorian@pelzflorian.de>, 2023.
# Giacomo Leidi <goodoldpaul@autistici.org>, 2023.
# mm mmmm <rimarko@libero.it>, 2023.
#: guix/diagnostics.scm:159
msgid ""
msgstr ""
"Project-Id-Version: GNU guix\n"
"Report-Msgid-Bugs-To: bug-guix@gnu.org\n"
"POT-Creation-Date: 2023-06-19 03:18+0000\n"
"PO-Revision-Date: 2023-10-09 07:36+0000\n"
"Last-Translator: Giacomo Leidi <goodoldpaul@autistici.org>\n"
"PO-Revision-Date: 2023-12-28 01:36+0000\n"
"Last-Translator: mm mmmm <rimarko@libero.it>\n"
"Language-Team: Italian <https://translate.fedoraproject.org/projects/guix/guix/it/>\n"
"Language: it\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Plural-Forms: nplurals=2; plural=n != 1;\n"
"X-Generator: Weblate 5.0.2\n"
"X-Generator: Weblate 5.3\n"
#: gnu.scm:81
#, scheme-format
@ -4286,8 +4287,8 @@ msgid ""
"Usage: guix package [OPTION]...\n"
"Install, remove, or upgrade packages in a single transaction.\n"
msgstr ""
"Utilizzo: pacchetto giux [OPTION]...\n"
"Installare, rimuovere, o aggiornare i pacchetti in una singola trascrizione.\n"
"Utilizzo: guix pacchetto [OPZIONE]...\n"
"Installa, rimuovi, o aggiorna pacchetti in una singola transazione.\n"
#: guix/scripts/package.scm:431
msgid ""
@ -4296,8 +4297,8 @@ msgid ""
" install PACKAGEs"
msgstr ""
"\n"
" -i, --installare PACKAGE ... \n"
" installare PACKAGEs"
" -i, --install PACCHETTO ...\n"
" installa uno o più pacchetti"
#: guix/scripts/package.scm:434
msgid ""
@ -4307,7 +4308,7 @@ msgid ""
msgstr ""
"\n"
" -e, --install-from-expression=EXP\n"
" installa il pacchetto che EXP valuta come"
" installa il pacchetto corrispondente al valore di EXP"
#: guix/scripts/package.scm:437
msgid ""
@ -4317,9 +4318,9 @@ msgid ""
" evaluates to"
msgstr ""
"\n"
" -f, --installazione -da-file=FILE \n"
" installa il pacchetto il cui codice all'interno di FILE \n"
" valuta a"
" -f, --install-from-file=FILE\n"
" installa il pacchetto corrispondente al valore restituito\n"
" dal codice in FILE"
#: guix/scripts/package.scm:441
msgid ""
@ -4328,8 +4329,8 @@ msgid ""
" remove PACKAGEs"
msgstr ""
"\n"
" -r, --rimuovere PACKAGE ... \n"
" rimiovere PACKAGEs"
" -r, --remove PACCHETTO ...\n"
" rimuove uno o più pacchetti"
#: guix/scripts/package.scm:444
msgid ""
@ -4337,7 +4338,7 @@ msgid ""
" -u, --upgrade[=REGEXP] upgrade all the installed packages matching REGEXP"
msgstr ""
"\n"
" -u, --aggiornamento[=REGEXP] aggiornare tutti i pacchetti valutando REGEXP"
" -u, --upgrade[=REGEXP] aggiorna tutti i pacchetti installati che corrispondono a REGEXP"
#: guix/scripts/package.scm:446
msgid ""
@ -4346,8 +4347,8 @@ msgid ""
" from FILE"
msgstr ""
"\n"
" -m, --manifest=FILE creare un nuovo profilo generazione con il manifesto \n"
" da FILE"
" -m, --manifest=FILE crea una nuova generazione profilo con il manifesto \n"
" contenuto in FILE"
#: guix/scripts/package.scm:449 guix/scripts/upgrade.scm:41
msgid ""
@ -4355,7 +4356,7 @@ msgid ""
" --do-not-upgrade[=REGEXP] do not upgrade any packages matching REGEXP"
msgstr ""
"\n"
" --do-not-upgrade[=REGEXP] non aggiornare nessun pacchetto valutando REGEXP"
" --do-not-upgrade[=REGEXP] non aggiornare i pacchetti corrispondenti a REGEXP"
#: guix/scripts/package.scm:451 guix/scripts/pull.scm:105
msgid ""
@ -4363,7 +4364,7 @@ msgid ""
" --roll-back roll back to the previous generation"
msgstr ""
"\n"
" --roll-back tornare alla generazione precedente"
" --roll-back torna alla generazione precedente"
#: guix/scripts/package.scm:453
msgid ""
@ -4373,7 +4374,7 @@ msgid ""
msgstr ""
"\n"
" --search-paths[=KIND] \n"
" mostrare le definizioni delle variabili necessarie"
" mostra le definizioni delle variabili ambiente necessarie"
#: guix/scripts/package.scm:456 guix/scripts/pull.scm:100
msgid ""
@ -4382,8 +4383,8 @@ msgid ""
" list generations matching PATTERN"
msgstr ""
"\n"
" -l, --list-generations[=MUSTER] \n"
" valutare le liste generazioni PATTERN"
" -l, --list-generations[=PATTERN] \n"
" elenca le generazioni che corrispondono a PATTERN"
#: guix/scripts/package.scm:459 guix/scripts/pull.scm:107
msgid ""
@ -4419,7 +4420,7 @@ msgid ""
" --export-channels print channels for the chosen profile"
msgstr ""
"\n"
" --esportazione dei canali stampa i canali per il profilo scelto"
" --export-channels stampa i canali per il profilo scelto"
#: guix/scripts/package.scm:469 guix/scripts/install.scm:34
#: guix/scripts/remove.scm:33 guix/scripts/upgrade.scm:37
@ -4428,7 +4429,7 @@ msgid ""
" -p, --profile=PROFILE use PROFILE instead of the user's default profile"
msgstr ""
"\n"
" -p, --profilo=PROFILE utilizzare PROFILO invece del profilo predefinito dell'utente"
" -p, --profile=PROFILE usa PROFILO invece del profilo predefinito dell'utente"
#: guix/scripts/package.scm:471
msgid ""
@ -4436,7 +4437,7 @@ msgid ""
" --list-profiles list the user's profiles"
msgstr ""
"\n"
" --elenco-profili elenca i profili dell'utente"
" --list-profiles elenca i profili dell'utente"
#: guix/scripts/package.scm:474
msgid ""
@ -4444,7 +4445,7 @@ msgid ""
" --allow-collisions do not treat collisions in the profile as an error"
msgstr ""
"\n"
" --ammettere- le collisioni non trattare le collisioni nel profilo come un errore"
" --allow-collisions non trattare le collisioni nel profilo come un errore"
#: guix/scripts/package.scm:476
msgid ""
@ -4452,7 +4453,7 @@ msgid ""
" --bootstrap use the bootstrap Guile to build the profile"
msgstr ""
"\n"
" --bootstrap usa il bootstrap Guile per costruire il profilo"
" --bootstrap usa il Guile di bootstrap per costruire il profilo"
#: guix/scripts/package.scm:481
msgid ""
@ -4460,7 +4461,7 @@ msgid ""
" -s, --search=REGEXP search in synopsis and description using REGEXP"
msgstr ""
"\n"
" -s, --search=REGEXP ricerca nella sinossi e nella descrizione utilizzando REGEXP"
" -s, --search=REGEXP ricerca nella sinossi e nella descrizione usando REGEXP"
#: guix/scripts/package.scm:483
msgid ""
@ -4469,7 +4470,7 @@ msgid ""
" list installed packages matching REGEXP"
msgstr ""
"\n"
" -I, --elenco-installati[=REGEXP]\n"
" -I, --list-installed[=REGEXP]\n"
" elenca i pacchetti installati che corrispondono a REGEXP"
#: guix/scripts/package.scm:486
@ -4479,7 +4480,7 @@ msgid ""
" list available packages matching REGEXP"
msgstr ""
"\n"
" -A, --elenco-disponibile[=REGEXP]\n"
" -A, --list-available[=REGEXP]\n"
" elenca i pacchetti disponibili che corrispondono a REGEXP"
#: guix/scripts/package.scm:489
@ -4488,7 +4489,7 @@ msgid ""
" --show=PACKAGE show details about PACKAGE"
msgstr ""
"\n"
" --show=PACKAGE mostra i dettagli del PACKAGE"
" --show=PACKAGE mostra i dettagli di un pacchetto"
#: guix/scripts/package.scm:544
#, scheme-format
@ -4518,7 +4519,7 @@ msgstr "~a~@[@~a~]: pacchetto non trovato~%"
#: guix/scripts/package.scm:964 guix/scripts/pull.scm:724
#, scheme-format
msgid "cannot switch to generation '~a'~%"
msgstr "non può passare alla generazione '~a'~%"
msgstr "non posso passare alla generazione '~a'~%"
#: guix/scripts/package.scm:1045
#, scheme-format
@ -4537,7 +4538,7 @@ msgid ""
"Install the given PACKAGES.\n"
"This is an alias for 'guix package -i'.\n"
msgstr ""
"Uso: guix install [OPTION] PACKAGES...\n"
"Uso: guix install [OPZIONE] PACCHETTI...\n"
"Installa i PACCHETTI indicati.\n"
"È un alias di 'guix package -i'.\n"
@ -4553,13 +4554,13 @@ msgid ""
"Remove the given PACKAGES.\n"
"This is an alias for 'guix package -r'.\n"
msgstr ""
"Uso: guix remove [OPTION] PACKAGES...\n"
"Uso: guix remove [OPZIONE] PACCHETTI...\n"
"Rimuove i PACCHETTI indicati.\n"
"È un alias di 'guix package -r'.\n"
#: guix/scripts/remove.scm:67
msgid "remove installed packages"
msgstr "Rimuo ere pacchetti installati"
msgstr "rimuove pacchetti installati"
#: guix/scripts/upgrade.scm:34
msgid ""
@ -4567,21 +4568,21 @@ msgid ""
"Upgrade packages that match REGEXP.\n"
"This is an alias for 'guix package -u'.\n"
msgstr ""
"Uso: guix upgrade [OPTION] [REGEXP]\n"
"Uso: guix upgrade [OPZIONE] [REGEXP]\n"
"Aggiorna i pacchetti che corrispondono a REGEXP.\n"
"È un alias di \"guix package -u\".\n"
#: guix/scripts/upgrade.scm:75
msgid "upgrade packages to their latest version"
msgstr ""
msgstr "aggiorna i pacchetti alla loro ultima versione"
#: guix/scripts/search.scm:31
msgid ""
"Usage: guix search [OPTION] REGEXPS...\n"
"Search for packages matching REGEXPS."
msgstr ""
"Uso: guix search [OPTION] REGEXPS...\n"
"Cerca i pacchetti che corrispondono a REGEXPS."
"Uso: guix search [OPZIONE] REGEXPS...\n"
"Cerca i pacchetti che corrispondono alle date REGEXPS."
#: guix/scripts/search.scm:33
msgid ""
@ -4592,10 +4593,8 @@ msgstr ""
"È un alias di 'guix package -s'.\n"
#: guix/scripts/search.scm:61
#, fuzzy
#| msgid "Updater for CPAN packages"
msgid "search for packages"
msgstr "Aggiorna i pacchetti CPAN"
msgstr "cerca pacchetti"
#: guix/scripts/search.scm:74
#, scheme-format
@ -4620,7 +4619,7 @@ msgstr ""
#: guix/scripts/show.scm:60
msgid "show information about packages"
msgstr ""
msgstr "mostra informazioni sui pacchetti"
#: guix/scripts/show.scm:73
#, scheme-format
@ -4642,8 +4641,8 @@ msgid ""
" collect at least MIN bytes of garbage"
msgstr ""
"\n"
" -C, -raccogliere la spazzatura[=MIN]\n"
" raccoglie almeno MIN byte di spazzatura"
" -C, --collect-garbage[=MIN]\n"
" raccoglie almeno MIN bytes di spazzatura"
#: guix/scripts/gc.scm:56
msgid ""
@ -4651,7 +4650,7 @@ msgid ""
" -F, --free-space=FREE attempt to reach FREE available space in the store"
msgstr ""
"\n"
" -F, --free-space=FREE cerca di raggiungere lo spazio libero disponibile nell'archivio"
" -F, --free-space=FREE cerca di raggiungere il valore di spazio libero dato nell'archivio"
#: guix/scripts/gc.scm:58
msgid ""
@ -4669,7 +4668,7 @@ msgid ""
" -D, --delete attempt to delete PATHS"
msgstr ""
"\n"
" -D, -cancella tenta di cancellare i PERCORSI"
" -D, --delete tenta di cancellare i PERCORSI dati"
#: guix/scripts/gc.scm:63
msgid ""
@ -4677,7 +4676,7 @@ msgid ""
" --list-roots list the user's garbage collector roots"
msgstr ""
"\n"
" --list-roots Elenca le radici del garbage collector dell'utente"
" --list-roots elenca le radici del garbage collector dell'utente"
#: guix/scripts/gc.scm:65
msgid ""
@ -4693,7 +4692,7 @@ msgid ""
" --optimize optimize the store by deduplicating identical files"
msgstr ""
"\n"
" --ottimizza ottimizza l'archivio deduplicando i file identici"
" --optimize ottimizza l'archivio deduplicando i file identici"
#: guix/scripts/gc.scm:69
msgid ""
@ -4709,7 +4708,7 @@ msgid ""
" --list-live list live paths"
msgstr ""
"\n"
" - -list-live elenco percorsi live"
" --list-live elenca i percorsi vivi"
#: guix/scripts/gc.scm:74
msgid ""
@ -4717,7 +4716,7 @@ msgid ""
" --references list the references of PATHS"
msgstr ""
"\n"
" -referenze Elencare le referenze di PATHS"
" --references elenca i riferimenti di PATHS"
#: guix/scripts/gc.scm:76
msgid ""
@ -4725,7 +4724,7 @@ msgid ""
" -R, --requisites list the requisites of PATHS"
msgstr ""
"\n"
" -R, --requisiti elenca i requisiti dei PATHS"
" -R, --requisites elenca i requisiti dei PATHS"
#: guix/scripts/gc.scm:78
msgid ""
@ -4733,7 +4732,7 @@ msgid ""
" --referrers list the referrers of PATHS"
msgstr ""
"\n"
" —referenti elenca i referenti di PATHS"
" —referrers elenca i referenti di PATHS"
#: guix/scripts/gc.scm:80
msgid ""
@ -4741,9 +4740,10 @@ msgid ""
" --derivers list the derivers of PATHS"
msgstr ""
"\n"
" —drivers elenca i driver di PATHS"
" —derivers elenca i derivatori di PATHS"
#: guix/scripts/gc.scm:83
#, fuzzy
msgid ""
"\n"
" --verify[=OPTS] verify the integrity of the store; OPTS is a\n"
@ -4751,9 +4751,9 @@ msgid ""
" 'contents'"
msgstr ""
"\n"
" --verify[=OPTS] verifica l'integrità dell'archivio; OPTS è una combinazione di\n"
" una combinazione separata da virgole di \"riparazione\" e \n"
" 'contenuto'"
" --verify[=OPTS] verify the integrity of the store; OPTS is a\n"
" comma-separated combination of 'repair' and\n"
" 'contents'"
#: guix/scripts/gc.scm:87
msgid ""
@ -4761,7 +4761,7 @@ msgid ""
" --list-failures list cached build failures"
msgstr ""
"\n"
" —list-failure lista di errori rilevati nelle build"
" —list-failures elenca le build non andate a buon fine"
#: guix/scripts/gc.scm:89
msgid ""
@ -4772,11 +4772,15 @@ msgstr ""
" —clear-failures rimuovere PATHS dal set degli errori rilevati"
#: guix/scripts/gc.scm:92
#, fuzzy
msgid ""
"\n"
" --vacuum-database repack the sqlite database tracking the store\n"
" using less space"
msgstr ""
"\n"
" --vacuum-database repack the sqlite database tracking the store\n"
" using less space"
#: guix/scripts/gc.scm:107
#, scheme-format

84
po/guix/ja.po
View file

@ -3,13 +3,14 @@
# This file is distributed under the same license as the GNU guix package.
# ROCKTAKEY <rocktakey@gmail.com>, 2022, 2023.
# Florian Pelz <pelzflorian@pelzflorian.de>, 2023.
# Yūtenji <yuta@59ry.jp>, 2023.
#: guix/diagnostics.scm:159
msgid ""
msgstr ""
"Project-Id-Version: GNU guix\n"
"Report-Msgid-Bugs-To: bug-guix@gnu.org\n"
"POT-Creation-Date: 2023-06-19 03:18+0000\n"
"PO-Revision-Date: 2023-08-04 09:21+0000\n"
"PO-Revision-Date: 2023-12-22 13:52+0000\n"
"Last-Translator: ROCKTAKEY <rocktakey@gmail.com>\n"
"Language-Team: Japanese <https://translate.fedoraproject.org/projects/guix/guix/ja/>\n"
"Language: ja\n"
@ -17,7 +18,7 @@ msgstr ""
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Plural-Forms: nplurals=1; plural=0;\n"
"X-Generator: Weblate 4.18.2\n"
"X-Generator: Weblate 5.3\n"
#: gnu.scm:81
#, scheme-format
@ -252,7 +253,7 @@ msgstr "サービス型'~a'のサービスがみつかりません"
#: gnu/system.scm:217
#, scheme-format
msgid "the 'hosts-file' field is deprecated, please use 'hosts-service-type' instead~%"
msgstr ""
msgstr "'hosts-file'フィールドは非推奨です。代わりに'hosts-service-type'を使ってください~%"
#: gnu/system.scm:397
#, scheme-format
@ -367,13 +368,11 @@ msgstr ""
#: gnu/services/base.scm:713
#, scheme-format
msgid "host name '~a' contains invalid characters"
msgstr ""
msgstr "ホスト名 '~a' に無効な文字が含まれています"
#: gnu/services/base.scm:763
#, fuzzy
#| msgid "Populate the @file{/etc} directory."
msgid "Populate the @file{/etc/hosts} file."
msgstr "@file{/etc}ディレクトリを追加します。"
msgstr "@file{/etc/hosts}ファイルを追加します。"
#: gnu/services/base.scm:780
msgid "Initialize the machine's host name."
@ -627,9 +626,8 @@ msgstr ""
"サービス設定の'stop-wait-period'の値を増やす必要があるかもしれません。)\n"
#: gnu/services/file-sharing.scm:687
#, fuzzy
msgid "Service transmission-daemon has been asked to reload its settings file."
msgstr "transmission-daemonサービスは設定ファイルをリロードするよう要求されています"
msgstr "transmission-daemonサービスは設定ファイルをリロードするよう要求されています。"
#: gnu/services/file-sharing.scm:689
msgid "Service transmission-daemon is not running."
@ -641,7 +639,7 @@ msgstr "BitTorrentプロトコルを利用してファイルを共有します
#: gnu/services/networking.scm:297
msgid "Add a list of known Facebook hosts to @file{/etc/hosts}"
msgstr ""
msgstr "既知のFacebookのホストのリストを@file{/etc/hosts}に追加します"
#: gnu/services/networking.scm:359
#, scheme-format
@ -729,7 +727,7 @@ msgstr "@uref{https://torproject.org, Tor}匿名ネットワークデーモン
#: gnu/services/networking.scm:1164
#, scheme-format
msgid "the 'iwd?' field is deprecated, please use 'shepherd-requirement' field instead~%"
msgstr ""
msgstr "'iwd?'フィールドは非推奨です。代わりに'shepherd-requirement'フィールドを使ってください~%"
#: gnu/services/networking.scm:1312
msgid ""
@ -2339,7 +2337,7 @@ msgstr ""
#: gnu/installer/newt/partition.scm:394
msgid "Please enter the desired mounting point for this partition. Leave this field empty if you don't want to set a mounting point."
msgstr ""
msgstr "このパーティションに必要なマウントポイントを入力してください。マウントポイントを設定したくない場合は、このフィールドを空のままにしてください。"
#: gnu/installer/newt/partition.scm:396
msgid "Mounting point"
@ -2366,7 +2364,7 @@ msgstr ""
#: gnu/installer/newt/partition.scm:647
#, scheme-format
msgid "Are you sure you want to delete everything on disk ~a?"
msgstr ""
msgstr "本当にディスク ~a をすべて削除してもよろしいですか？"
#: gnu/installer/newt/partition.scm:649
msgid "Delete disk"
@ -2391,11 +2389,14 @@ msgid ""
"\n"
"At least one partition must have its mounting point set to '/'."
msgstr ""
"ディスクを選択して ENTER を押すと、ディスクのパーティションテーブルを変更できます。また、パーティションを選択して ENTER を押すことで編集したり、DELETE を押すことで削除することもできます。新しいパーティションを作成するには、空き領域を選択して ENTER を押します。\n"
"\n"
"少なくとも1つのパーティションのマウントポイントを '/' に設定する必要があります。"
#: gnu/installer/newt/partition.scm:693
#, scheme-format
msgid "This is the proposed partitioning. It is still possible to edit it or to go back to install menu by pressing the Exit button.~%~%"
msgstr ""
msgstr "これが提案されたパーティション分割です。編集することも、終了ボタンを押してインストールメニューに戻ることも可能です。~%~%"
#: gnu/installer/newt/partition.scm:703
msgid "Guided partitioning"
@ -2444,11 +2445,11 @@ msgstr ""
#: gnu/installer/newt/services.scm:39
msgid "Please select the desktop environment(s) you wish to install. If you select multiple desktop environments here, you will be able to choose from them later when you log in."
msgstr ""
msgstr "インストールするデスクトップ環境を選択してください。 ここで複数のデスクトップ環境を選択した場合、後でログインする際に選択できるようになります。"
#: gnu/installer/newt/services.scm:42
msgid "Desktop environment"
msgstr ""
msgstr "デスクトップ環境"
#: gnu/installer/newt/services.scm:57
msgid "You can now select networking services to run on your system."
@ -2487,11 +2488,11 @@ msgstr ""
#: gnu/installer/newt/substitutes.scm:32
msgid "Enable"
msgstr ""
msgstr "有効にする"
#: gnu/installer/newt/substitutes.scm:32
msgid "Disable"
msgstr ""
msgstr "無効にする"
#: gnu/installer/newt/substitutes.scm:33
msgid ""
@ -2499,6 +2500,9 @@ msgid ""
"\n"
" There are no security risks: only genuine substitutes may be retrieved from those servers. However, eavesdroppers on your LAN may be able to see what software you are installing."
msgstr ""
" このオプションをオンにすると、Guixのインストール中に、公式サーバに加えて、ローカルエリアネットワーク (LAN) 上で発見されたサーバから代理生成物(ビルド済みバイナリ)を取得することを許可します。 これにより、ダウンロードのスループットが向上します。\n"
"\n"
" セキュリティ上のリスクはありません: これらのサーバから取得できるのは、本物の代理生成物だけです。 しかし、LAN上の盗聴者は、あなたがインストールしているソフトウェアを見ることができるかもしれません。"
#: gnu/installer/newt/timezone.scm:59
msgid "Please select a timezone."
@ -2518,7 +2522,7 @@ msgstr ""
#: gnu/installer/newt/user.scm:53
msgid "Password"
msgstr ""
msgstr "パスワード"
#: gnu/installer/newt/user.scm:124
msgid "Empty inputs are not allowed."
@ -2552,11 +2556,11 @@ msgstr ""
#: gnu/installer/newt/user.scm:206
msgid "Add"
msgstr ""
msgstr "追加"
#: gnu/installer/newt/user.scm:207
msgid "Delete"
msgstr ""
msgstr "削除"
#: gnu/installer/newt/user.scm:267
msgid "Please create at least one user."
@ -3122,57 +3126,73 @@ msgid ""
"\n"
" --rounds=N build N times in a row to detect non-determinism"
msgstr ""
"\n"
" --rounds=N 非決定性を検知するため、N回連続で構築します"
#: guix/scripts/build.scm:182
msgid ""
"\n"
" -c, --cores=N allow the use of up to N CPU cores for the build"
msgstr ""
"\n"
" -c, --cores=N 構築の際に、最大N個のCPUコアの使用を許可します"
#: guix/scripts/build.scm:184
msgid ""
"\n"
" -M, --max-jobs=N allow at most N build jobs"
msgstr ""
"\n"
" -M, --max-jobs=N 最大でN個の構築ジョブが存在することを許可します"
#: guix/scripts/build.scm:186
msgid ""
"\n"
" --debug=LEVEL produce debugging output at LEVEL"
msgstr ""
"\n"
" --debug=LEVEL LEVELで指定されたレベルのデバッグ出力を生成します"
#: guix/scripts/build.scm:190
msgid ""
"\n"
" --list-targets list available targets"
msgstr ""
"\n"
" --list-targets 利用可能な対象を列挙します"
#: guix/scripts/build.scm:192
msgid ""
"\n"
" --target=TRIPLET cross-build for TRIPLET--e.g., \"aarch64-linux-gnu\""
msgstr ""
"\n"
" --target=TRIPLET TRIPLETに指定された環境を対象に、クロスビルドを行います。TRIPLETには、\"aarch64-linux-gnu\"なような三つ組を指定します"
#: guix/scripts/build.scm:196
msgid ""
"\n"
" --list-systems list available systems"
msgstr ""
"\n"
" --list-systems 利用可能なシステムを列挙します"
#: guix/scripts/build.scm:198
msgid ""
"\n"
" -s, --system=SYSTEM attempt to build for SYSTEM--e.g., \"i686-linux\""
msgstr ""
"\n"
" -s, --system=SYSTEM SYSTEMに指定されたシステム用に構築を試みます。SYSTEMには \"i686-linux\" のような文字列を指定します"
#: guix/scripts/build.scm:215
msgid "'--keep-failed' ignored since you are talking to a remote daemon\n"
msgstr ""
msgstr "遠隔のデーモンとやりとりしているため、'--keep-failed' は無視されます\n"
#: guix/scripts/build.scm:296
#, scheme-format
msgid "'--no-build-hook' is deprecated; use '--no-offload' instead~%"
msgstr ""
msgstr "'--no-build-hook' は非推奨です。代わりに '--no-offload' を利用してください~%"
#: guix/scripts/build.scm:326 guix/scripts/build.scm:333
#, scheme-format
@ -3198,11 +3218,13 @@ msgid ""
"Did you mean @code{~a}?\n"
"Try @option{--list-targets} to view available targets.~%"
msgstr ""
"@code{~a}の間違いではないでしょうか？\n"
"利用可能な対象を見るには、@option{--list-targets}を試してみてください。~%"
#: guix/scripts/build.scm:381
#, scheme-format
msgid "Try @option{--list-targets} to view available targets.~%"
msgstr ""
msgstr "利用可能な対象を見るには、@option{--list-targets}を試してみてください。~%"
#: guix/scripts/build.scm:400
#, scheme-format
@ -4645,7 +4667,7 @@ msgstr ""
#: guix/scripts/git/authenticate.scm:138
msgid "Authenticating commits ~a to ~a (~h new commits)...~%"
msgstr ""
msgstr "~aから~aまでのコミット(~h個の新規コミット)を認証しています…~%"
#: guix/scripts/git/authenticate.scm:178
#, scheme-format
@ -5073,7 +5095,7 @@ msgstr[0] "次のチャンネルを元に構築します:~%"
#: guix/scripts/substitute.scm:83
#, scheme-format
msgid "authentication and authorization of substitutes disabled!~%"
msgstr ""
msgstr "代理生成物の認証と認可が無効になっています！~%"
#: guix/scripts/substitute.scm:225
#, scheme-format
@ -5109,7 +5131,7 @@ msgstr ""
#: guix/scripts/substitute.scm:326
#, scheme-format
msgid "updating substitutes from '~a'... ~5,1f%"
msgstr ""
msgstr "'~a'に基づいて代理生成物を更新しています…~5,1f%"
#: guix/scripts/substitute.scm:482
#, scheme-format
@ -8259,7 +8281,7 @@ msgstr ""
#: guix/channels.scm:365
msgid "Authenticating channel '~a', commits ~a to ~a (~h new commits)...~%"
msgstr ""
msgstr "チャンネル'~a'の、~aから~aまでのコミット(~h個の新規コミット)を認証しています…~%"
#: guix/channels.scm:430
#, scheme-format
@ -8282,7 +8304,7 @@ msgstr ""
#: guix/channels.scm:447
#, scheme-format
msgid "channel authentication disabled~%"
msgstr ""
msgstr "チャンネルの認証が無効になっています~%"
#: guix/channels.scm:472
#, scheme-format
@ -8897,7 +8919,7 @@ msgstr ""
#: guix/scripts/environment.scm:524
#, scheme-format
msgid "~a: command not found~%"
msgstr ""
msgstr "~a: コマンドが見つかりません~%"
#: guix/scripts/environment.scm:602
#, scheme-format
@ -9009,7 +9031,7 @@ msgstr ""
#: guix/scripts/environment.scm:1037
msgid "cannot create container: /proc/self/setgroups does not exist\n"
msgstr ""
msgstr "コンテナを作成できません: /proc/self/setgroups が見つかりません\n"
#: guix/scripts/environment.scm:1038
msgid "is your kernel version < 3.19?\n"

66
po/guix/zh_CN.po
View file

@ -13,21 +13,23 @@
# Hilton Chain <yareli@ultrarare.space>, 2023.
# a x <meruarasu@email1.io>, 2023.
# Sapphire RainSlide <RainSlide@outlook.com>, 2023.
# Jingge Chen <mariocanfly@hotmail.com>, 2023.
# Florian Pelz <pelzflorian@pelzflorian.de>, 2023.
#: guix/diagnostics.scm:159
msgid ""
msgstr ""
"Project-Id-Version: guix 0.14.0\n"
"Report-Msgid-Bugs-To: bug-guix@gnu.org\n"
"POT-Creation-Date: 2023-06-19 03:18+0000\n"
"PO-Revision-Date: 2023-11-16 19:01+0000\n"
"Last-Translator: Sapphire RainSlide <RainSlide@outlook.com>\n"
"PO-Revision-Date: 2023-12-08 17:44+0000\n"
"Last-Translator: Florian Pelz <pelzflorian@pelzflorian.de>\n"
"Language-Team: Chinese (Simplified) <https://translate.fedoraproject.org/projects/guix/guix/zh_CN/>\n"
"Language: zh_CN\n"
"MIME-Version: 1.0\n"
"Content-Type: text/plain; charset=UTF-8\n"
"Content-Transfer-Encoding: 8bit\n"
"Plural-Forms: nplurals=1; plural=0;\n"
"X-Generator: Weblate 5.2\n"
"X-Generator: Weblate 5.2.1\n"
"X-Bugs: Report translation errors to the Language-Team address.\n"
#: gnu.scm:81
@ -192,10 +194,13 @@ msgid ""
msgstr "让固件文件可以被系统加载。这样固件可以被载入到这台机器的设备中，比如说无线网卡。"
#: gnu/services.scm:973
#, fuzzy
msgid ""
"Register garbage-collector roots---i.e., store items that\n"
"will not be reclaimed by the garbage collector."
msgstr ""
"注册垃圾回收器的根——即存储垃圾回收器\n"
"不会回收的项目。"
#: gnu/services.scm:1031
#, fuzzy
@ -242,7 +247,7 @@ msgstr "有无法识别的 UUID ~a 在 '~a' 中~%"
#: gnu/system.scm:485
#, scheme-format
msgid "unrecognized crypto-devices ~S at '~a'~%"
msgstr ""
msgstr "未识别的加密设备 ~S 位于 '~a'~%"
#: gnu/system.scm:505
#, fuzzy, scheme-format
@ -269,27 +274,27 @@ msgstr ""
#: gnu/system.scm:645
#, scheme-format
msgid "mapped device '~a' may be ignored by bootloader~%"
msgstr ""
msgstr "映射设备 '~a' 可能会被引导程序忽略 ~%"
#: gnu/system.scm:665
#, scheme-format
msgid "List elements of the field 'swap-devices' should now use the <swap-space> record, as the old method is deprecated. See \"(guix) operating-system Reference\" for more details.~%"
msgstr ""
msgstr "字段“swap-devices”的列表元素现在应使用 <swap-space> 记录，因为旧方法已被淘汰。详情请参阅“(guix.zh_CN) 操作系统参考”。~%"
#: gnu/system.scm:1155
#, scheme-format
msgid "using a string for file '~a' is deprecated; use 'plain-file' instead~%"
msgstr ""
msgstr "使用字符串表示文件‘~a' 已被弃用；请改用 'plain-file' ~%"
#: gnu/system.scm:1171
#, scheme-format
msgid "using a monadic value for '~a' is deprecated; use 'plain-file' instead~%"
msgstr ""
msgstr "对 '~a' 使用一元值已被弃用；请改用 'plain-file' ~%"
#: gnu/system.scm:1217
#, scheme-format
msgid "representing setuid programs with file-like objects is deprecated; use 'setuid-program' instead~%"
msgstr ""
msgstr "用类文件对象来表示setuid程序已被弃用；请改用 'setuid-program' ~%"
#: gnu/system.scm:1319
msgid "missing root file system"
@ -305,18 +310,24 @@ msgid ""
"Populate the @file{/etc/fstab} based on the given file\n"
"system objects."
msgstr ""
"根据给定的文件系统对象\n"
"填充 @file{/etc/fstab} 文件。"
#: gnu/services/base.scm:357
msgid ""
"Take care of syncing the root file\n"
"system and of remounting it read-only when the system shuts down."
msgstr ""
"注意同步根文件系统，\n"
"并在系统关闭时以只读方式重新加载。"
#: gnu/services/base.scm:551
msgid ""
"Provide Shepherd services to mount and unmount the given\n"
"file systems, as well as corresponding @file{/etc/fstab} entries."
msgstr ""
"提供挂载和卸载给定文件系统的 Shepherd 服务，\n"
"以及相应的 @file{/etc/fstab} 条目。"
#: gnu/services/base.scm:649
msgid ""
@ -324,17 +335,21 @@ msgid ""
"generator (RNG) with the value recorded when the system was last shut\n"
"down."
msgstr ""
"为 @file{/dev/urandom} 伪随机数生成器(RNG)\n"
"添加上次关闭系统时记录的数值用作种子。"
#: gnu/services/base.scm:684
msgid ""
"Run the @command{rngd} random number generation daemon to\n"
"supply entropy to the kernel's pool."
msgstr ""
"运行 @command{rngd} 随机数生成守护进程，\n"
"为内核池提供熵。"
#: gnu/services/base.scm:713
#, scheme-format
msgid "host name '~a' contains invalid characters"
msgstr ""
msgstr "主机名 '~a' 包含无效字符"
#: gnu/services/base.scm:763
#, fuzzy
@ -344,11 +359,11 @@ msgstr "填充 @file{/etc} 目录。"
#: gnu/services/base.scm:780
msgid "Initialize the machine's host name."
msgstr ""
msgstr "初始化机器的主机名。"
#: gnu/services/base.scm:811
msgid "Ensure the Linux virtual terminals run in UTF-8 mode."
msgstr ""
msgstr "确保 Linux 虚拟终端以 UTF-8 模式运行。"
#: gnu/services/base.scm:870
msgid ""
@ -367,24 +382,44 @@ msgid ""
" \"/share/consolefonts/ter-132n\"))) ; for HDPI\n"
"@end example\n"
msgstr ""
"在指定的 tty 上安装给定的字体（字体是GNU/Linux每个虚拟控制台的字体）。\n"
"此服务的值是一个由 tty/font 对构成的列表。\n"
"字体可以是 @code{kbd} 软件包提供的字体名称，也可以是\n"
"@command{setfont} 的任何有效参数，如本例所示：\n"
"\n"
"@example\n"
"`((\"tty1\" . \"LatGrkCyr-8x16\")\n"
" (\"tty2\" . ,(file-append\n"
" font-tamzen\n"
" \"/share/kbd/consolefonts/TamzenForPowerline10x20.psf\"))\n"
" (\"tty3\" . ,(file-append\n"
" font-terminus\n"
" \"/share/consolefonts/ter-132n\"))) ; for HDPI\n"
"@end example\n"
#: gnu/services/base.scm:914
msgid ""
"Provide a console log-in service as specified by its\n"
"configuration value, a @code{login-configuration} object."
msgstr ""
"提供由 @code{login-configuration} 对象配置值\n"
"指定的控制台登录服务。"
#: gnu/services/base.scm:1197
msgid ""
"Provide console login using the @command{agetty}\n"
"program."
msgstr ""
"使用 @command{agetty} 程序\n"
"提供控制台登录功能。"
#: gnu/services/base.scm:1263
msgid ""
"Provide console login using the @command{mingetty}\n"
"program."
msgstr ""
"使用 @command{mingetty} 程序\n"
"提供控制台登录功能。"
#: gnu/services/base.scm:1494
msgid ""
@ -392,14 +427,17 @@ msgid ""
"given configuration---an @code{<nscd-configuration>} object. @xref{Name\n"
"Service Switch}, for an example."
msgstr ""
"使用指定的配置 ，即一个 @code{<nscd-configuration>} 对象\n"
"来运行libc的 @dfn{name service cache daemon} (nscd)。\n"
"请参阅例子 @xref{Name Service Switch}。"
#: gnu/services/base.scm:1572
msgid "Service syslog has been asked to reload its settings file."
msgstr ""
msgstr "syslog 服务被要求重新加载其配置文件。"
#: gnu/services/base.scm:1574
msgid "Service syslog is not running."
msgstr ""
msgstr "syslog 服务未运行。"
#: gnu/services/base.scm:1591
msgid ""