diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2009-09-19 17:25:30 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2009-09-19 17:25:30 +0000 |
commit | 1eac105a705a5d055f38e2734c16101d0f550112 (patch) | |
tree | 313c91156edf5eb96d21325c442808aff82957ed /lisp/cedet/semantic/db-global.el | |
parent | 5c5bbb19dc7bc92fef91a761ece153b5c1230f9b (diff) | |
download | emacs-1eac105a705a5d055f38e2734c16101d0f550112.tar.gz emacs-1eac105a705a5d055f38e2734c16101d0f550112.tar.bz2 emacs-1eac105a705a5d055f38e2734c16101d0f550112.zip |
Synch to Eric M. Ludlam's upstream CEDET repository.
* cedet/semantic/db.el (semanticdb-get-buffer): Wrap find-file in
save-match-data.
* cedet/semantic/db-global.el (semanticdb-test-gnu-global): Wrap
find-file in save-match-data.
* cedet/semantic/util.el (semantic-file-tag-table)
(semantic-recursive-find-nonterminal-by-name): Wrap find-file in
save-match-data.
* cedet/semantic/tag.el (semantic-tag-buffer): Wrap find-file in
save-match-data.
* cedet/semantic/tag-file.el (semantic-go-to-tag): Wrap the "goto"
part with save-match-data.
* cedet/semantic/lex-spp.el (semantic-lex-spp-lex-text-string):
Save match data around calling the major mode to enable.
* cedet/semantic/format.el (semantic-format-tag-short-doc-default):
Wrap find-file in save-match-data.
* cedet/semantic/fw.el (semantic-find-file-noselect): Wrap
find-file in save-match-data
Diffstat (limited to 'lisp/cedet/semantic/db-global.el')
-rw-r--r-- | lisp/cedet/semantic/db-global.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/db-global.el b/lisp/cedet/semantic/db-global.el index cf91a0498f4..1b3be12a5fb 100644 --- a/lisp/cedet/semantic/db-global.el +++ b/lisp/cedet/semantic/db-global.el @@ -231,13 +231,15 @@ If optional arg STANDARDFILE is non nil, use a standard file w/ global enabled." (require 'data-debug) (save-excursion (when standardfile - (set-buffer (find-file-noselect semanticdb-test-gnu-global-startfile))) + (save-match-data + (set-buffer (find-file-noselect semanticdb-test-gnu-global-startfile)))) (condition-case err (semanticdb-enable-gnu-global-in-buffer) (error (if standardfile (error err) - (set-buffer (find-file-noselect semanticdb-test-gnu-global-startfile)) + (save-match-data + (set-buffer (find-file-noselect semanticdb-test-gnu-global-startfile))) (semanticdb-enable-gnu-global-in-buffer)))) (let* ((db (semanticdb-project-database-global "global")) |