fingerprint/mtlstats
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

mark rookies in playerSummary

This commit is contained in:
Jonathan Lamothe 2020-01-04 12:10:19 -05:00
parent e077c32956
commit 5209c4a296
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Mtlstats/Helpers/Player.hs
View File

@ -32,7 +32,7 @@ playerDetails p = unlines $ top ++ [""] ++ table
where where
top = labelTable top = labelTable
[ ( "Number", show $ p^.pNumber ) [ ( "Number", show $ p^.pNumber )
, ( "Name", p^.pName ) , ( "Name", playerName p )
, ( "Position", p^.pPosition ) , ( "Position", p^.pPosition )
] ]

3
test/Helpers/PlayerSpec.hs
View File

@ -37,6 +37,7 @@ playerDetailsSpec = describe "playerDetails" $
it "should give a detailed description" $ let it "should give a detailed description" $ let
p = newPlayer 1 "Joe" "centre" p = newPlayer 1 "Joe" "centre"
& pRookie .~ True
& pYtd .~ PlayerStats & pYtd .~ PlayerStats
{ _psGoals = 2 { _psGoals = 2
, _psAssists = 3 , _psAssists = 3
@ -50,7 +51,7 @@ playerDetailsSpec = describe "playerDetails" $
expected = unlines expected = unlines
[ " Number: 1" [ " Number: 1"
, " Name: Joe" , " Name: Joe*"
, "Position: centre" , "Position: centre"
, "" , ""
, " YTD Lifetime" , " YTD Lifetime"