diff options
| author | Elías Gabriel Pérez | 2025-11-08 20:04:30 +0200 |
|---|---|---|
| committer | Juri Linkov | 2025-11-08 20:04:30 +0200 |
| commit | ef2584585b095fff1e045e58673d2a7c8f9af799 (patch) | |
| tree | fbbf0d28b31700c50b624ddc87bbd06d22e02465 /lisp/progmodes/lua-mode.el | |
| parent | 5d11ee9f54a2795f648d6daa5321866dfec37bac (diff) | |
| download | emacs-ef2584585b095fff1e045e58673d2a7c8f9af799.tar.gz emacs-ef2584585b095fff1e045e58673d2a7c8f9af799.zip | |
hideshow: Rework previous changes
* lisp/progmodes/hideshow.el: Set default values of buffer-local variables.
(hs-inside-comment-p): Restore.
(hs--set-variable): Rename from 'hs--get-mode-value'.
(hs-grok-mode-type): Rework.
* lisp/nxml/nxml-mode.el:
* lisp/progmodes/f90.el:
* lisp/progmodes/fortran.el:
* lisp/progmodes/icon.el:
* lisp/progmodes/lua-mode.el:
* lisp/progmodes/python.el:
* lisp/progmodes/verilog-mode.el:
* lisp/progmodes/vhdl-mode.el:
* lisp/textmodes/mhtml-mode.el:
* lisp/textmodes/sgml-mode.el:
* lisp/treesit.el (treesit-major-mode-setup): Rename
'hs-forward-sexp-func' to 'hs-forward-sexp-function',
'hs-adjust-block-beginning' to 'hs-adjust-block-beginning-function',
'hs-find-block-beginning-func' to 'hs-find-block-beginning-function',
'hs-find-next-block-func' to 'hs-find-next-block-function',
'hs-looking-at-block-start-p-func' to 'hs-looking-at-block-start-predicate',
'hs-inside-comment-p-func' to 'hs-inside-comment-predicate'.
Diffstat (limited to 'lisp/progmodes/lua-mode.el')
| -rw-r--r-- | lisp/progmodes/lua-mode.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/lua-mode.el b/lisp/progmodes/lua-mode.el index ac71950988f..8f59e32e586 100644 --- a/lisp/progmodes/lua-mode.el +++ b/lisp/progmodes/lua-mode.el | |||
| @@ -555,7 +555,7 @@ See `imenu-generic-expression'.") | |||
| 555 | ;; Hide-show setup | 555 | ;; Hide-show setup |
| 556 | (setq-local hs-block-start-regexp (regexp-opt (mapcar 'car lua-sexp-alist) 'words)) | 556 | (setq-local hs-block-start-regexp (regexp-opt (mapcar 'car lua-sexp-alist) 'words)) |
| 557 | (setq-local hs-block-end-regexp (regexp-opt (mapcar 'cdr lua-sexp-alist) 'words)) | 557 | (setq-local hs-block-end-regexp (regexp-opt (mapcar 'cdr lua-sexp-alist) 'words)) |
| 558 | (setq-local hs-forward-sexp-func #'lua-forward-sexp)) | 558 | (setq-local hs-forward-sexp-function #'lua-forward-sexp)) |
| 559 | 559 | ||
| 560 | ;;;###autoload | 560 | ;;;###autoload |
| 561 | (add-to-list 'auto-mode-alist '("\\.lua\\'" . lua-mode)) | 561 | (add-to-list 'auto-mode-alist '("\\.lua\\'" . lua-mode)) |