bug#44193: [PATCH 1/1] publish: Add '--cache-bypass-threshold'.

[Ludovic Courtès]

Ludovic Courtès <ludo@gnu.org> skribis:

> * guix/scripts/publish.scm (show-help, %options): Add
> '--cache-bypass-threshold'.
> (low-compression): New procedure.
> (cache-bypass-threshold): New parameter.
> (bypass-cache?): New procedure.
> (render-narinfo/cached): Call 'render-narinfo' when 'bypass-cache?'
> returns true.
> (render-nar/cached): Call 'render-nar' when 'bypass-cache?' returns
> true.
> (guix-publish): Parameterize 'cache-bypass-threshold'.
> * tests/publish.scm ("with cache", "with cache, lzip + gzip")
> ("with cache, uncompressed"): Pass '--cache-bypass-threshold=0'.
> ("with cache, vanishing item"): Expect 200 for RESPONSE.
> ("with cache, cache bypass"): New test.
> ---
>  doc/guix.texi            | 24 +++++++++++-
>  guix/scripts/publish.scm | 85 ++++++++++++++++++++++++++++++++--------
>  tests/publish.scm        | 43 ++++++++++++++++++--
>  3 files changed, 130 insertions(+), 22 deletions(-)

Pushed as ecaa102a58ad3ab0b42e04a3d10d7c761c05ec98.

Ludo’.