This commit is contained in:
Georges Dupéron 2017-08-13 16:11:28 +00:00 committed by GitHub
commit edfffc09a6

View File

@ -628,7 +628,7 @@
(for/fold ([pkg-rows null] [num-todos 0]) (for/fold ([pkg-rows null] [num-todos 0])
([pkg (package-batch-detail package-names)]) ([pkg (package-batch-detail package-names)])
(define pkg-docs (define pkg-docs
(let ([implied-docs (get-implied-docs)] (let ([implied-docs (get-implied-docs pkg)]
[pkg-docs (package-docs pkg)]) [pkg-docs (package-docs pkg)])
(if (null? pkg-docs) (if (null? pkg-docs)
implied-docs implied-docs