accessRow :: String -- ^ Table name
  -> Selector -- ^ 'Access'
accessRow table = selectColumns 'Access table ["site", "member"]
accessRow :: String -- ^ Table name
  -> Selector
accessRow table = selectColumns 'Access table ["site", "member"]
accessRow table = selectColumns 'Access table ["site", "member"]