aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEshel Yaron2025-10-01 08:42:40 +0200
committerEshel Yaron2025-10-01 08:42:40 +0200
commit3cff47ec75a40fd7309e75bd42b9d598ad079be0 (patch)
tree9cff05a0cbc96726eb38dc03696bb8fe230610e9
parenta7c1b126fac0d704c5488bef34003bf7187c3692 (diff)
downloademacs-3cff47ec75a40fd7309e75bd42b9d598ad079be0.tar.gz
emacs-3cff47ec75a40fd7309e75bd42b9d598ad079be0.zip
; elisp-scope.el: Rename 'declaration' role.
* lisp/emacs-lisp/elisp-scope.el (declaration): Rename to 'function-property-declaration'. (elisp-scope-lambda): * lisp/progmodes/elisp-mode.el (elisp-function-property-declaration): Update accordingly.
-rw-r--r--lisp/emacs-lisp/elisp-scope.el10
-rw-r--r--lisp/progmodes/elisp-mode.el4
2 files changed, 7 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/elisp-scope.el b/lisp/emacs-lisp/elisp-scope.el
index 5cb9a15f12a..f91f052fbb1 100644
--- a/lisp/emacs-lisp/elisp-scope.el
+++ b/lisp/emacs-lisp/elisp-scope.el
@@ -242,10 +242,10 @@ NAME inherits properties that do not appear in PROPS from its PARENTS."
242 :imenu "Feature" 242 :imenu "Feature"
243 :help (cl-constantly "Feature definition")) 243 :help (cl-constantly "Feature definition"))
244 244
245(elisp-scope-define-symbol-role declaration () 245(elisp-scope-define-symbol-role function-property-declaration ()
246 :doc "Function attribute declaration types." 246 :doc "Function/macro property declaration types."
247 :face 'elisp-declaration 247 :face 'elisp-function-property-declaration
248 :help (cl-constantly "Declaration")) 248 :help (cl-constantly "Function/macro property declaration"))
249 249
250(elisp-scope-define-symbol-role rx-construct () 250(elisp-scope-define-symbol-role rx-construct ()
251 :doc "`rx' constructs." 251 :doc "`rx' constructs."
@@ -637,7 +637,7 @@ Optional argument LOCAL is a local context to extend."
637 (when-let* ((head (car-safe spec)) 637 (when-let* ((head (car-safe spec))
638 (bare (elisp-scope-sym-bare head))) 638 (bare (elisp-scope-sym-bare head)))
639 (when (symbol-with-pos-p head) 639 (when (symbol-with-pos-p head)
640 (elisp-scope-report 'declaration 640 (elisp-scope-report 'function-property-declaration
641 (symbol-with-pos-pos head) 641 (symbol-with-pos-pos head)
642 (length (symbol-name bare)))) 642 (length (symbol-name bare))))
643 (cl-case bare 643 (cl-case bare
diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index d470adba780..799236d1187 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -358,8 +358,8 @@ the role of each symbol and highlight it accordingly."
358(defface elisp-warning-type '((t :inherit font-lock-type-face)) 358(defface elisp-warning-type '((t :inherit font-lock-type-face))
359 "Face for highlighting byte-compilation warning type names in Emacs Lisp.") 359 "Face for highlighting byte-compilation warning type names in Emacs Lisp.")
360 360
361(defface elisp-declaration '((t :inherit font-lock-variable-use-face)) 361(defface elisp-function-property-declaration '((t :inherit font-lock-variable-use-face))
362 "Face for highlighting function attribute declaration type names.") 362 "Face for highlighting function/macro property declaration type names.")
363 363
364(defface elisp-thing '((t :inherit font-lock-type-face)) 364(defface elisp-thing '((t :inherit font-lock-type-face))
365 "Face for highlighting `thing-at-point' \"thing\" names in Emacs Lisp.") 365 "Face for highlighting `thing-at-point' \"thing\" names in Emacs Lisp.")