diff options
| author | Christoph Wedler | 2025-12-17 12:27:46 +0100 |
|---|---|---|
| committer | Christoph Wedler | 2025-12-17 12:27:46 +0100 |
| commit | 14f16535ed219f601a423f9a7e0d2adac30fa897 (patch) | |
| tree | d306d4207a22d01de46409777b9edc4f461487a7 | |
| parent | 118b88dd22a46189be7c40560f7039db080cc8ae (diff) | |
| download | emacs-14f16535ed219f601a423f9a7e0d2adac30fa897.tar.gz emacs-14f16535ed219f601a423f9a7e0d2adac30fa897.zip | |
Fix init of auto/not-auto buffer-local vars in antlr-mode
* progmodes/antlr-mode.el (antlr-mode): Fix initialization of
variables, some are actually auto buffer-local and others not.
Patch by Arash Esbati <arash@gnu.org>.
| -rw-r--r-- | lisp/progmodes/antlr-mode.el | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/progmodes/antlr-mode.el b/lisp/progmodes/antlr-mode.el index b31e44c3581..89da0e34148 100644 --- a/lisp/progmodes/antlr-mode.el +++ b/lisp/progmodes/antlr-mode.el | |||
| @@ -3127,14 +3127,14 @@ This function is used in `hack-local-variables-hook'." | |||
| 3127 | (set (make-local-variable 'require-final-newline) mode-require-final-newline) | 3127 | (set (make-local-variable 'require-final-newline) mode-require-final-newline) |
| 3128 | (set (make-local-variable 'outline-regexp) "[^#\n\^M]") | 3128 | (set (make-local-variable 'outline-regexp) "[^#\n\^M]") |
| 3129 | (set (make-local-variable 'outline-level) #'c-outline-level) ;TODO: define own | 3129 | (set (make-local-variable 'outline-level) #'c-outline-level) ;TODO: define own |
| 3130 | (setq comment-start "// " | 3130 | (setq-local comment-start "// " |
| 3131 | comment-end "" | 3131 | comment-end "" |
| 3132 | comment-start-skip "/\\*+ *\\|//+ *") | 3132 | comment-start-skip "/\\*+ *\\|//+ *") |
| 3133 | ;; various ----------------------------------------------------------------- | 3133 | ;; various ----------------------------------------------------------------- |
| 3134 | (set (make-local-variable 'font-lock-defaults) antlr-font-lock-defaults) | 3134 | ;; the following vars are auto buffer-local: |
| 3135 | (set (make-local-variable 'imenu-create-index-function) | 3135 | (setq font-lock-defaults antlr-font-lock-defaults) |
| 3136 | #'antlr-imenu-create-index-function) | 3136 | (setq imenu-create-index-function #'antlr-imenu-create-index-function) |
| 3137 | (set (make-local-variable 'imenu-generic-expression) t) ; fool stupid test | 3137 | (setq imenu-generic-expression t) ; fool stupid test |
| 3138 | ;; FIXME: How does this hook differ from `antlr-mode-hook'? | 3138 | ;; FIXME: How does this hook differ from `antlr-mode-hook'? |
| 3139 | (run-mode-hooks 'antlr-delayed-mode-hook)) | 3139 | (run-mode-hooks 'antlr-delayed-mode-hook)) |
| 3140 | 3140 | ||