allow urls for snow docs

This commit is contained in:
Alex Shinn 2017-07-03 06:57:09 +09:00
parent db186784e3
commit 7b68f141c6

View file

@ -604,7 +604,11 @@
`((rename ,test
,(path-strip-leading-parents test))))
(else '()))
docs tar-data-files files))))
(remove (lambda (x)
(or (string-prefix? "http://" x)
(string-prefix? "https://" x)))
docs)
tar-data-files files))))
(cons `(package
,@(reverse res)
,@(if (pair? data-files) `((data-files ,@pkg-data-files)) '())