Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-18 21:29:19 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix path adjustment of inline test files in snow-chibi package command

Browse source
This commit is contained in:
Alex Shinn 2015-06-15 23:39:38 +09:00
parent 4fc7181c2c
commit c9a856b8f6
1 changed files with 8 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lib/chibi/snow/commands.scm
View file

@ -592,11 +592,14 @@
data-files))
(tar-files
(reverse
(append (if test
`((rename ,test
,(path-strip-leading-parents test)))
'())
docs tar-data-files files))))
(append
(cond
((pair? test) (list test))
(test
`((rename ,test
,(path-strip-leading-parents test))))
(else '()))
docs tar-data-files files))))
(cons `(package
,@(reverse res)
,@(if (pair? data-files) `((data-files ,@pkg-data-files)) '())