Emacs mode: fix indentation in blocks which are given options

E.g. indentation was incorrect following “model(block);”.

[skip ci]
silicon
Sébastien Villemot 2023-01-17 18:15:53 +01:00
parent fcdd810eb4
commit 8200c356a7
No known key found for this signature in database
GPG Key ID: 2CECE9350ECEBE4A
2 changed files with 2 additions and 2 deletions

View File

@ -299,7 +299,7 @@ License: GPL-2+ with Autoconf exception
Files: scripts/dynare.el
Copyright: 2010 Yannick Kalantzis
2019-2021 Dynare Team
2019-2023 Dynare Team
License: GPL-3+
Files: mex/sources/gensylv/gensylv.cc

View File

@ -216,7 +216,7 @@
(setq cur-indent (current-indentation)))
((looking-at (concat "^[ \t]*" (eval-when-compile (regexp-opt
dynare-blocks))
"[ \t]*;"))
"\\([ \t]*(.*)\\)?[ \t]*;")) ; NB: match block options if any
;; A block opening keyword was found: we need to indent an extra level
(setq cur-indent (+ (current-indentation) dynare-block-offset))) ; Do the actual indenting
((bobp)