Fixed multi-line comment not properly escaped, causing unintended code to run (#338)

Author: wkumler

R/xml_text.R

@@ -17,8 +17,7 @@
 #' x <- read_xml("<p>   Some text    </p>")
 #' xml_text(x, trim = TRUE)
 #'
-#' # xml_double() and xml_integer() are useful for extracting numeric
-#' attributes
+#' # xml_double() and xml_integer() are useful for extracting numeric attributes
 #' x <- read_xml("<plot><point x='1' y='2' /><point x='2' y='1' /></plot>")
 #' xml_integer(xml_find_all(x, "//@x"))
 #' @export