cedet-called-interactively-p

I recently started using emacs on a different computer, and I am having
problems with cedet-called-interactively-p.  There is a macro defined by
that name, but find-file is repeatedly complaining that there is no
function by that name when trying to load a file the first time.  The file
actually loads, so a second attempt is successful, but the first try does
produce an error.

This works with emacs 23.4.1.  It fails with emacs 23.1.1
 (x86_64-redhat-linux-gnu, GTK+ Version 2.18.9) of 2012-03-01 on
c6b18n3.bsys.dev.centos.org.  I am running the two versions on different
machines, but there is a shared home directory, so my .emacs is identical
between them.

Any idea what the problem is, and how to avoid/fix it?

Troy

Much debugging info follows:

I am using cedet from bzr.  The version info is

CEDET Version: 1.1
  Requested File Loaded
  Package Version Version Version
  ----------------------------------------------------------
  cedet: 1.1 ok ok
  eieio: 1.4 ok ok
  semantic: 2.1 ok ok
  srecode: 1.1 ok ok
  ede: 1.1 ok ok
  speedbar: 1.0.4 ok ok
  cogre: 1.1 ok Not Loaded
  cedet-contrib: 1.1 ok Not Loaded

The following is sufficient to cause the problem:

emacs -Q .emacs

(defun safe-load (file)
  "Load FILE if it exists.  If it doesn't, just print a message.  Don't
give an error"
  (if (file-exists-p file)
  (load file)
(message "Unable to find %s" file)))

;; Find cedet.  Place this early in the file so we don't accidentally load
the version that comes with emacs.
(if (featurep 'cedet)
(if (not (string= cedet-version "1.1"))
(error "Wrong version of cedet has already been loaded"))
  (safe-load "~/downloads/cedet-1.1/common/cedet.el"))
(message "Using cedet version %s" cedet-version)
(when (featurep 'semantic-load)
  (if nil
      (progn
(semantic-load-enable-code-helpers)
(global-semantic-decoration-mode 1)
(require 'semantic-decorate-include)
(when (boundp 'header-line-format)
  (global-semantic-stickyfunc-mode 1))
(global-semantic-highlight-func-mode 1)
(if (fboundp 'global-semantic-idle-tag-highlight-mode)
(global-semantic-idle-tag-highlight-mode 1)))
    (progn
      (semantic-load-enable-gaudy-code-helpers)
      (global-semantic-highlight-func-mode 1)
      (if (fboundp 'global-semantic-idle-tag-highlight-mode)
  (global-semantic-idle-tag-highlight-mode 1))
      (global-semantic-tag-folding-mode 1)
      ;; To use additional features for names completion, and displaying of
information for tags & classes
      (require 'semantic-ia)
      ;;(semantic-idle-breadcrumbs-mode t)
)))

(find-file "~/foo.el")

The stack trace is:

Debugger entered--Lisp error: (invalid-function
cedet-called-interactively-p)
  cedet-called-interactively-p(interactive)
  semantic-decoration-mode(1)
  semantic-tag-folding-mode-setup()
  semantic-tag-folding-mode()
  run-hooks(semantic-init-hook)
  semantic-new-buffer-fcn()
  run-hooks(mode-local-init-hook)
  #[nil "À ÁÂ!" [activate-mode-local-bindings run-hooks
mode-local-init-hook] 2]()
  mode-local-map-file-buffers(#[nil "À ÁÂ!" [activate-mode-local-bindings
run-hooks mode-local-init-hook] 2] #[nil " =?" [mode-local--init-mode
major-mode] 2] (#<buffer foo.el>))
  mode-local-post-major-mode-change()
  run-hooks(find-file-hook)
  after-find-file(t t)
  find-file-noselect-1(#<buffer foo.el> "~/foo.el" nil nil "~/foo.el" nil)
  find-file-noselect("~/foo.el" nil nil t)
  find-file("~/foo.el" t)
  call-interactively(find-file nil nil)

------------------------------------------------------------------------------
Want excitement?
Manually upgrade your production database.
When you want reliability, choose Perforce
Perforce version control. Predictably reliable.
http://pubads.g.doubleclick.net/gampad/clk?id=157508191&iu=/4140/ostg.clktrk

_______________________________________________
cedet-semantic mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/cedet-semantic