Merge branch 'master' of github.com:mstksg/blog

mstksg · Jun 24, 2016 · db8d8af · db8d8af
2 parents b4d860d + c31388c
commit db8d8af
Show file tree

Hide file tree

Showing 4 changed files with 1 addition and 33 deletions.
diff --git a/config/compass.rb b/config/compass.rb
diff --git a/config/site-data.yaml b/config/site-data.yaml
@@ -10,7 +10,7 @@ author:
   name: Justin Le
   email: justin@jle.im
   rel: https://plus.google.com/107705320197444500140
-  facebook: mstksg
+  # facebook: mstksg
   twitter: mstk
   gplus: +JustinLe
   github: mstksg

diff --git a/src/Blog/Types.hs b/src/Blog/Types.hs
@@ -84,7 +84,6 @@ data AuthorInfo = AuthorInfo
     { authorName     :: T.Text
     , authorEmail    :: T.Text
     , authorRel      :: T.Text
-    , authorFacebook :: T.Text
     , authorTwitter  :: T.Text
     , authorGPlus    :: T.Text
     , authorGithub   :: T.Text

diff --git a/src/Blog/View/Social.hs b/src/Blog/View/Social.hs
@@ -55,12 +55,6 @@ viewSocialFollow =
     H.ul ! A.class_ "social-follows-list" $ do
       H.li $
         H.ul ! A.class_ "social-follows-list-social" $ do
-          H.li $
-            H.a
-              ! A.class_ "social-follow-facebook"
-              ! A.title "Friend me on Facebook!"
-              ! A.href (H.textValue facebookUrl) $
-              "Facebook"
           H.li $
             H.a
               ! A.class_ "social-follow-twitter"
@@ -121,7 +115,6 @@ viewSocialFollow =
       , "  'width=550,height=520');"
       , "return false;" ]
     socialUrl base field = T.append base . field $ confAuthorInfo
-    facebookUrl = socialUrl "https://facebook.com/" authorFacebook
     twitterUrl = socialUrl "https://twitter.com/intent/user?user_id=" authorTwitter
     gPlusUrl = socialUrl "https://plus.google.com/" authorGPlus
     linkedInUrl = socialUrl "https://linkedin.com/in/" authorLinkedIn