mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

* semantic/db-find.el

Browse source 
(semanticdb-find-translate-path-brutish-default): If we don't yet
  have a proper table for PATH, use `semanticdb-current-database'
  instead (bug #10343).
This commit is contained in:
David Engster 2012-03-12 21:51:17 +01:00
parent 225979daf9
commit 41bf0c4844
2 changed files with 11 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/cedet/semantic/db-find.el
View file

@ -325,8 +325,10 @@ Default action as described in `semanticdb-find-translate-path'."
(cond ((null path) semanticdb-current-database)
((semanticdb-table-p path) (oref path parent-db))
(t (let ((tt (semantic-something-to-tag-table path)))
;; @todo - What does this DO ??!?!
(with-current-buffer (semantic-tag-buffer (car tt))
(if tt
;; @todo - What does this DO ??!?!
(with-current-buffer (semantic-tag-buffer (car tt))
semanticdb-current-database)
semanticdb-current-database))))))
(apply
#'nconc