-- "Db_derpSelector"
--
tsn_expr_selector_namer :: String -> String -> String -> Int -> String
-tsn_expr_selector_namer dn cn fn fp =
- the_default dn cn (strip_leading_underscore fn) fp
+tsn_expr_selector_namer dn cn fn =
+ the_default dn cn (strip_leading_underscore fn)
where
the_default = mkExprSelectorName lowercase_ns