From c625aa1de64c58051bb7783a818ea6d0b2cca5f9 Mon Sep 17 00:00:00 2001 From: digiorgi Date: Sun, 7 Jun 2015 18:12:04 -0400 Subject: [PATCH] coleslaw-s3::*credentials* was useless and not setting the important variable zs3:*credentials*. Now seting correctly in the correct package zs3. --- plugins/s3.lisp | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/plugins/s3.lisp b/plugins/s3.lisp index f46e623..88570dd 100644 --- a/plugins/s3.lisp +++ b/plugins/s3.lisp @@ -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))