-- }}}

-- Attributes {{{

dtAttr :: ToJSON a => String -> WriteAttr DataTable a
dtAttr a = writeOnly (data_ a)
  # mapAttrSrc dtElement
  # mapWriteAttr toJSONStr
dtAttr :: ToJSON a => String -> WriteAttr DataTable a
dtAttr a = writeOnly (data_ a)
  # mapAttrSrc dtElement
  # mapWriteAttr toJSONStr
dtAttr a = writeOnly (data_ a)
  # mapAttrSrc dtElement
  # mapWriteAttr toJSONStr