fix function name
This commit is contained in:
parent
c23e28250a
commit
40016c36e5
@ -563,11 +563,11 @@ challengeAllSubmissionsWidget muserId challenge scheme challengeRepo submissions
|
||||
|
||||
paramGraphsWidget :: Challenge -> [Entity Test] -> [Text] -> WidgetFor App ()
|
||||
paramGraphsWidget challenge tests params = $(widgetFile "param-graphs")
|
||||
where chartJSs = getCharsJss challenge selectedTests params
|
||||
where chartJSs = getChartJss challenge selectedTests params
|
||||
selectedTests = getMainTests tests
|
||||
|
||||
getCharsJss :: Challenge -> [Entity Test] -> [Text] -> JavascriptUrl (Route App)
|
||||
getCharsJss challenge tests params =
|
||||
getChartJss :: Challenge -> [Entity Test] -> [Text] -> JavascriptUrl (Route App)
|
||||
getChartJss challenge tests params =
|
||||
mconcat $ [(getChartJs challenge test param) | test <- tests, param <- params]
|
||||
|
||||
getChartJs :: Challenge
|
||||
|
Loading…
Reference in New Issue
Block a user