Remove unused function.

ropenscilabs · Jul 26, 2019 · 6579be0 · 6579be0
1 parent 5ce5ce7
commit 6579be0
Show file tree

Hide file tree

Showing 3 changed files with 0 additions and 50 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -14,7 +14,6 @@ export(do_update_document)
 export(error_check)
 export(get_codes)
 export(import_project_data)
-export(make_js_listener)
 export(parse_one_document)
 export(parse_qcodes)
 export(qcode)

diff --git a/R/selection.R b/R/selection.R
@@ -1,26 +1,3 @@
-#' Makes a bit of javascript that lets us listen in on the selection
-#'
-#' @param editor_name  The name given the editor
-#' @param position The starting row and column location
-#' @param new_text  The new text including the code markup
-#' @param selected_text The text to be marked with a code or codes
-#'
-#' @return javascript text
-#' @export
-#'
-#' @examples
-#'
-make_js_listener <- function(editor_name, position, new_text, selected_text){
-
-  row_num <- position$row + 1
-  col_num <- position$column + (nchar(new_text) - nchar(selected_text))
-
-  script <- paste0("editor__",editor_name,".focus(); editor__",
-                   editor_name,".gotoLine(", row_num, ",", col_num, ");")
-
-  script
-}
-
 #' Adds codes surrounding the selected text
 #'
 #' @param selection The selection of text to be coded

diff --git a/man/make_js_listener.Rd b/man/make_js_listener.Rd