From bda95f886b075961fb7e2634d5a68e5814c70679 Mon Sep 17 00:00:00 2001 From: Nick Sima Date: Wed, 6 Feb 2019 12:25:26 -0800 Subject: Remove twitter link, and use twitter handle instead. Less code and looks better. --- ibb/Main.hs | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) (limited to 'ibb') diff --git a/ibb/Main.hs b/ibb/Main.hs index c0e8b13..5d2b38c 100644 --- a/ibb/Main.hs +++ b/ibb/Main.hs @@ -28,7 +28,6 @@ data Person = Person { _name :: Text , _pic :: Text , _twitter :: Text - , _twitterLink :: Text , _website :: Text , _books :: [Book] } @@ -44,7 +43,6 @@ allPeople = [ Person { _name = "Joe Rogan" , _pic = "https://pbs.twimg.com/profile_images/552307347851210752/vrXDcTFC_400x400.jpeg" , _twitter = "joerogan" - , _twitterLink ="https://twitter.com/joerogan" , _website = "http://joerogan.com" , _books = [ Book {_title = "Food of the Gods" , _author = "Terence McKenna" @@ -59,7 +57,6 @@ allPeople = , Person { _name = "Beyoncé" , _pic = "https://encrypted-tbn0.gstatic.com/images?q=tbn:ANd9GcTxT84sF19lxdnSiblIXAp-Y4wAigpQn8sZ2GtAerIR_ApiiEJfFQ" , _twitter = "Beyonce" - , _twitterLink = "https://twitter.com/beyonce" , _website = "http://beyonce.com" , _books = [ Book { _title = "What Will It Take To Make A Woman President?" , _author = "Marianne Schnall" @@ -69,7 +66,6 @@ allPeople = , Person { _name = "Barrack Obama" , _pic = "https://encrypted-tbn0.gstatic.com/images?q=tbn:ANd9GcQeLzftR36p0hYI-EKNa5fm7CYDuN-vyz23_R48ocqa8X1nPr6C" , _twitter = "BarackObama" - , _twitterLink = "https://twitter.com/BarackObama" , _website = "http://barackobama.com" , _books = [ Book { _title = "An American Marriage" , _author = "Tayari Jones" @@ -82,7 +78,6 @@ allPeople = , Person { _name = "Warren Buffet" , _pic = "https://encrypted-tbn0.gstatic.com/images?q=tbn:ANd9GcQQbmnUykS6zqgzaf44tsq1RAsnHe6H7fapEoSqUwAoJGSFKbAPSw" , _twitter = "WarrenBuffett" - , _twitterLink = "https://twitter.com/WarrenBuffett" , _website = "http://berkshirehathaway.com" , _books = [ Book { _title = "The Intelligent Investor" , _author = "Benjamin Graham" @@ -95,7 +90,6 @@ allPeople = , Person { _name = "Bill Gates" , _pic = "https://pbs.twimg.com/profile_images/988775660163252226/XpgonN0X_400x400.jpg" , _twitter = "BillGates" - , _twitterLink = "https://twitter.com/billgates" , _website = "https://www.gatesnotes.com" , _books = [ Book { _title = "Leonardo da Vinci" , _author = "Walter Isaacson" @@ -117,7 +111,7 @@ displayPerson person = [shamlet|

#{_name person}

- +

    -- cgit v1.2.3