renamed pPoints to psPoints

src/Mtlstats/Report.hs

@@ -117,7 +117,7 @@ gameStatsReport width s = unlines $ fromMaybe [] $ do
         ++ left nameWidth (p^.pName)
         ++ right 3 (show $ stats^.psGoals)
         ++ right 6 (show $ stats^.psAssists)
-        ++ right 6 (show $ pPoints stats)
+        ++ right 6 (show $ psPoints stats)
         ++ right 6 (show $ stats^.psPMin))
       pStats ++
     [ centre width
@@ -129,7 +129,7 @@ gameStatsReport width s = unlines $ fromMaybe [] $ do
         $  replicate (4 + nameWidth) ' '
         ++ right 3 (show $ tStats^.psGoals)
         ++ right 6 (show $ tStats^.psAssists)
-        ++ right 6 (show $ pPoints tStats)
+        ++ right 6 (show $ psPoints tStats)
         ++ right 6 (show $ tStats^.psPMin)
       )
     ]

src/Mtlstats/Types.hs

@@ -126,12 +126,12 @@ module Mtlstats.Types (
   gmsPoints,
   addGameStats,
   -- ** Player Helpers
-  pPoints,
   playerSearch,
   playerSearchExact,
   modifyPlayer,
   playerSummary,
   -- ** PlayerStats Helpers
+  psPoints,
   addPlayerStats
 ) where
 
@@ -677,10 +677,6 @@ addGameStats s1 s2 = GameStats
   , _gmsGoalsAgainst = s1^.gmsGoalsAgainst + s2^.gmsGoalsAgainst
   }
 
--- | Calculates a player's points
-pPoints :: PlayerStats -> Int
-pPoints s = s^.psGoals + s^.psAssists
-
 -- | Searches through a list of players
 playerSearch
   :: String
@@ -728,6 +724,10 @@ playerSummary :: Player -> String
 playerSummary p =
   p^.pName ++ " (" ++ show (p^.pNumber) ++ ") " ++ p^.pPosition
 
+-- | Calculates a player's points
+psPoints :: PlayerStats -> Int
+psPoints s = s^.psGoals + s^.psAssists
+
 -- | Adds two 'PlayerStats' together
 addPlayerStats :: PlayerStats -> PlayerStats -> PlayerStats
 addPlayerStats s1 s2 = newPlayerStats