From f0ed483aa3e8bf8345c807a6c0d944f177347c53 Mon Sep 17 00:00:00 2001 From: Tino Calancha Date: Wed, 6 Apr 2016 00:46:02 +0900 Subject: [PATCH 2/2] dired-shell-stuff-it: Consistent indentation * lisp/dired-aux.el (dired-shell-stuff-it): Use spaces for indent this function. --- lisp/dired-aux.el | 34 +++++++++++++++++----------------- 1 file changed, 17 insertions(+), 17 deletions(-) diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index cc6f168..993b453 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -722,24 +722,24 @@ dired-shell-stuff-it ;; (coming from interactive P and currently ignored) to decide what to do. ;; Smart would be a way to access basename or extension of file names. (let* ((in-background (string-match "[ \t]*&[ \t]*\\'" command)) - (command (if in-background - (substring command 0 (match-beginning 0)) - command)) - (sequentially (string-match "[ \t]*;[ \t]*\\'" command)) - (command (if sequentially - (substring command 0 (match-beginning 0)) - command)) + (command (if in-background + (substring command 0 (match-beginning 0)) + command)) + (sequentially (string-match "[ \t]*;[ \t]*\\'" command)) + (command (if sequentially + (substring command 0 (match-beginning 0)) + command)) (parallel-in-background (and in-background (not sequentially))) - (stuff-it - (if (or (string-match-p dired-star-subst-regexp command) - (string-match-p dired-quark-subst-regexp command)) - (lambda (x) - (let ((retval command)) - (while (string-match - "\\(^\\|[ \t]\\)\\([*?]\\)\\([ \t]\\|$\\)" retval) - (setq retval (replace-match x t t retval 2))) - retval)) - (lambda (x) (concat command dired-mark-separator x))))) + (stuff-it + (if (or (string-match-p dired-star-subst-regexp command) + (string-match-p dired-quark-subst-regexp command)) + (lambda (x) + (let ((retval command)) + (while (string-match + "\\(^\\|[ \t]\\)\\([*?]\\)\\([ \t]\\|$\\)" retval) + (setq retval (replace-match x t t retval 2))) + retval)) + (lambda (x) (concat command dired-mark-separator x))))) (concat (cond (on-each (format "%s%s" -- 2.8.0.rc3