From 6a8fdafb0604edb5f14ec0c2d2024f6fce598eec Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Sat, 1 Jan 2011 20:17:35 +0200
Subject: [PATCH] OpenId label has correct for value

---
 Yesod/Helpers/Auth/OpenId.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Yesod/Helpers/Auth/OpenId.hs b/Yesod/Helpers/Auth/OpenId.hs
index cfbc949b..0ae1668a 100644
--- a/Yesod/Helpers/Auth/OpenId.hs
+++ b/Yesod/Helpers/Auth/OpenId.hs
@@ -46,7 +46,7 @@ authOpenId =
             [$hamlet|
 #endif
 %form!method=get!action=@tm.forwardUrl@
-    %label!for=openid OpenID: $
+    %label!for=$ident$ OpenID: $
     %input#$ident$!type=text!name=$name$!value="http://"
     %input!type=submit!value="Login via OpenID"
 |]