* lisp/cedet/semantic.el (semantic-new-buffer-fcn-was-run, semantic-active-p):

Move from here...
* lisp/cedet/semantic/fw.el: ...to here.

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