01/03: etc: indent-code.el: Remove any existing tabs.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 0b17dc4aaea85bf0e35184909914f81761fedf56
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Wed Jun 2 14:26:28 2021 +0200

    etc: indent-code.el: Remove any existing tabs.
    
    * etc/indent-code.el (main): Call UNTABIFY on the sexp or entire buffer.
---
 etc/indent-code.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/etc/indent-code.el b/etc/indent-code.el
index 84b15b3..bdea8ee 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!")))