diff options
| author | Matthias Meulien | 2022-09-30 22:46:35 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2022-10-01 11:58:27 +0200 |
| commit | abc955d017cc4e6ad33d06d61f8317bd2b6c380f (patch) | |
| tree | 3af8aec8b619967cd1269489a650634a5855d3e7 /test | |
| parent | 454e1a06a2c5194a81148df91da6ee441adb601b (diff) | |
| download | emacs-abc955d017cc4e6ad33d06d61f8317bd2b6c380f.tar.gz emacs-abc955d017cc4e6ad33d06d61f8317bd2b6c380f.zip | |
Rename osc.el to ansi-osc.el (bug#58200)
* lisp/osc.el: Move from here...
* lisp/ansi-osc.el: ...to here.
* test/lisp/osc-tests.el: Move from here...
* test/lisp/ansi-osc-tests.el: ...to here.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/ansi-osc-tests.el (renamed from test/lisp/osc-tests.el) | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test/lisp/osc-tests.el b/test/lisp/ansi-osc-tests.el index d53bab08d3d..b3d66fb036c 100644 --- a/test/lisp/osc-tests.el +++ b/test/lisp/ansi-osc-tests.el | |||
| @@ -26,10 +26,10 @@ | |||
| 26 | 26 | ||
| 27 | ;;; Code: | 27 | ;;; Code: |
| 28 | 28 | ||
| 29 | (require 'osc) | 29 | (require 'ansi-osc) |
| 30 | (require 'ert) | 30 | (require 'ert) |
| 31 | 31 | ||
| 32 | (defvar osc-tests--strings | 32 | (defvar ansi-osc-tests--strings |
| 33 | `( | 33 | `( |
| 34 | ("Hello World" "Hello World") | 34 | ("Hello World" "Hello World") |
| 35 | 35 | ||
| @@ -48,10 +48,10 @@ | |||
| 48 | ;; Don't output those strings to stdout since they may have | 48 | ;; Don't output those strings to stdout since they may have |
| 49 | ;; side-effects on the environment | 49 | ;; side-effects on the environment |
| 50 | 50 | ||
| 51 | (ert-deftest osc-tests-apply-region-no-handlers () | 51 | (ert-deftest ansi-osc-tests-apply-region-no-handlers () |
| 52 | (let ((osc-handlers nil)) | 52 | (let ((ansi-osc-handlers nil)) |
| 53 | (pcase-dolist (`(,input ,text) osc-tests--strings) | 53 | (pcase-dolist (`(,input ,text) ansi-osc-tests--strings) |
| 54 | (with-temp-buffer | 54 | (with-temp-buffer |
| 55 | (insert input) | 55 | (insert input) |
| 56 | (osc-apply-on-region (point-min) (point-max)) | 56 | (ansi-osc-apply-on-region (point-min) (point-max)) |
| 57 | (should (equal (buffer-string) text)))))) | 57 | (should (equal (buffer-string) text)))))) |