diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2018-07-07 09:54:25 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2018-07-07 09:54:25 +0200 |
commit | 85bf63730fd23854a77fa15679a1364c6eee25e5 (patch) | |
tree | cc86b3db843916ac9c44ad39aabf04b2b91b3e10 /helm-files.el | |
parent | c2d4f0ccc00fa875666722eb8942ca650a89b304 (diff) |
Add docstring
* helm-files.el (helm-restore-file-from-trash): Do it.
(helm-restore-file-from-trash-1): Do it.
Diffstat (limited to 'helm-files.el')
-rw-r--r-- | helm-files.el | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/helm-files.el b/helm-files.el index 73b1da4b..d4d01659 100644 --- a/helm-files.el +++ b/helm-files.el @@ -2958,6 +2958,12 @@ Return candidates prefixed with basename of `helm-input' first." (t actions)))) (defun helm-restore-file-from-trash (_candidate) + "Restore marked-files from a Trash directory. + +The Trash directory should be a directory compliant with +<http://freedesktop.org/wiki/Specifications/trash-spec> and each file +should have its '*.trashinfo' correspondent file in Trash/info +directory." (let* ((mkd (helm-marked-candidates :with-wildcard t)) (default-directory (file-name-as-directory helm-ff-default-directory)) @@ -2992,11 +2998,9 @@ Return candidates prefixed with basename of `helm-input' first." (message "Restored %s files from trash done" (length mkd))))) (defun helm-restore-file-from-trash-1 (file trashed-files) - "Restore FILE from a Trash directory. - -The Trash directory should be a directory compliant with -<http://freedesktop.org/wiki/Specifications/trash-spec> and FILE should -have its '*.trashinfo' correspondent file in Trash/info directory." + "Restore FILE from a trash directory. +Arg TRASHED-FILES is the list of files in the trash directory obtained +with 'trash-list' command." (let ((info-file (concat (helm-reduce-file-name file 2) "info/" (helm-basename file) |