diff options
| author | Lionel Henry <lionel.hry@gmail.com> | 2021-01-23 12:55:49 +0100 |
|---|---|---|
| committer | Lionel Henry <lionel.hry@gmail.com> | 2021-01-23 12:55:49 +0100 |
| commit | af7a718d0b82da451bb547e775a166dac4b60841 (patch) | |
| tree | 8365d51cfc97a5efcd2ec95199610aee370c38ca /test/ess-test-r.el | |
| parent | 1c77e93c9f810e95afe75b7f908bbc3aa50e219b (diff) | |
Unexport internal functions and variables for R help
Diffstat (limited to 'test/ess-test-r.el')
| -rw-r--r-- | test/ess-test-r.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/ess-test-r.el b/test/ess-test-r.el index a185edc..0b70bd2 100644 --- a/test/ess-test-r.el +++ b/test/ess-test-r.el @@ -668,7 +668,7 @@ x <- function(x){ (comint-next-prompt 1) (should (equal (line-number-at-pos) 3))) -(ert-deftest ess-r-help-usage-objects-test () +(ert-deftest ess-r-help--usage-objects-test () (with-r-running nil (let ((ess-dialect "R") (inhibit-read-only t)) @@ -690,13 +690,13 @@ Usage: Arguments: ") - (should (equal (ess-r-help-usage-objects) + (should (equal (ess-r-help--usage-objects) '(("dt" "x" "df" "ncp" "log") ("pt" "q" "df" "ncp" "lower.tail" "log.p") ("qt" "p" "df" "ncp" "lower.tail" "log.p") ("rt" "n" "df" "ncp"))))))) -(ert-deftest ess-r-help-usage-objects-comments-test () +(ert-deftest ess-r-help--usage-objects-comments-test () "Comments do not interfere with usage parsing (#1025)." (with-r-running nil (let ((ess-dialect "R") @@ -718,7 +718,7 @@ Usage: Arguments: ") - (let ((x (ess-r-help-usage-objects))) + (let ((x (ess-r-help--usage-objects))) (should (or (equal x '(("SJ" "...") ("CJ" "..." "sorted" "unique"))) ;; 'data.table' package is not necessarily available/visible |