diff options
author | Andrea Corallo <akrl@sdf.org> | 2022-07-08 15:54:20 +0200 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2022-07-08 16:03:09 +0200 |
commit | 844a284af8c05d8df548c46c635c5291436edefe (patch) | |
tree | a1900634af9a8cf8551ae946abe866b4b9cf0e34 /test/src/comp-resources/comp-test-45603.el | |
parent | 8be8f088d1c664818d59df71438a10acbd43a727 (diff) | |
download | emacs-scratch/bug#48029.tar.gz |
Remove uneffective testscratch/bug#48029
* test/src/comp-tests.el (45603-1): Remove test.
* test/src/comp-resources/comp-test-45603.el: Delete.
Diffstat (limited to 'test/src/comp-resources/comp-test-45603.el')
-rw-r--r-- | test/src/comp-resources/comp-test-45603.el | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/test/src/comp-resources/comp-test-45603.el b/test/src/comp-resources/comp-test-45603.el deleted file mode 100644 index 65147ee0156..00000000000 --- a/test/src/comp-resources/comp-test-45603.el +++ /dev/null @@ -1,29 +0,0 @@ -;;; -*- lexical-binding: t; -*- - -;; Reduced from ivy.el. - -(defvar comp-test-45603-last) -(defvar comp-test-45603-mark-prefix) -(defvar comp-test-45603-directory) -(defvar comp-test-45603-marked-candidates) - -(defun comp-test-45603--call-marked (_action) - (let* ((prefix-len (length comp-test-45603-mark-prefix)) - (marked-candidates - (mapcar - (lambda (s) - (let ((cand (substring s prefix-len))) - (if comp-test-45603-directory - (expand-file-name cand comp-test-45603-directory) - cand))) - comp-test-45603-marked-candidates)) - (_multi-action (comp-test-45603--get-multi-action comp-test-45603-last))) - marked-candidates)) - -(defalias 'comp-test-45603--file-local-name - (if (fboundp 'file-local-name) - #'file-local-name - (lambda (file) - (or (file-remote-p file 'localname) file)))) - -(provide 'comp-test-45603) |