From a3647665c71dae350d48c3ff9399bf1a15558ce5 Mon Sep 17 00:00:00 2001 From: Kinneyzhang Date: Tue, 1 Sep 2026 17:26:02 +0800 Subject: [PATCH] test: cover private component autoload wrapper --- tests/etaf-ui-m0b1-doc-contract-tests.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/tests/etaf-ui-m0b1-doc-contract-tests.el b/tests/etaf-ui-m0b1-doc-contract-tests.el index b4a65e0..a20764f 100644 --- a/tests/etaf-ui-m0b1-doc-contract-tests.el +++ b/tests/etaf-ui-m0b1-doc-contract-tests.el @@ -38,8 +38,9 @@ Use Chinese punctuation when CHINESE-P is non-nil." (goto-char (point-min)) (while (re-search-forward "^;;;###autoload[[:space:]]*$" nil t) (forward-comment (point-max)) - (should-not (eq (car-safe (read (current-buffer))) - 'etaf-define-component)))))) + (should-not + (memq (car-safe (read (current-buffer))) + '(etaf-define-component etaf-ui--define-component))))))) (ert-deftest etaf-ui-package-reload-keeps-identical-catalog-definitions () "Allow package.el to reload exact catalog files without duplicate owners."