app-emacs/markdown-mode: remove unused patches

Signed-off-by: Michael Mair-Keimberger <mm1ke@gentoo.org>
This commit is contained in:
Michael Mair-Keimberger
2026-04-16 07:08:00 +02:00
parent f137600f40
commit 47231166b3
3 changed files with 0 additions and 117 deletions
@@ -1,13 +0,0 @@
dev-python/markdown2 installs its command as markdown2
--- markdown-mode-2.5/markdown-mode.el
+++ markdown-mode-2.5/markdown-mode.el
@@ -94,7 +94,7 @@
:group 'text
:link '(url-link "https://jblevins.org/projects/markdown-mode/"))
-(defcustom markdown-command (let ((command (cl-loop for cmd in '("markdown" "pandoc" "markdown_py")
+(defcustom markdown-command (let ((command (cl-loop for cmd in '("markdown" "pandoc" "markdown2" "markdown_py")
when (executable-find cmd)
return (file-name-nondirectory it))))
(or command "markdown"))
@@ -1,91 +0,0 @@
--- a/tests/markdown-test.el
+++ b/tests/markdown-test.el
@@ -6756,46 +6756,6 @@ x|"
(markdown-indent-region (line-beginning-position) (line-end-position) nil)
(should (string-equal (buffer-string) " #. abc\n def\n"))))
-(ert-deftest test-markdown-ext/wiki-link-rules ()
- "Test wiki link search rules and font lock for missing pages."
- (let ((markdown-enable-wiki-links t)
- (markdown-wiki-link-fontify-missing t)
- (markdown-wiki-link-search-type '(project)))
- (progn
- (find-file (expand-file-name "wiki/root" markdown-test-dir))
- (unwind-protect
- (progn
- (markdown-mode)
- ;; search rules
- (should (string-match-p
- "/sub/foo$"
- (markdown-convert-wiki-link-to-filename "foo")))
- (should (string-equal
- (markdown-convert-wiki-link-to-filename "doesnotexist")
- "doesnotexist"))
- ;; font lock
- (markdown-test-range-has-property 1 11 'font-lock-face 'markdown-link-face)
- (markdown-test-range-has-property 14 33 'font-lock-face 'markdown-missing-link-face)
- (markdown-test-range-has-property 36 42 'font-lock-face 'markdown-link-face)
- (markdown-test-range-has-property 45 60 'font-lock-face 'markdown-missing-link-face))
- (kill-buffer)))
- (progn
- (find-file (expand-file-name "wiki/sub/foo" markdown-test-dir))
- (unwind-protect
- (progn
- (markdown-mode)
- ;; search rules
- (should (string-match-p
- "/wiki/root$"
- (markdown-convert-wiki-link-to-filename "root")))
- (should (string-equal
- (markdown-convert-wiki-link-to-filename "doesnotexist")
- "doesnotexist"))
- ;; font lock
- (markdown-test-range-has-property 1 16 'font-lock-face 'markdown-missing-link-face)
- (markdown-test-range-has-property 19 26 'font-lock-face 'markdown-link-face))
- (kill-buffer)))))
-
(ert-deftest test-markdown-ext/wiki-link-keep-match-data ()
"Test that markdown-wiki-link-p keeps expected match data.
Detail: https://github.com/jrblevin/markdown-mode/pull/590"
@@ -7185,41 +7145,6 @@ foo(bar=None)
(cl-loop for ov in (overlays-in (car bounds) (cdr bounds))
thereis (overlay-get ov 'flyspell-overlay))))
-(ert-deftest test-markdown-flyspell/check-word-p ()
- "Test for `flyspell'."
- (skip-unless (executable-find ispell-program-name))
- (markdown-test-string "aaa
-
-```
-bbb
-```
-
-ccc
-
-`ddd`
-
-eee
-
-<!-- fff -->
-
-@ref9999
-"
- (flyspell-buffer)
- (search-forward "aaa")
- (should (markdown-test-flyspell-incorrect-word-p))
- (search-forward "bbb") ;; in code block
- (should-not (markdown-test-flyspell-incorrect-word-p))
- (search-forward "ccc")
- (should (markdown-test-flyspell-incorrect-word-p))
- (search-forward "ddd") ;; in inline code
- (should-not (markdown-test-flyspell-incorrect-word-p))
- (search-forward "eee")
- (should (markdown-test-flyspell-incorrect-word-p))
- (search-forward "fff") ;; in comment
- (should-not (markdown-test-flyspell-incorrect-word-p))
- (search-forward "@ref") ;; pandoc reference
- (should-not (markdown-test-flyspell-incorrect-word-p))))
-
(ert-deftest test-markdown-flyspell/remove-overlay ()
"Test non-dictionary word in code block with `flyspell-mode'.
Details: https://github.com/jrblevin/markdown-mode/issues/311"
@@ -1,13 +0,0 @@
This test seems to expect interactive input, therefore disable.
--- a/tests/markdown-test.el
+++ b/tests/markdown-test.el
@@ -7102,7 +7102,7 @@ Detail: https://github.com/jrblevin/markdown-mode/pull/590"
(should (string= (markdown-wiki-link-link) "Zettel Markdown")))
(kill-buffer)))))
-(ert-deftest test-markdown-ext/wiki-link-search-under-project ()
+(defun --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 " ")