diff options
Diffstat (limited to 'ibb/Main.hs')
| -rw-r--r-- | ibb/Main.hs | 8 |
1 files changed, 1 insertions, 7 deletions
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| <h4 .card-title> #{_name person} <h6> - <a href=#{_twitterLink person} class="fab fa-twitter"> + <a target=_blank href="https://twitter.com/#{_twitter person}" class="fab fa-twitter"> <a target=_blank href=#{_website person} class="fas fa-globe"> <p .card-text> <ul> |