diff --git a/yesod-auth/Yesod/Auth/Facebook.hs b/yesod-auth/Yesod/Auth/Facebook.hs
index f8715e63..3928eb07 100644
--- a/yesod-auth/Yesod/Auth/Facebook.hs
+++ b/yesod-auth/Yesod/Auth/Facebook.hs
@@ -67,8 +67,8 @@ parseCreds :: Text -> Value -> Data.Aeson.Types.Parser (Creds m)
 parseCreds at' (Object m) = do
     id' <- m .: "id"
     let id'' = "http://graph.facebook.com/" `mappend` id'
-    name <- m .: "name"
-    email <- m .: "email"
+    name <- m .:? "name"
+    email <- m .:? "email"
     return
         $ Creds "facebook" id''
         $ maybe id (\x -> (:) ("verifiedEmail", x)) email
diff --git a/yesod-auth/facebook.hs b/yesod-auth/facebook.hs
index c55e87b0..772570e8 100644
--- a/yesod-auth/facebook.hs
+++ b/yesod-auth/facebook.hs
@@ -10,7 +10,6 @@ import Web.Authenticate.Facebook
 import Yesod.Form
 
 data FB = FB Facebook
-type Handler = GHandler FB FB
 
 fb :: FB
 fb = FB Facebook
diff --git a/yesod-auth/yesod-auth.cabal b/yesod-auth/yesod-auth.cabal
index 86123675..9ec0d42e 100644
--- a/yesod-auth/yesod-auth.cabal
+++ b/yesod-auth/yesod-auth.cabal
@@ -1,5 +1,5 @@
 name:            yesod-auth
-version:         0.7.7
+version:         0.7.7.1
 license:         BSD3
 license-file:    LICENSE
 author:          Michael Snoyman, Patrick Brisbin