diff options
Diffstat (limited to 'lisp/progmodes/project.el')
| -rw-r--r-- | lisp/progmodes/project.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el index eaa2f9aa405..26b32b4b750 100644 --- a/lisp/progmodes/project.el +++ b/lisp/progmodes/project.el | |||
| @@ -42,7 +42,7 @@ that it is not applicable, or a project instance.") | |||
| 42 | The directories in which we can look for the declarations or | 42 | The directories in which we can look for the declarations or |
| 43 | other references to the symbols used in the current buffer. | 43 | other references to the symbols used in the current buffer. |
| 44 | Depending on the language, it should include the headers search | 44 | Depending on the language, it should include the headers search |
| 45 | path, load path, class path, or so on. | 45 | path, load path, class path, and so on. |
| 46 | 46 | ||
| 47 | The directory names should be absolute. Normally set by the | 47 | The directory names should be absolute. Normally set by the |
| 48 | major mode. Used in the default implementation of | 48 | major mode. Used in the default implementation of |
| @@ -61,8 +61,8 @@ The directory name should be absolute.") | |||
| 61 | (cl-defgeneric project-search-path (project) | 61 | (cl-defgeneric project-search-path (project) |
| 62 | "Return the list of source directories. | 62 | "Return the list of source directories. |
| 63 | Including any where source (or header, etc) files used by the | 63 | Including any where source (or header, etc) files used by the |
| 64 | current project may be found. Including those outside of the | 64 | current project may be found, inside or outside of the project |
| 65 | project tree. The directory names should be absolute. | 65 | tree. The directory names should be absolute. |
| 66 | 66 | ||
| 67 | A specialized implementation should use the value | 67 | A specialized implementation should use the value |
| 68 | `project-search-path-function', or, better yet, call and combine | 68 | `project-search-path-function', or, better yet, call and combine |
| @@ -71,6 +71,10 @@ major modes used in the project. Alternatively, it can return a | |||
| 71 | user-configurable value." | 71 | user-configurable value." |
| 72 | (project--prune-directories | 72 | (project--prune-directories |
| 73 | (nconc (funcall project-search-path-function) | 73 | (nconc (funcall project-search-path-function) |
| 74 | ;; Include these, because we don't know any better. | ||
| 75 | ;; But a specialized implementation may include only some of | ||
| 76 | ;; the project's subdirectories, if there are no source | ||
| 77 | ;; files at the top level. | ||
| 74 | (project-directories project)))) | 78 | (project-directories project)))) |
| 75 | 79 | ||
| 76 | (cl-defgeneric project-directories (project) | 80 | (cl-defgeneric project-directories (project) |