diff --git a/R/fix_non_ascii.R b/dev/fix_non_ascii.R
similarity index 91%
rename from R/fix_non_ascii.R
rename to dev/fix_non_ascii.R
index fe48736..58742fa 100644
--- a/R/fix_non_ascii.R
+++ b/dev/fix_non_ascii.R
@@ -9,10 +9,8 @@
 #' @export
 #' 
 #' @examples
-#' # Make a vector of non-ASCII characters
-#' (bad_vec <- c("’", "“", "”", "—", "−", "–", "×", "fi", "ö", "­", 
-#'               "·", "…", "`", "ò", "ó", "á", "à", "å", "ë", "ä", 
-#'               "é", "è", "ü", "ú", "ù"))
+#' # Make a vector of several non-ASCII characters
+#' (bad_vec <- c("’", "“", "×", "fi", "ö", "ü"))
 #' 
 #' # Invoke function
 #' (good_vec <- fix_non_ascii(x = bad_vec))