Commit bd13f036 authored by Fabien Maniere's avatar Fabien Maniere

Update NgramsTable.purs

parent 941f08e3
...@@ -664,7 +664,7 @@ ngramsTableOrderWith orderBy = ...@@ -664,7 +664,7 @@ ngramsTableOrderWith orderBy =
-- This is used to *decorate* the Select header with the checkbox. -- This is used to *decorate* the Select header with the checkbox.
wrapColElts scProps _ (TT.ColumnName "Select") = const [NTSC.selectionCheckbox scProps] wrapColElts scProps _ (TT.ColumnName "Select") = const [NTSC.selectionCheckbox scProps]
wrapColElts _ scoreType (TT.ColumnName "Score") = (_ <> [H.text (" (co-occurrences)")]) wrapColElts _ scoreType (TT.ColumnName "Score") = (_ <> [H.text (" (occurrences)")])
wrapColElts _ _ _ = identity wrapColElts _ _ _ = identity
type MkDispatchProps = type MkDispatchProps =
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment