aboutsummaryrefslogtreecommitdiff
path: root/web/view/markdown.scm
diff options
context:
space:
mode:
Diffstat (limited to 'web/view/markdown.scm')
-rw-r--r--web/view/markdown.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/web/view/markdown.scm b/web/view/markdown.scm
index 653596f..b350a1b 100644
--- a/web/view/markdown.scm
+++ b/web/view/markdown.scm
@@ -120,12 +120,12 @@
(if (zero? git-commit-file)
`(("status" . "201")
("message" . "committed file successfully")
- ("content" unquote content)
- ("commit_sha" unquote git-commit-sha)
- ("commit_message" unquote commit-message))
+ ("content" . ,content)
+ ("commit_sha" . ,git-commit-sha)
+ ("commit_message" . ,commit-message))
`(("status" . "200")
("message" . "Nothing to commit, working tree clean")
- ("commit_sha" unquote git-commit-sha)))))
+ ("commit_sha" . ,git-commit-sha)))))
(#f (throw 'system-error
(format #f "~a File does not exist error" file-path))))
(throw 'system-error