From 8388100fdd2f49c0a4e1a8382301cedcbce84b0b Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Mon, 24 Jun 2013 00:46:25 +0200
Subject: Add scrumelo-host variable

---
 scrumelo.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/scrumelo.el b/scrumelo.el
index 068f5d5..6774f05 100644
--- a/scrumelo.el
+++ b/scrumelo.el
@@ -23,6 +23,11 @@
 (defvar scrumelo-project-file "~/projects/scrumelo/aeos.org"
   "The file containing the scrum backlog.")
 
+(defvar scrumelo-host "http://localhost:8028"
+  "The URL on which scrumelo is running.
+
+Mozilla persona uses this to verify login requests.")
+
 (defvar scrumelo--base-dir
   (if load-file-name
       (file-name-directory load-file-name)
@@ -261,7 +266,7 @@ saving the buffer."
                                   (value ""))))
                   (p (a (@ (href "javascript:login()")) "Login"))))))))
       (POST
-       (let* ((audience "http://localhost:8028")
+       (let* ((audience scrumelo-host)
               (assertion (elnode-http-param httpcon "assertion"))
               (result (scrumelo--verify-credentials audience assertion)))
          (if (equal (cdr (assoc 'status result)) "okay")
-- 
cgit v1.2.3-54-g00ecf