diff options
| author | Stephen Leake <stephen_leake@stephe-leake.org> | 2016-01-27 15:04:33 -0600 |
|---|---|---|
| committer | Stephen Leake <stephen_leake@stephe-leake.org> | 2016-01-29 17:46:18 -0600 |
| commit | a71560b0e3011c04dc86546b1da51b828cdf040a (patch) | |
| tree | 04a1369fc846208937c9412f1d4765f28a2a26e1 /lisp/cedet | |
| parent | 9421b948101689675293a0827ca86321888af83a (diff) | |
| download | emacs-a71560b0e3011c04dc86546b1da51b828cdf040a.tar.gz | |
Implement vc-mtn-find-ignore-file, fix some doc strings
* lisp/cedet/cedet-global.el (cedet-gnu-global-root): Improve doc string.
* lisp/cedet/ede/locate.el (initialize-instance): Improve doc string.
* lisp/vc/vc-git.el (vc-git-find-ignore-file): Fix doc string.
* lisp/vc/vc-mtn.el (vc-mtn-find-ignore-file): New function.
Diffstat (limited to 'lisp/cedet')
| -rw-r--r-- | lisp/cedet/cedet-global.el | 6 | ||||
| -rw-r--r-- | lisp/cedet/ede/locate.el | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/lisp/cedet/cedet-global.el b/lisp/cedet/cedet-global.el index def023d3837..f1cc3c905f0 100644 --- a/lisp/cedet/cedet-global.el +++ b/lisp/cedet/cedet-global.el @@ -127,9 +127,9 @@ Signal an error if Gnu global not available." (message "%s" (cedet-gnu-global-root))) (defun cedet-gnu-global-root (&optional dir) - "Return the root of any GNU Global scanned project. -If a default starting DIR is not specified, the current buffer's -`default-directory' is used." + "Return the root of any GNU Global scanned project containing DIR. +Returns nil if no GNU Global project can be found. +DIR defaults to `default-directory'." (let ((default-directory (or dir default-directory))) (with-current-buffer (cedet-gnu-global-call (list "-pq")) (goto-char (point-min)) diff --git a/lisp/cedet/ede/locate.el b/lisp/cedet/ede/locate.el index abbfd600488..38d23883951 100644 --- a/lisp/cedet/ede/locate.el +++ b/lisp/cedet/ede/locate.el @@ -231,7 +231,7 @@ variable `cedet-global-command'.") (let* ((default-directory (oref loc root)) (root (cedet-gnu-global-root))) (when (not root) - (error "Cannot use GNU Global in %s" + (error "No GNU Global project found for %s" (oref loc root)))) ) |
