test: cover private component autoload wrapper
This commit is contained in:
parent
6a1d816292
commit
a3647665c7
@ -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."
|
||||
|
||||
Loading…
Reference in New Issue
Block a user