aboutsummaryrefslogtreecommitdiff
path: root/sync/vps.scm
diff options
context:
space:
mode:
Diffstat (limited to 'sync/vps.scm')
-rw-r--r--sync/vps.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/sync/vps.scm b/sync/vps.scm
index 5ab0ff6..96cb711 100644
--- a/sync/vps.scm
+++ b/sync/vps.scm
@@ -227,11 +227,11 @@
string-append
(map (lambda (data)
(let ((status (if (equal? "0" (assoc-ref data #:status)) "✅" "❌"))
- (file (string-append name "/" (assoc-ref data #:filename)))
+ (file (string-append name "-" (assoc-ref data #:filename)))
(href (assoc-ref data #:href)))
(string-append
"<li>
- <a href=\"" href "\">
+ <a href=\"" href "\" download=" file ">
" status "
<pre>" file "</pre>
</a>