From 47231166b350db999b9120e3c25c0636013af776 Mon Sep 17 00:00:00 2001 From: Michael Mair-Keimberger Date: Thu, 16 Apr 2026 07:08:00 +0200 Subject: [PATCH] app-emacs/markdown-mode: remove unused patches Signed-off-by: Michael Mair-Keimberger --- .../markdown-mode-2.5-markdown-command.patch | 13 --- ...rkdown-mode-2.6-remove-failing-tests.patch | 91 ------------------- .../files/markdown-mode-2.7-test.patch | 13 --- 3 files changed, 117 deletions(-) delete mode 100644 app-emacs/markdown-mode/files/markdown-mode-2.5-markdown-command.patch delete mode 100644 app-emacs/markdown-mode/files/markdown-mode-2.6-remove-failing-tests.patch delete mode 100644 app-emacs/markdown-mode/files/markdown-mode-2.7-test.patch diff --git a/app-emacs/markdown-mode/files/markdown-mode-2.5-markdown-command.patch b/app-emacs/markdown-mode/files/markdown-mode-2.5-markdown-command.patch deleted file mode 100644 index 99ed3d2149b7..000000000000 --- a/app-emacs/markdown-mode/files/markdown-mode-2.5-markdown-command.patch +++ /dev/null @@ -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")) diff --git a/app-emacs/markdown-mode/files/markdown-mode-2.6-remove-failing-tests.patch b/app-emacs/markdown-mode/files/markdown-mode-2.6-remove-failing-tests.patch deleted file mode 100644 index 4d1396dcb12e..000000000000 --- a/app-emacs/markdown-mode/files/markdown-mode-2.6-remove-failing-tests.patch +++ /dev/null @@ -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 -- -- -- --@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" diff --git a/app-emacs/markdown-mode/files/markdown-mode-2.7-test.patch b/app-emacs/markdown-mode/files/markdown-mode-2.7-test.patch deleted file mode 100644 index a3699fbd3499..000000000000 --- a/app-emacs/markdown-mode/files/markdown-mode-2.7-test.patch +++ /dev/null @@ -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 " ")