diff options
Diffstat (limited to 'lisp/progmodes/python.el')
| -rw-r--r-- | lisp/progmodes/python.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index f4f0518dbfd..8b5ffae57d6 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el | |||
| @@ -1967,10 +1967,13 @@ indentation levels from right to left." | |||
| 1967 | 1967 | ||
| 1968 | (defun python-indent-dedent-line-backspace (arg) | 1968 | (defun python-indent-dedent-line-backspace (arg) |
| 1969 | "De-indent current line. | 1969 | "De-indent current line. |
| 1970 | Argument ARG is passed to `backward-delete-char-untabify' when | 1970 | Argument ARG is passed to `backward-delete-char-untabify' when point is |
| 1971 | point is not in between the indentation." | 1971 | not in between the indentation or when Transient Mark mode is enabled, |
| 1972 | the mark is active, and ARG is 1." | ||
| 1972 | (interactive "*p") | 1973 | (interactive "*p") |
| 1973 | (unless (python-indent-dedent-line) | 1974 | (when (or |
| 1975 | (and (use-region-p) (= arg 1)) | ||
| 1976 | (not (python-indent-dedent-line))) | ||
| 1974 | (backward-delete-char-untabify arg))) | 1977 | (backward-delete-char-untabify arg))) |
| 1975 | 1978 | ||
| 1976 | (put 'python-indent-dedent-line-backspace 'delete-selection 'supersede) | 1979 | (put 'python-indent-dedent-line-backspace 'delete-selection 'supersede) |