branch: master
commit fe63a90ccda1523f23d7ca5bcee7b7eeab84db37
Author: Arash Esbati <ar...@gnu.org>
Commit: Arash Esbati <ar...@gnu.org>
Prefer `setq-local' in tex-font.el
* tex-font.el (tex-font-setup): Prefer `setq-local' over `set' and
`make-local-variable' combination.
---
tex-font.el | 25 ++++++++++++-------------
1 file changed, 12 insertions(+), 13 deletions(-)
diff --git a/tex-font.el b/tex-font.el
index 5f483d86..5158c52e 100644
--- a/tex-font.el
+++ b/tex-font.el
@@ -1,18 +1,18 @@
;;; tex-font.el --- Font-Lock support stolen from Emacs 21. -*-
lexical-binding: t; -*-
;;
-;; Copyright (C) 1985-2021 Free Software Foundation, Inc.
+;; Copyright (C) 1985-2024 Free Software Foundation, Inc.
;; Maintainer: auctex-devel@gnu.org
;; Keywords: tex, faces
-;; This file is part of AUC TeX.
+;; This file is part of AUCTeX.
-;; AUC TeX is free software; you can redistribute it and/or modify
+;; AUCTeX is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 3, or (at your option)
;; any later version.
-;; AUC TeX is distributed in the hope that it will be useful,
+;; AUCTeX is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
@@ -159,15 +159,14 @@
;;;###autoload
(defun tex-font-setup ()
"Setup font lock support for TeX."
- (set (make-local-variable 'font-lock-defaults)
- '((tex-font-lock-keywords
- tex-font-lock-keywords-1 tex-font-lock-keywords-2)
- nil nil ((?$ . "\"")) nil
- ;; Who ever uses that anyway ???
- (font-lock-mark-block-function . mark-paragraph)
- (font-lock-syntactic-face-function
- . tex-font-lock-syntactic-face-function)))
- )
+ (setq-local font-lock-defaults
+ '((tex-font-lock-keywords
+ tex-font-lock-keywords-1 tex-font-lock-keywords-2)
+ nil nil ((?$ . "\"")) nil
+ ;; Who ever uses that anyway ???
+ (font-lock-mark-block-function . mark-paragraph)
+ (font-lock-syntactic-face-function
+ . tex-font-lock-syntactic-face-function))))
(provide 'tex-font)
