Mercurial > emacs
comparison lisp/dired-aux.el @ 27724:ad0510be24fe
(dired-do-copy): Remove spurios character.`n'
within the code.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 17 Feb 2000 09:13:39 +0000 |
parents | 1cf89c82df78 |
children | d651bfda1ace |
comparison
equal
deleted
inserted
replaced
27723:d9c1cf87db61 | 27724:ad0510be24fe |
---|---|
1318 When operating on just the current file, you specify the new name. | 1318 When operating on just the current file, you specify the new name. |
1319 When operating on multiple or marked files, you specify a directory, | 1319 When operating on multiple or marked files, you specify a directory, |
1320 and new copies of these files are made in that directory | 1320 and new copies of these files are made in that directory |
1321 with the same names that the files currently have." | 1321 with the same names that the files currently have." |
1322 (interactive "P") | 1322 (interactive "P") |
1323 n (let ((dired-recursive-copies dired-recursive-copies)) | 1323 (let ((dired-recursive-copies dired-recursive-copies)) |
1324 (dired-do-create-files 'copy (function dired-copy-file) | 1324 (dired-do-create-files 'copy (function dired-copy-file) |
1325 (if dired-copy-preserve-time "Copy [-p]" "Copy") | 1325 (if dired-copy-preserve-time "Copy [-p]" "Copy") |
1326 arg dired-keep-marker-copy | 1326 arg dired-keep-marker-copy |
1327 nil dired-copy-how-to-fn))) | 1327 nil dired-copy-how-to-fn))) |
1328 | 1328 |
1329 ;;;###autoload | 1329 ;;;###autoload |
1330 (defun dired-do-symlink (&optional arg) | 1330 (defun dired-do-symlink (&optional arg) |
1331 "Make symbolic links to current file or all marked (or next ARG) files. | 1331 "Make symbolic links to current file or all marked (or next ARG) files. |
1332 When operating on just the current file, you specify the new name. | 1332 When operating on just the current file, you specify the new name. |