about summary refs log tree commit diff stats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/acdw.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index ac17e46..2f41e15 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el
@@ -417,5 +417,15 @@ NOMODE will be set when called with \\[universal-argument]."
417 (when paste (insert paste)) 417 (when paste (insert paste))
418 (get-buffer bufname))) 418 (get-buffer bufname)))
419 419
420(defun +indent-rigidly (arg &optional interactive)
421 "Indent all lines in the region, or the current line.
422This calls `indent-rigidly' and passes ARG to it."
423 (interactive "P\np")
424 (unless (region-active-p)
425 (push-mark)
426 (push-mark (line-beginning-position) nil t)
427 (goto-char (line-end-position)))
428 (call-interactively #'indent-rigidly))
429
420(provide 'acdw) 430(provide 'acdw)
421;;; acdw.el ends here 431;;; acdw.el ends here