Fix 'kill-ring-deindent-mode'
* lisp/indent-aux.el
(kill-ring-deindent-buffer-substring-function): Fix deindenting
for modes which set 'indent-tab-mode' to nil. (Bug#77981)
(cherry picked from commit 1c7fe501fe)
This commit is contained in:
@@ -45,10 +45,14 @@ is yanked."
|
||||
end (max a b)))
|
||||
(let ((indentation (save-excursion (goto-char beg)
|
||||
(current-column)))
|
||||
(i-t-m indent-tabs-mode)
|
||||
(text (if delete
|
||||
(delete-and-extract-region beg end)
|
||||
(buffer-substring beg end))))
|
||||
(with-temp-buffer
|
||||
;; Indent/deindent the same as the major mode in the original
|
||||
;; buffer.
|
||||
(setq indent-tabs-mode i-t-m)
|
||||
(insert text)
|
||||
(indent-rigidly (point-min) (point-max)
|
||||
(- indentation))
|
||||
|
||||
Reference in New Issue
Block a user