diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-09-20 13:21:28 -0400 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-09-20 13:21:28 -0400 |
| commit | 1e835c22e8ec9e387b4275196103d4d6d0617899 (patch) | |
| tree | bf89aaff52509929a8f034ae89e20da402adbfab /lisp | |
| parent | 525540c0631481f7613bb936db7cc99793f522fd (diff) | |
| download | emacs-1e835c22e8ec9e387b4275196103d4d6d0617899.tar.gz emacs-1e835c22e8ec9e387b4275196103d4d6d0617899.tar.bz2 emacs-1e835c22e8ec9e387b4275196103d4d6d0617899.zip | |
* lisp/cedet/semantic.el (semantic-new-buffer-fcn-was-run, semantic-active-p):
Move from here...
* lisp/cedet/semantic/fw.el: ...to here.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/cedet/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/cedet/semantic.el | 8 | ||||
| -rw-r--r-- | lisp/cedet/semantic/fw.el | 9 |
3 files changed, 15 insertions, 8 deletions
diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog index 61d79b16cb0..ed3301510f0 100644 --- a/lisp/cedet/ChangeLog +++ b/lisp/cedet/ChangeLog @@ -1,3 +1,9 @@ +2013-09-20 Glenn Morris <rgm@gnu.org> + + * semantic.el (semantic-new-buffer-fcn-was-run, semantic-active-p): + Move from here... + * semantic/fw.el: ...to here. + 2013-09-18 Glenn Morris <rgm@gnu.org> * semantic/find.el (semantic-brute-find-first-tag-by-name): diff --git a/lisp/cedet/semantic.el b/lisp/cedet/semantic.el index 909902a71fe..2d62d848625 100644 --- a/lisp/cedet/semantic.el +++ b/lisp/cedet/semantic.el @@ -311,14 +311,6 @@ a parse of the buffer.") (semantic-varalias-obsolete 'semantic-init-db-hooks 'semantic-init-db-hook "23.2") -(defvar semantic-new-buffer-fcn-was-run nil - "Non-nil after `semantic-new-buffer-fcn' has been executed.") -(make-variable-buffer-local 'semantic-new-buffer-fcn-was-run) - -(defsubst semantic-active-p () - "Return non-nil if the current buffer was set up for parsing." - semantic-new-buffer-fcn-was-run) - (defsubst semantic-error-if-unparsed () "Raise an error if current buffer was not parsed by Semantic." (unless semantic-new-buffer-fcn-was-run diff --git a/lisp/cedet/semantic/fw.el b/lisp/cedet/semantic/fw.el index 7850e0462b2..825cdc9f0a4 100644 --- a/lisp/cedet/semantic/fw.el +++ b/lisp/cedet/semantic/fw.el @@ -321,6 +321,15 @@ Avoid using a large BODY since it is duplicated." ;;; Misc utilities ;; + +(defvar semantic-new-buffer-fcn-was-run nil + "Non-nil after `semantic-new-buffer-fcn' has been executed.") +(make-variable-buffer-local 'semantic-new-buffer-fcn-was-run) + +(defsubst semantic-active-p () + "Return non-nil if the current buffer was set up for parsing." + semantic-new-buffer-fcn-was-run) + (defsubst semantic-map-buffers (function) "Run FUNCTION for each Semantic enabled buffer found. FUNCTION does not have arguments. When FUNCTION is entered |