From 9aeb6a6dcc641375e4d37cf7f30ab34aec122ced Mon Sep 17 00:00:00 2001
From: Bob Rudis <bob@rudis.net>
Date: Sat, 24 Sep 2016 07:08:03 -0400
Subject: [PATCH] normalize params

---
 R/response.r     | 4 +---
 man/tidy_html.Rd | 5 +----
 2 files changed, 2 insertions(+), 7 deletions(-)

diff --git a/R/response.r b/R/response.r
index 7ee4901..1657af8 100644
--- a/R/response.r
+++ b/R/response.r
@@ -1,9 +1,7 @@
-#' @param encoding specify the encoding when tidying an \code{httr} \code{response}
-#'   object. Default to "\code{UTF-8}".
 #' @export
 #' @rdname tidy_html
 tidy_html.response <- function(content, options=list(TidyXhtmlOut=TRUE),
-                               verbose=FALSE, encoding="UTF-8") {
+                               verbose=FALSE) {
 
   if (!grepl("html", content$headers[["content-type"]])) {
     stop("htmltidy only parses HTML content from httr::response objects",
diff --git a/man/tidy_html.Rd b/man/tidy_html.Rd
index a262763..ed3a0c5 100644
--- a/man/tidy_html.Rd
+++ b/man/tidy_html.Rd
@@ -12,7 +12,7 @@
 \title{Tidy or "Pretty Print" HTML/XHTML Documents}
 \usage{
 \method{tidy_html}{response}(content, options = list(TidyXhtmlOut = TRUE),
-  verbose = FALSE, encoding = "UTF-8")
+  verbose = FALSE)
 
 tidy_html(content, options = list(TidyXhtmlOut = TRUE), verbose = FALSE)
 
@@ -41,9 +41,6 @@ or \code{XML} packages.}
 \item{options}{named list of options}
 
 \item{verbose}{output document errors? (default: \code{FALSE})}
-
-\item{encoding}{specify the encoding when tidying an \code{httr} \code{response}
-object. Default to "\code{UTF-8}".}
 }
 \value{
 Tidied HTML/XHTML content. The object type will be the same as that of the input type