Stefan Saasen avatar Stefan Saasen committed 0602fd9

Rename Parser.parseLines -> Parser.parseLogLines

Comments (0)

Files changed (3)

logparser/src/Stash/Log/Analyser.hs

                                  else ([DateValuePair dateTime conn], prev : xs)
                      ([], xs)    -> ([DateValuePair dateTime conn], xs)
                      (_, _)      -> ([], [])
-            res = foldl' f ([],[]) $ parseLines inxs
+            res = foldl' f ([],[]) $ parseLogLines inxs
 
 protocolStatsByHour :: Input -> [ProtocolStats]
-protocolStatsByHour rawLines = let  groups = groupBy (logDateEqHour `on` getDate) $ parseLines rawLines
+protocolStatsByHour rawLines = let  groups = groupBy (logDateEqHour `on` getDate) $ parseLogLines rawLines
                                     formatLogDate date = printf "%04d-%02d-%02d %02d" (getYear date) (getMonth date) (getDay date) (getHour date)
                                 in map (protocolStats formatLogDate) groups
 

logparser/src/Stash/Log/GitOpsAnalyser.hs

 
 plotGitOperations' :: (LogDate -> LogDate -> Bool) -> (LogDate -> String) -> Input -> [GitOperationStats]
 plotGitOperations' comp formatLogDate rawLines =
-    let groups = groupBy (comp `on` getDate) $ parseLines rawLines
+    let groups = groupBy (comp `on` getDate) $ parseLogLines rawLines
     in map (summarizeGitOperations formatLogDate) groups
 
 

logparser/src/Stash/Log/Parser.hs

 , LogDate(..)
 , Input
 , parseLogLine
-, parseLines
+, parseLogLines
 , isIncoming
 , isOutgoing
 , isOutgoingLogLine
 } deriving (Show, Eq)
 
 -- | Parse the input into a list of LogLines
-parseLines :: Input -> [LogLine]
-parseLines = mapMaybe parseLogLine
+parseLogLines :: Input -> [LogLine]
+parseLogLines = mapMaybe parseLogLine
 
 -- | Parse a single log line.
 parseLogLine :: L.ByteString -> Maybe LogLine
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.