Hi,
I downloaded JDEE 2.2.8 and installed it for my GNU Emacs 20.7.1 on Win2000
with all the necessary add ons. JDEE seems to run just fine. Speedbar 0.13
doesn't show any icons as I have seen them on the Speedbar Website and I get
the following message when I try to open the method tree within speedbar for
a file (LoginHandler.java for example):
"Symbol's function definition is void: prefix-group".
Can anyone give me a hint on how to get speedbar to run properly?
Greetings
Ralf
-------
With debug mode on the backtrace looks like this:
prefix-group((("LoginHandler" type "class" (... ... ...) (nil
"AgiUserLogin") (...) nil nil #<overlay from 212 to 1670 in
LoginHandler.java>)))
funcall(prefix-group (("LoginHandler" type "class" (... ... ...) (nil
"AgiUserLogin") (...) nil nil #<overlay from 212 to 1670 in
LoginHandler.java>)))
(setq lst (funcall (car methods) lst) methods (cdr methods))
(while methods (setq lst (funcall ... lst) methods (cdr methods)))
(let* ((f ...) (methods ...) (lst ...)) (while methods (setq lst ...
methods ...)) lst)
speedbar-create-tag-hierarchy((("LoginHandler" type "class" (... ... ...)
(nil "AgiUserLogin") (...) nil nil #<overlay from 212 to 1670 in
LoginHandler.java>)))
(let ((sordid ...)) (while sordid (cond ... ... ...) (setq sordid ...)))
semantic-sb-buttons-plain(1 (("LoginHandler" type "class" (... ... ...)
(nil "AgiUserLogin") (...) nil nil #<overlay from 212 to 1670 in
LoginHandler.java>)))
(if (<= (length ...) semantic-sb-autoexpand-length)
(semantic-sb-buttons-plain (1+ level) (cdr tmp)) (speedbar-make-tag-line
(quote curly) 43 (quote semantic-sb-expand-group) (cdr tmp) (car ...) nil
nil (quote speedbar-tag-face) (1+ level)))
(if (cdr tmp) (if (<= ... semantic-sb-autoexpand-length)
(semantic-sb-buttons-plain ... ...) (speedbar-make-tag-line ... 43 ... ...
... nil nil ... ...)))
(while lst (setq tmp (car lst)) (if (cdr tmp) (if ... ... ...)) (setq lst
(cdr lst)))
(let (tmp) (while lst (setq tmp ...) (if ... ...) (setq lst ...)))
(save-restriction (narrow-to-region (point-min) (point)) (let (tmp) (while
lst ... ... ...)))
semantic-sb-buttons(0 (("Classes" ("LoginHandler" type "class" ... ... ...
nil nil #<overlay from 212 to 1670 in LoginHandler.java>)) ("Imports"
("com.sssw.rt.util.*" include nil nil nil #<overlay from 73 to 99 in
LoginHandler.java>) ("java.io.*" include nil nil nil #<overlay from 100 to
117 in LoginHandler.java>) ("org.apache.log4j.*" include nil nil nil
#<overlay from 118 to 144 in LoginHandler.java>)) ("Package"
("de.inovex.tools" package nil nil nil #<overlay from 47 to 71 in
LoginHandler.java>))))
semantic-insert-bovine-list(0 (("Classes" ("LoginHandler" type "class" ...
... ... nil nil #<overlay from 212 to 1670 in LoginHandler.java>))
("Imports" ("com.sssw.rt.util.*" include nil nil nil #<overlay from 73 to 99
in LoginHandler.java>) ("java.io.*" include nil nil nil #<overlay from 100
to 117 in LoginHandler.java>) ("org.apache.log4j.*" include nil nil nil
#<overlay from 118 to 144 in LoginHandler.java>)) ("Package"
("de.inovex.tools" package nil nil nil #<overlay from 47 to 71 in
LoginHandler.java>))))
funcall(semantic-insert-bovine-list 0 (("Classes" ("LoginHandler" type
"class" ... ... ... nil nil #<overlay from 212 to 1670 in
LoginHandler.java>)) ("Imports" ("com.sssw.rt.util.*" include nil nil nil
#<overlay from 73 to 99 in LoginHandler.java>) ("java.io.*" include nil nil
nil #<overlay from 100 to 117 in LoginHandler.java>) ("org.apache.log4j.*"
include nil nil nil #<overlay from 118 to 144 in LoginHandler.java>))
("Package" ("de.inovex.tools" package nil nil nil #<overlay from 47 to 71 in
LoginHandler.java>))))
(save-excursion (end-of-line) (forward-char 1) (funcall (car lst) indent
(cdr lst)))
(progn (save-excursion (end-of-line) (forward-char 1) (funcall ... indent
...)))
(let ((inhibit-read-only t)) (progn (save-excursion ... ... ...)))
(speedbar-with-writable (save-excursion (end-of-line) (forward-char 1)
(funcall ... indent ...)))
(if (not lst) (speedbar-change-expand-button-char 63)
(speedbar-change-expand-button-char 45) (speedbar-with-writable
(save-excursion ... ... ...)))
(let* ((fn ...) (mode nil) (lst ...)) (if (not lst)
(speedbar-change-expand-button-char 63) (speedbar-change-expand-button-char
45) (speedbar-with-writable ...)))
(cond ((string-match "+" text) (let* ... ...)) ((string-match "-" text)
(speedbar-change-expand-button-char 43) (speedbar-delete-subblock indent))
(t (error "Ooops... not sure what to do")))
speedbar-tag-file("[+]" "LoginHandler.java" 0)
funcall(speedbar-tag-file "[+]" "LoginHandler.java" 0)
(and fn (funcall fn txt tok dent))
(let* ((speedbar-frame ...) (fn ...) (tok ...) (tp ...) (np ...) (txt ...)
(dent ...)) (and fn (funcall fn txt tok dent)))
speedbar-do-function-pointer()
(let ((speedbar-power-click dframe-power-click))
(speedbar-do-function-pointer))
speedbar-click((double-down-mouse-1 (#<window 5 on SPEEDBAR> 88 (16 .
64) -23150802) 2))
funcall(speedbar-click (double-down-mouse-1 (#<window 5 on SPEEDBAR> 88
(16 . 64) -23150802) 2))
dframe-click((double-down-mouse-1 (#<window 5 on SPEEDBAR> 88 (16 .
64) -23150802) 2))
(cond ((eq ... ...) (dframe-mouse-set-point e)) ((eq ... ...)
(dframe-quick-mouse e)) ((or ... ...) (dframe-click e)))
dframe-double-click((double-down-mouse-1 (#<window 5 on SPEEDBAR> 88 (16
. 64) -23150802) 2))
call-interactively(dframe-double-click)