=== modified file 'lisp/dired-x.el' --- lisp/dired-x.el 2012-09-25 04:13:02 +0000 +++ lisp/dired-x.el 2012-12-06 13:47:11 +0000 @@ -1114,6 +1114,7 @@ (if (null default) ;; Nothing to guess (read-shell-command prompt nil 'dired-shell-command-history) + (setq prompt (replace-regexp-in-string ": $" " " prompt)) (if (listp default) ;; More than one guess (setq default-list default @@ -1124,7 +1125,7 @@ ;; Just one guess (setq default-list (list default))) ;; Put the first guess in the prompt but not in the initial value. - (setq prompt (concat prompt (format "[%s] " default))) + (setq prompt (concat prompt (format "[%s]: " default))) ;; All guesses can be retrieved with M-n (setq val (read-shell-command prompt nil 'dired-shell-command-history