aboutsummaryrefslogtreecommitdiffstats
path: root/test/src
diff options
context:
space:
mode:
authorStefan Kangas2022-08-08 11:50:33 +0200
committerStefan Kangas2022-08-08 11:50:33 +0200
commit60738e569d24b74b9e6973225d143b3468bfc60f (patch)
treec13f8b2999b8af3e2c637af6a7f7185b997d7a83 /test/src
parent77bf50cb330807039cc84138fb84870bd6d532e2 (diff)
downloademacs-60738e569d24b74b9e6973225d143b3468bfc60f.tar.gz
emacs-60738e569d24b74b9e6973225d143b3468bfc60f.zip
Remove no-byte-compile cookie from some libraries
This gives us back byte-compiler warnings for these files. * lisp/mh-e/mh-acros.el: * test/lisp/comint-tests.el: * test/lisp/emacs-lisp/nadvice-tests.el: * test/lisp/emacs-lisp/syntax-tests.el: * test/lisp/xml-tests.el: * test/src/font-tests.el: Remove no-byte-compile cookie. * test/src/font-tests.el (font-parse-explain): Fix warning.
Diffstat (limited to 'test/src')
-rw-r--r--test/src/font-tests.el7
1 files changed, 1 insertions, 6 deletions
diff --git a/test/src/font-tests.el b/test/src/font-tests.el
index d99b0be89e1..7e9669c6513 100644
--- a/test/src/font-tests.el
+++ b/test/src/font-tests.el
@@ -96,8 +96,7 @@ expected font properties from parsing NAME.")
96(put 'font-parse-check 'ert-explainer 'font-parse-explain) 96(put 'font-parse-check 'ert-explainer 'font-parse-explain)
97 97
98(defun font-parse-explain (name prop expected) 98(defun font-parse-explain (name prop expected)
99 (let ((result (font-get (font-spec :name name) prop)) 99 (let ((propname (symbol-name prop)))
100 (propname (symbol-name prop)))
101 (format "Parsing `%s': expected %s `%s', got `%s'." 100 (format "Parsing `%s': expected %s `%s', got `%s'."
102 name (substring propname 1) expected 101 name (substring propname 1) expected
103 (font-get (font-spec :name name) prop)))) 102 (font-get (font-spec :name name) prop))))
@@ -184,9 +183,5 @@ expected font properties from parsing NAME.")
184 :family) 183 :family)
185 'name-with-lots-of-dashes))) 184 'name-with-lots-of-dashes)))
186 185
187;; Local Variables:
188;; no-byte-compile: t
189;; End:
190
191(provide 'font-tests) 186(provide 'font-tests)
192;;; font-tests.el ends here. 187;;; font-tests.el ends here.