diff options
| author | kobarity | 2023-03-10 14:26:22 +0900 |
|---|---|---|
| committer | Dmitry Gutov | 2023-03-11 15:18:47 +0200 |
| commit | c0cf69f7a17b657c784518434e1a049ce6970a43 (patch) | |
| tree | 762ed7c3862345a08310a65940c199e1aff78f7b /lisp/progmodes/python.el | |
| parent | db178517ce73618f7a659e355639893748db2e45 (diff) | |
| download | emacs-c0cf69f7a17b657c784518434e1a049ce6970a43.tar.gz emacs-c0cf69f7a17b657c784518434e1a049ce6970a43.zip | |
Make "case" keyword a dedenter in Python
* lisp/progmodes/python.el (python-rx): Add "case" to dedenter.
(python-info-dedenter-opening-block-positions): Add "case" to pairs.
* test/lisp/progmodes/python-tests.el (python-indent-dedenters-9):
New test.
Diffstat (limited to 'lisp/progmodes/python.el')
| -rw-r--r-- | lisp/progmodes/python.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index 1980815bae9..8793fdc6458 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el | |||
| @@ -426,7 +426,7 @@ This variant of `rx' supports common Python named REGEXPS." | |||
| 426 | (or "def" "for" "with"))) | 426 | (or "def" "for" "with"))) |
| 427 | symbol-end)) | 427 | symbol-end)) |
| 428 | (dedenter (seq symbol-start | 428 | (dedenter (seq symbol-start |
| 429 | (or "elif" "else" "except" "finally") | 429 | (or "elif" "else" "except" "finally" "case") |
| 430 | symbol-end)) | 430 | symbol-end)) |
| 431 | (block-ender (seq symbol-start | 431 | (block-ender (seq symbol-start |
| 432 | (or | 432 | (or |
| @@ -5783,7 +5783,8 @@ likely an invalid python file." | |||
| 5783 | (pairs '(("elif" "elif" "if") | 5783 | (pairs '(("elif" "elif" "if") |
| 5784 | ("else" "if" "elif" "except" "for" "while") | 5784 | ("else" "if" "elif" "except" "for" "while") |
| 5785 | ("except" "except" "try") | 5785 | ("except" "except" "try") |
| 5786 | ("finally" "else" "except" "try"))) | 5786 | ("finally" "else" "except" "try") |
| 5787 | ("case" "case"))) | ||
| 5787 | (dedenter (match-string-no-properties 0)) | 5788 | (dedenter (match-string-no-properties 0)) |
| 5788 | (possible-opening-blocks (cdr (assoc-string dedenter pairs))) | 5789 | (possible-opening-blocks (cdr (assoc-string dedenter pairs))) |
| 5789 | (collected-indentations) | 5790 | (collected-indentations) |