From 165032cfec62270c63ca3f2ab507a64c078a83b8 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 14 Mar 2026 23:08:45 -0400 Subject: [PATCH] refactor(lib): remove doom/dumb-{de,in}dent commands These two commands aren't used anywhere and the specifics of how people *want* these sort of commands to work are so specialized and niche that ours are unlikely to suit most people's needs. As an alternative, Evil users already have `evil-shift-right` and `evil-shift-left`, and vanilla users can `(setq tab-always-indent nil)`, among *many* other possible choices. --- lisp/lib/text.el | 26 -------------------------- 1 file changed, 26 deletions(-) diff --git a/lisp/lib/text.el b/lisp/lib/text.el index 63a411988..ae574cc2b 100644 --- a/lisp/lib/text.el +++ b/lisp/lib/text.el @@ -292,32 +292,6 @@ line to beginning of line. Same as `evil-delete-back-to-indentation'." (let ((kill-ring nil) (kill-ring-yank-pointer nil)) (ignore-errors (backward-kill-word arg)))) -;;;###autoload -(defun doom/dumb-indent () - "Inserts a tab character (or spaces x tab-width)." - (interactive) - (if indent-tabs-mode - (insert "\t") - (let* ((movement (% (current-column) tab-width)) - (spaces (if (= 0 movement) tab-width (- tab-width movement)))) - (insert (make-string spaces ? ))))) - -;;;###autoload -(defun doom/dumb-dedent () - "Dedents the current line." - (interactive) - (if indent-tabs-mode - (call-interactively #'backward-delete-char) - (unless (bolp) - (save-excursion - (when (> (current-column) (current-indentation)) - (back-to-indentation)) - (let ((movement (% (current-column) tab-width))) - (delete-char - (- (if (= 0 movement) - tab-width - (- tab-width movement))))))))) - ;;;###autoload (defun doom/retab (arg &optional beg end) "Converts tabs-to-spaces or spaces-to-tabs within BEG and END (defaults to