R/helper.R

In JanMarvin/disqusR: Provides a link to the disqus api

# #' helper functions
# #'
# #' @export
# get_thread_ids <- function(obj) {
#   if (is(obj)!="dq_thread")
#     stop("No Object I should work with. If wanted add class 'dq_thread'.")
#
#   obj$
# }