diff options
| -rw-r--r-- | lisp/indent-aux.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/lisp/indent-aux.el b/lisp/indent-aux.el index eeb8f1ee6bb..4a05136ac1a 100644 --- a/lisp/indent-aux.el +++ b/lisp/indent-aux.el | |||
| @@ -50,13 +50,14 @@ is yanked." | |||
| 50 | (delete-and-extract-region beg end) | 50 | (delete-and-extract-region beg end) |
| 51 | (buffer-substring beg end)))) | 51 | (buffer-substring beg end)))) |
| 52 | (with-temp-buffer | 52 | (with-temp-buffer |
| 53 | ;; Indent/deindent the same as the major mode in the original | 53 | (let ((inhibit-read-only t)) |
| 54 | ;; buffer. | 54 | ;; Indent/deindent the same as the major mode in the original |
| 55 | (setq indent-tabs-mode i-t-m) | 55 | ;; buffer. |
| 56 | (insert text) | 56 | (setq indent-tabs-mode i-t-m) |
| 57 | (indent-rigidly (point-min) (point-max) | 57 | (insert text) |
| 58 | (- indentation)) | 58 | (indent-rigidly (point-min) (point-max) |
| 59 | (buffer-string)))) | 59 | (- indentation)) |
| 60 | (buffer-string))))) | ||
| 60 | 61 | ||
| 61 | ;;;###autoload | 62 | ;;;###autoload |
| 62 | (define-minor-mode kill-ring-deindent-mode | 63 | (define-minor-mode kill-ring-deindent-mode |