Skip to content

Commit 7565d2d

Browse files
committed
Backport: Avoid using obsolete indent-relative-maybe
* lisp/electric.el (electric-indent-functions-without-reindent): * lisp/indent.el (indent-according-to-mode): Check for indent-relative-first-indent-point in addition to its obsolete alias indent-relative-maybe. * lisp/obsolete/vi.el (vi-com-map): Use indent-relative-first-indent-point in place of its obsolete alias indent-relative-maybe. (cherry picked from commit 0e468a6)
1 parent 9d7e08d commit 7565d2d

File tree

3 files changed

+10
-8
lines changed

3 files changed

+10
-8
lines changed

lisp/electric.el

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -223,9 +223,9 @@ Python does not lend itself to fully automatic indentation.")
223223

224224
(defvar electric-indent-functions-without-reindent
225225
'(indent-relative indent-to-left-margin indent-relative-maybe
226-
py-indent-line coffee-indent-line org-indent-line yaml-indent-line
227-
haskell-indentation-indent-line haskell-indent-cycle haskell-simple-indent
228-
yaml-indent-line)
226+
indent-relative-first-indent-point py-indent-line coffee-indent-line
227+
org-indent-line yaml-indent-line haskell-indentation-indent-line
228+
haskell-indent-cycle haskell-simple-indent yaml-indent-line)
229229
"List of indent functions that can't reindent.
230230
If `indent-line-function' is one of those, then `electric-indent-mode' will
231231
not try to reindent lines. It is normally better to make the major

lisp/indent.el

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -65,15 +65,17 @@ e.g., `c-tab-always-indent', and do not respect this variable."
6565
"Indent line in proper way for current major mode.
6666
Normally, this is done by calling the function specified by the
6767
variable `indent-line-function'. However, if the value of that
68-
variable is `indent-relative' or `indent-relative-maybe', handle
69-
it specially (since those functions are used for tabbing); in
70-
that case, indent by aligning to the previous non-blank line."
68+
variable is `indent-relative' or `indent-relative-first-indent-point',
69+
handle it specially (since those functions are used for tabbing);
70+
in that case, indent by aligning to the previous non-blank line."
7171
(interactive)
7272
(save-restriction
7373
(widen)
7474
(syntax-propertize (line-end-position))
7575
(if (memq indent-line-function
76-
'(indent-relative indent-relative-maybe))
76+
'(indent-relative
77+
indent-relative-maybe
78+
indent-relative-first-indent-point))
7779
;; These functions are used for tabbing, but can't be used for
7880
;; indenting. Replace with something ad-hoc.
7981
(let ((column (save-excursion

lisp/obsolete/vi.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -132,7 +132,7 @@ command extensions.")
132132
(define-key vi-com-map "\C-e" 'vi-expose-line-below)
133133
(define-key vi-com-map "\C-f" 'vi-forward-windowful)
134134
(define-key vi-com-map "\C-g" 'keyboard-quit)
135-
(define-key vi-com-map "\C-i" 'indent-relative-maybe) ; TAB
135+
(define-key vi-com-map "\C-i" 'indent-relative-first-indent-point) ; TAB
136136
(define-key vi-com-map "\C-j" 'vi-next-line) ; LFD
137137
(define-key vi-com-map "\C-k" 'vi-kill-line) ; extension
138138
(define-key vi-com-map "\C-l" 'recenter)

0 commit comments

Comments
 (0)