1. Miki Tebeka
  2. dude-remember

Commits

Miki Tebeka  committed a922a18

Use / to return (site neutral)

  • Participants
  • Parent commits f7047b0
  • Branches default

Comments (0)

Files changed (1)

File src/duderemember.clj

View file
  • Ignore whitespace
        "Text:" [:br]
        (:text message)])))
 
-; FIXME: Find a way to get that from compojure/ring
-(def *top-url* "http://dude-remember.appspot.com")
-;(def *top-url* "http://localhost:8080")
-
 (defn login-page []
   (page
-    [:a {:href (login-url *top-url*)} "Please login"]))
+    [:a {:href (login-url "/")} "Please login"]))
 
 (defn user-page [user]
   (let [messages (user-messages user)]