Use knots
A library of extracted Guile Fibers patterns and utilities.
This commit is contained in:
parent
a33e32275e
commit
8b49884816
13 changed files with 154 additions and 1205 deletions
|
|
@ -19,6 +19,8 @@
|
|||
#:use-module (ice-9 match)
|
||||
#:use-module (web uri)
|
||||
#:use-module (web request)
|
||||
#:use-module (knots parallelism)
|
||||
#:use-module (knots resource-pool)
|
||||
#:use-module (guix-data-service utils)
|
||||
#:use-module (guix-data-service database)
|
||||
#:use-module (guix-data-service web render)
|
||||
|
|
@ -40,7 +42,7 @@
|
|||
request
|
||||
`((system ,parse-system #:default "x86_64-linux")
|
||||
(target ,parse-target #:default "")))))
|
||||
(letpar& ((package-versions-with-branches
|
||||
(fibers-let ((package-versions-with-branches
|
||||
(with-resource-from-pool (connection-pool) conn
|
||||
(branches-by-package-version conn name
|
||||
(assq-ref parsed-query-parameters
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue