diff options
| author | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-06-02 14:26:28 +0200 |
|---|---|---|
| committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2021-06-12 10:26:02 +0200 |
| commit | 0b17dc4aaea85bf0e35184909914f81761fedf56 (patch) | |
| tree | c7f8b17000623718383fc9ffc3806b8151b3563e /etc | |
| parent | f5d9d6ec68f78f5651bd5a698f489ab57bf77d5d (diff) | |
| download | guix-0b17dc4aaea85bf0e35184909914f81761fedf56.tar.gz | |
etc: indent-code.el: Remove any existing tabs.
* etc/indent-code.el (main): Call UNTABIFY on the sexp or entire buffer.
Diffstat (limited to 'etc')
| -rwxr-xr-x | etc/indent-code.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/etc/indent-code.el b/etc/indent-code.el index 84b15b356f..bdea8ee8bf 100755 --- a/etc/indent-code.el +++ b/etc/indent-code.el @@ -99,6 +99,8 @@ nil t) (let ((indent-tabs-mode nil)) (beginning-of-defun) + (mark-sexp) + (untabify (point) (mark)) (indent-sexp) (save-buffer) (message "Done!")) @@ -108,6 +110,7 @@ ;; Indent all of FILE-NAME. (find-file file-name) (let ((indent-tabs-mode nil)) + (untabify (point-min) (point-max)) (indent-region (point-min) (point-max)) (save-buffer) (message "Done!"))) |