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

Fixing upload with passwords.

Browse source
This commit is contained in:
Alex Shinn 2015-04-26 10:42:38 +09:00
parent 24a880ad28
commit 93406a98ee
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -844,7 +844,7 @@
(sha-256 (string-append email raw-password))))))
(define (upload-package cfg spec package . o)
(let ((password `(pw (value ,(get-password cfg))))
(let ((password `(pw (value . ,(get-password cfg package))))
(pkg (if (string? package)
`(u (file . ,package))
`(u (file . ,(if (pair? o) (car o) "package.tgz"))