Re: cedet-called-interactively-p

Hi Troy,

cedet-called-interactively-p is in cedet-compat.   If you loaded the 
CEDET that is part of that older Emacs, and then tried to overlay CEDET 
1.1 on top of it, you may have a mix of files where cedet-compat wasn't 
loaded.

Make sure if you load cedet 1.1 on top of Emacs, it is one of the first 
things in your .emacs file.  If you are already doing that, perhaps your 
Emacs install has some pre-loaded configuration that is pulling parts of 
CEDET in.

Eric

On 09/11/2014 06:41 PM, Troy Daniels wrote:
> 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 <http://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

------------------------------------------------------------------------------
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