1 files changed, 10 insertions, 0 deletions

@@ -417,5 +417,15 @@ NOMODE will be set when called with \\[universal-argument]."
     (when paste (insert paste))
     (get-buffer bufname)))
 
+(defun +indent-rigidly (arg &optional interactive)
+  "Indent all lines in the region, or the current line.
+This calls `indent-rigidly' and passes ARG to it."
+  (interactive "P\np")
+  (unless (region-active-p)
+    (push-mark)
+    (push-mark (line-beginning-position) nil t)
+    (goto-char (line-end-position)))
+  (call-interactively #'indent-rigidly))
+
 (provide 'acdw)
 ;;; acdw.el ends here