mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-19 18:13:55 +00:00
Code Issues Releases 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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/cedet/ChangeLog
View File

@ -1,3 +1,10 @@
2012-03-12 David Engster <deng@randomsample.de>
* semantic/db-find.el
(semanticdb-find-translate-path-brutish-default): If we don't yet
have a proper table for PATH, use `semanticdb-current-database'
instead (bug #10343).
2012-03-11 David Engster <deng@randomsample.de>
* semantic/wisent/javascript.el (js-mode): Define `js-mode' as

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