blob: 0bd1e8b7f66739f1c6ff57c1bb7b71dc47749a75 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
This test seems to expect interactive input, therefore disable.
--- markdown-mode-2.5/tests/markdown-test.el
+++ markdown-mode-2.5/tests/markdown-test.el
@@ -6643,25 +6643,6 @@
(should (string= (markdown-wiki-link-link) "Zettel Markdown")))
(kill-buffer)))))
-(ert-deftest test-markdown-ext/wiki-link-search-under-project ()
- "Test that searching link under project root."
- (let ((markdown-enable-wiki-links t)
- (markdown-link-space-sub-char " ")
- (markdown-wiki-link-search-type '(project))
- (expected (expand-file-name "wiki/pr590/Guide/Zettel Markdown/math.md"
- markdown-test-dir)))
- (progn
- (find-file (expand-file-name "wiki/pr590/Guide/Plugin/Link.md" markdown-test-dir))
- (unwind-protect
- (progn
- (markdown-mode)
- (re-search-forward "math")
- (goto-char (match-beginning 0))
- (markdown-wiki-link-p) ;; create match-data
- (let ((link (markdown-convert-wiki-link-to-filename (markdown-wiki-link-link))))
- (should (string= (expand-file-name link) expected))))
- (kill-buffer)))))
-
(ert-deftest test-markdown-ext/wiki-link-major-mode ()
"Test major-mode of linked page."
(let ((markdown-enable-wiki-links t)
|