Mercurial > emacs
changeset 61296:8d1c64f52397
(dired-copy-filename-as-kill): Make `-' arg behave like `-1'. Doc fix.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Mon, 04 Apr 2005 23:58:11 +0000 |
| parents | b5620f09a3b2 |
| children | 787af47a62f2 |
| files | lisp/dired.el |
| diffstat | 1 files changed, 9 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Mon Apr 04 19:54:51 2005 +0000 +++ b/lisp/dired.el Mon Apr 04 23:58:11 2005 +0000 @@ -1937,10 +1937,11 @@ "Copy names of marked (or next ARG) files into the kill ring. The names are separated by a space. With a zero prefix arg, use the absolute file name of each marked file. -With \\[universal-argument], use the file name sans directory of each marked file. +With \\[universal-argument], use the file name relative to the Dired buffer's +`default-directory'. (This still may contain slashes if in a subdirectory.) -If on a subdir headerline, use subdirname instead; prefix arg is ignored -in this case. +If on a subdir headerline, use absolute subdirname instead; +prefix arg and marked files are ignored in this case. You can then feed the file name(s) to other commands with \\[yank]." (interactive "P") @@ -1950,10 +1951,11 @@ (if arg (cond ((zerop (prefix-numeric-value arg)) (dired-get-marked-files)) - ((integerp arg) - (dired-get-marked-files 'no-dir arg)) - (t ; else a raw arg - (dired-get-marked-files t))) + ((consp arg) + (dired-get-marked-files t)) + (t + (dired-get-marked-files + 'no-dir (prefix-numeric-value arg)))) (dired-get-marked-files 'no-dir)) " ")))) (if (eq last-command 'kill-region)