add support for reading apikey from system properties

economico · Sep 26, 2012 · d622c46 · d622c46
1 parent 179cfbd
commit d622c46
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/README.md b/README.md
@@ -28,7 +28,7 @@ Subscribe an email address:
 
 ## Configuring API Keys
 
-The easiest way to set it up is to set your api key in the MC_API_KEY environment variable.
+The easiest way to set it up is to set your api key in the MC_API_KEY environment variable or system property.
 
 Alternatively you can create a dynamic binding for *mc-api-key*.
 

diff --git a/src/climp/core.clj b/src/climp/core.clj
@@ -4,7 +4,7 @@
 
 (def ^:dynamic *mc-api-key*
   (let [env (System/getenv)]
-    (get env "MC_API_KEY" (get env "MAILCHIMP_API_KEY"))))
+    (get env "MC_API_KEY" (get env "MAILCHIMP_API_KEY" (System/getProperty "MC_API_KEY")))))
 
 (defn mailchimp-dc
   "Return the MailChimp Datacenter for API KEY"