marcuskammer/coleslaw
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

coleslaw-s3::*credentials* was useless and not setting the important variable zs3:*credentials*. Now seting correctly in the correct package zs3.

Browse source
This commit is contained in:
digiorgi 2015-06-07 18:12:04 -04:00
parent 5f3100604c
commit c625aa1de6
1 changed files with 3 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
plugins/s3.lisp
View file

@ -10,11 +10,6 @@
(in-package :coleslaw-s3)
(defparameter *credentials* nil
"The credentials to authenticate with Amazon Web Services.
Stored in a file with the access key on the first line
and the secret key on the second.")
(defparameter *content-type-map* '(("html" . "text/html")
("css" . "text/css")
("png" . "image/png")
@ -53,5 +48,7 @@ and the secret key on the second.")
(zs3:delete-objects (stale-keys) *bucket*)))
(defun enable (&key auth-file bucket)
(setf *credentials* (zs3:file-credentials auth-file)
"AUTH-FILE: Path to file with the access key on the first line and the secret
key on the second."
(setf zs3:*credentials* (zs3:file-credentials auth-file)
*bucket* bucket))