diff options
| author | Basil L. Contovounesios <contovob@tcd.ie> | 2019-05-16 23:26:27 +0100 |
|---|---|---|
| committer | Basil L. Contovounesios <contovob@tcd.ie> | 2019-05-16 23:26:27 +0100 |
| commit | b2c0eb63dd1f0d68de9bf7f14cc337df51617dcc (patch) | |
| tree | e4293cacb8a3b80d7f334d0f9e002a9ce0134876 /lisp | |
| parent | 9ed0b55848ce8a3049fd82e42cd9ea274410d426 (diff) | |
| download | emacs-b2c0eb63dd1f0d68de9bf7f14cc337df51617dcc.tar.gz emacs-b2c0eb63dd1f0d68de9bf7f14cc337df51617dcc.tar.bz2 emacs-b2c0eb63dd1f0d68de9bf7f14cc337df51617dcc.zip | |
Add docstring to project--read-file-cpd-relative
For discussion, see thread starting at:
https://lists.gnu.org/archive/html/emacs-devel/2019-05/msg00460.html
* lisp/progmodes/project.el (project--read-file-cpd-relative):
Describe arglist as promised by user option
project-read-file-name-function.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/progmodes/project.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index eab508af3ac..cc45a71f576 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el @@ -477,6 +477,10 @@ For the arguments list, see `project--read-file-cpd-relative'." (defun project--read-file-cpd-relative (prompt all-files &optional predicate hist default) + "Read a file name, prompting with PROMPT. +ALL-FILES is a list of possible file name completions. +PREDICATE, HIST, and DEFAULT have the same meaning as in +`completing-read'." (let* ((common-parent-directory (let ((common-prefix (try-completion "" all-files))) (if (> (length common-prefix) 0) |