diff options
| author | Lars Ingebrigtsen | 2019-08-02 22:04:38 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-08-02 22:04:38 +0200 |
| commit | acb8e331ca1e6914d8c158a6f387e84ce08c4f3b (patch) | |
| tree | d26562e9906d408536ac422de634852c2556ba8f | |
| parent | 44d02d366b7809349d509e6814e67e48d05fef1e (diff) | |
| download | emacs-acb8e331ca1e6914d8c158a6f387e84ce08c4f3b.tar.gz emacs-acb8e331ca1e6914d8c158a6f387e84ce08c4f3b.zip | |
Don't but out on ~/.git files in ede
* lisp/cedet/ede/detect.el (ede--detect-ldf-root-predicate): Make
this work with ~/ as the dir (bug#19521).
| -rw-r--r-- | lisp/cedet/ede/detect.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/cedet/ede/detect.el b/lisp/cedet/ede/detect.el index 3dfb84803b7..d65abce4b3c 100644 --- a/lisp/cedet/ede/detect.el +++ b/lisp/cedet/ede/detect.el | |||
| @@ -135,6 +135,8 @@ Return a cons cell: | |||
| 135 | 135 | ||
| 136 | (defun ede--detect-ldf-root-predicate (dir) | 136 | (defun ede--detect-ldf-root-predicate (dir) |
| 137 | "Non-nil if DIR no longer match `ede--detect-nomatch-auto'." | 137 | "Non-nil if DIR no longer match `ede--detect-nomatch-auto'." |
| 138 | ;; `dir' may be "~/". | ||
| 139 | (setq dir (expand-file-name dir)) | ||
| 138 | (or (ede--detect-stop-scan-p dir) | 140 | (or (ede--detect-stop-scan-p dir) |
| 139 | ;; To know if DIR is at the top, we need to look just above | 141 | ;; To know if DIR is at the top, we need to look just above |
| 140 | ;; to see if there is a match. | 142 | ;; to see if there is a match. |