ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-13 22:50:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

publish: Avoid 'valid-path?' RPC for non-existent items.

Browse source 
* guix/scripts/publish.scm (render-narinfo/cached): Call 'file-exists?'
before calling 'valid-path?'.  This makes the 404 path slightly faster.
This commit is contained in:
Ludovic Courtès 2017-07-21 14:52:08 +02:00 committed by Ludovic Courtès
parent 35eb77b09d
commit deac674ab4
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
guix/scripts/publish.scm
View file

@ -417,7 +417,8 @@ (define (delete-entry narinfo)
(display (call-with-input-file cached
read-string)
port))))
((valid-path? store item)
((and (file-exists? item) ;cheaper than the 'valid-path?' RPC
(valid-path? store item))
;; Nothing in cache: bake the narinfo and nar in the background and
;; return 404.
(eventually pool