aboutsummaryrefslogtreecommitdiff
path: root/evil-tests.el
diff options
context:
space:
mode:
authorrolag <10981866+rolag@users.noreply.github.com>2021-04-04 21:41:26 +0000
committerGitHub <noreply@github.com>2021-04-04 23:41:26 +0200
commit971c52ed3e0deecef7bb3e9ef81a6b805485e899 (patch)
tree40b88dd0414a88772cb7ccbd7f11da1023e515a9 /evil-tests.el
parent62b6a9237502ba0f60734c3cd710427f381a9786 (diff)
Add "gf" to visual mode (#1438)
Adds `evil-find-file-at-point-visual' for finding a file using the selected visual region. Adds tests for "gf" in both normal and visual modes. Co-authored-by: rolag <rolag@users.noreply.github.com>
Diffstat (limited to 'evil-tests.el')
-rw-r--r--evil-tests.el17
1 files changed, 17 insertions, 0 deletions
diff --git a/evil-tests.el b/evil-tests.el
index 32564b1..5351246 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -8422,6 +8422,23 @@ maybe we need one line more with some text\n")
(set-buffer-modified-p nil))
(kill-buffer (get-file-buffer temp-file)))))))
+(ert-deftest evil-test-find-file ()
+ :tags '(evil jumps)
+ (ert-info ("Normal mode find-file-at-point")
+ (evil-with-temp-file file-name ""
+ (evil-test-buffer
+ (vconcat "i" file-name [escape])
+ (should (not (equal file-name (buffer-file-name (current-buffer)))))
+ ("gf")
+ (should (equal file-name (buffer-file-name (current-buffer)))))))
+ (ert-info ("Visual mode evil-find-file-at-point-visual")
+ (evil-with-temp-file file-name ""
+ (evil-test-buffer
+ (vconcat "iuser@localhost:" file-name "$" [escape])
+ (should (not (equal file-name (buffer-file-name (current-buffer)))))
+ ("0f:lvt$gf")
+ (should (equal file-name (buffer-file-name (current-buffer))))))))
+
(ert-deftest evil-test-jump-buffers ()
:tags '(evil jums)
(skip-unless nil)