I have tried to install JDE2.1.6beta on a Sun running SunOS 5.7.
I am running XEmacs 20.4.
Relevant part of .emacs and trace of latest problem at end of this email
I have no more than a very elementary knowledge of elisp.
I downloaded and installed the following as indicated by the release notes:
semantic-1.3.1
speedbar-0.13a
elib-1.0
Problems:
semantic requires the 'xemacs feature to be set (I presume to check
whether this is an xemacs or a gnu emacs system)
jde requires regexp-opt.el but that was not part of the xemacs
installation on my system: I got it from an emacs installation
I had to download and install
custom-1.9962
semantic.el contains the line
(defalias 'semantic-overlays-at 'extents-at)
in an 'if' which checks that xemacs is running
However there is no extents-at in my xemacs 20.4. There is an extent-at
(which I am guessing is the correct one and I have added another
defalias accordingly but I am not sure if this is ritgh - there are also
other defaliases that are wrong: there is no 'extents-in' for example.
When I load a java file, it does, at least, go into jde mode and does
the font colourising but the jde menu does not appear. When I set the
debug-on-signal, I see the trace that I have included at the end of this
email.
Can anyone explain what is going on here? Also is it really this
difficult to install JDE? I have tried installing other newish versions
of JDE but with similar problems. There is a very old version installed
on the system but I would really like to be able to use the new
features.
--
Alan P. Sexton,
University of Birmingham Tel: 0121-414 3703
School of Computer Science Fax: 0121-414 4281
Edgbaston, Birmingham B15 2TT, England Email: [EMAIL PROTECTED]
==== Relevant part of .emacs file =================
(defconst my-xemacsp (string-match "XEmacs" (emacs-version))
"Non-nil if we are running in the XEmacs environment.")
(if my-xemacsp
(provide 'xemacs))
(if my-xemacsp
(defalias 'extents-at 'extent-at))
;; Settings for JDE (Java Delevelopment Environment)
(add-to-list 'load-path (expand-file-name "~/lib/emacs/jde-2.2.6beta1/lisp"))
(add-to-list 'load-path (expand-file-name "~/lib/emacs/semantic-1.3.1"))
(add-to-list 'load-path (expand-file-name "~/lib/emacs/speedbar-0.13a"))
(add-to-list 'load-path (expand-file-name "~/lib/emacs/elib-1.0"))
(add-to-list 'load-path (expand-file-name "~/lib/emacs"))
(load-file (expand-file-name "~/lib/emacs/custom-1.9962/custom.elc"))
(require 'regexp-opt)
(require 'jde)
(message "jde should be loaded")
(defun my-jde-mode-hook ()
(setq jde-jdk-doc-url
"http://www.cs.bham.ac.uk/system/documentation/java/")
(c-add-style
"my-java"
'("java"
(c-basic-offset . 4)
(c-hanging-braces-alist . (
(brace-list-open)
(brace-entry-open)
(substatement-open before after)
(block-close . c-snug-do-while)
(extern-lang-open after)
(inexpr-class-open after)
(inexpr-class-close before)
))
))
(c-set-style "my-java")
(setq c-auto-newline t)
(c-set-offset 'substatement-open 0)
(c-set-offset 'statement-cont 0))
(add-hook 'jde-mode-hook 'my-jde-mode-hook)
(message "jde should be completely set up")
====Trace of latest problem ================================================
Signaling: (args-out-of-range 3 32 127)
define-key(#<keymap jde-mode-map 0 entries 0x116b> [3 22 1] nil)
local-unset-key([3 22 1])
(let ((key ...)) (if (string-match "\\[.+]" key) (setq key ...)) (local-unset-key
key))
)
(lambda (binding) (let (...) (if ... ...) (local-unset-key key)))(("[? ? ?]" .
jde-run-menu-run-applet))
mapc-internal((lambda (binding) (let (...) (if ... ...) (local-unset-key key)))
(("[? ? ?]" . jde-run-menu-run-applet) ("[? ? ?]" . jde-build) ("[? ? ?]" .
jde-compile) ("[? ? ?]" . jde-debug) ("[? ? ?]" . jde-wiz-implement-interface)
("[? ? ?j]" . jde-javadoc-generate-javadoc-template) ("[? ? ? ]" . bsh) ("[? ? ?
]" . jde-gen-println) ("[? ? ?]" . jde-browse-jdk-doc) ("[? ? ?]" .
jde-save-project) ("[? ? ?]" . jde-wiz-update-class-list) ("[? ? ?]" . jde-run)
("[? ? ?]" . speedbar-frame-mode) ("[? ? ?]" . jde-db-menu-debug-applet) ("[?
? ?]" . jde-help-symbol) ("[? ? ?]" . jde-show-class-source) ("[? ? ?]" .
jde-wiz-find-and-import) ("[(control c) (control v) (control ?.)]" .
jde-complete-at-point-menu) ("[(control c) (control v) ?.]" . jde-complete-at-point)))
mapc((lambda (binding) (let (...) (if ... ...) (local-unset-key key))) (("[? ?
?]" . jde-run-menu-run-applet) ("[? ? ?]" . jde-build) ("[? ? ?]" .
jde-compile) ("[? ? ?]" . jde-debug) ("[? ? ?]" . jde-wiz-implement-interface)
("[? ? ?j]" . jde-javadoc-generate-javadoc-template) ("[? ? ? ]" . bsh) ("[? ? ?
]" . jde-gen-println) ("[? ? ?]" . jde-browse-jdk-doc) ("[? ? ?]" .
jde-save-project) ("[? ? ?]" . jde-wiz-update-class-list) ("[? ? ?]" . jde-run)
("[? ? ?]" . speedbar-frame-mode) ("[? ? ?]" . jde-db-menu-debug-applet) ("[?
? ?]" . jde-help-symbol) ("[? ? ?]" . jde-show-class-source) ("[? ? ?]" .
jde-wiz-find-and-import) ("[(control c) (control v) (control ?.)]" .
jde-complete-at-point-menu) ("[(control c) (control v) ?.]" . jde-complete-at-point)))
(if (and (boundp ...) jde-key-bindings) (mapc (lambda ... ...) jde-key-bindings))
)
(progn (if (and ... jde-key-bindings) (mapc ... jde-key-bindings)) (mapc (lambda ...
...) val))
)
(if (boundp (quote jde-mode-map)) (progn (if ... ...) (mapc ... val)))
)
(when (boundp (quote jde-mode-map)) (if (and ... jde-key-bindings) (mapc ...
jde-key-bindings)) (mapc (lambda ... ...) val))
)
(save-excursion (set-buffer buf) (when (boundp ...) (if ... ...) (mapc ... val)))
)
(lambda (buf) (save-excursion (set-buffer buf) (when ... ... ...)))(#<buffer
"y.java">)
mapc-internal((lambda (buf) (save-excursion (set-buffer buf) (when ... ... ...)))
(#<buffer "y.java">))
mapc((lambda (buf) (save-excursion (set-buffer buf) (when ... ... ...))) (#<buffer
"y.java">))
(lambda (sym val) (mapc (lambda ... ...) (jde-get-java-source-buffers)) (set-default
sym val))(jde-key-bindings (("[? ? ?]" . jde-run-menu-run-applet) ("[? ? ?]" .
jde-build) ("[? ? ?]" . jde-compile) ("[? ? ?]" . jde-debug) ("[? ? ?]" .
jde-wiz-implement-interface) ("[? ? ?j]" . jde-javadoc-generate-javadoc-template)
("[? ? ? ]" . bsh) ("[? ? ? ]" . jde-gen-println) ("[? ? ?]" .
jde-browse-jdk-doc) ("[? ? ?]" . jde-save-project) ("[? ? ?]" .
jde-wiz-update-class-list) ("[? ? ?]" . jde-run) ("[? ? ?]" .
speedbar-frame-mode) ("[? ? ?]" . jde-db-menu-debug-applet) ("[? ? ?]" .
jde-help-symbol) ("[? ? ?]" . jde-show-class-source) ("[? ? ?]" .
jde-wiz-find-and-import) ("[(control c) (control v) (control ?.)]" .
jde-complete-at-point-menu) ("[(control c) (control v) ?.]" . jde-complete-at-point)))
funcall((lambda (sym val) (mapc (lambda ... ...) (jde-get-java-source-buffers))
(set-default sym val)) jde-key-bindings (("[? ? ?]" . jde-run-menu-run-applet)
("[? ? ?]" . jde-build) ("[? ? ?]" . jde-compile) ("[? ? ?]" . jde-debug)
("[? ? ?]" . jde-wiz-implement-interface) ("[? ? ?j]" .
jde-javadoc-generate-javadoc-template) ("[? ? ? ]" . bsh) ("[? ? ? ]" .
jde-gen-println) ("[? ? ?]" . jde-browse-jdk-doc) ("[? ? ?]" . jde-save-project)
("[? ? ?]" . jde-wiz-update-class-list) ("[? ? ?]" . jde-run) ("[? ? ?]" .
speedbar-frame-mode) ("[? ? ?]" . jde-db-menu-debug-applet) ("[? ? ?]" .
jde-help-symbol) ("[? ? ?]" . jde-show-class-source) ("[? ? ?]" .
jde-wiz-find-and-import) ("[(control c) (control v) (control ?.)]" .
jde-complete-at-point-menu) ("[(control c) (control v) ?.]" . jde-complete-at-point)))
(if saved-val (funcall set symbol (eval ...)) (funcall set symbol (eval ...)))
)
(let ((saved-val ...) (std-val ...) (set ...)) (if saved-val (funcall set symbol
...) (funcall set symbol ...)))
)
(progn (let (... ... ...) (if saved-val ... ...)))
)
(if (and (string-match "jde-" ...) (get symbol ...)) (progn (let ... ...)))
)
(when (and (string-match "jde-" ...) (get symbol ...)) (let (... ... ...) (if
saved-val ... ...)))
)
(lambda (symbol) (when (and ... ...) (let ... ...)))(jde-key-bindings)
mapcar((lambda (symbol) (when (and ... ...) (let ... ...))) (jde-setnu-mode-enable
jde-quote-classpath jde-enable-abbrev-mode jde-mode-abbreviations jde-build-use-make
jde-jdk-doc-url jde-project-file-name jde-read-compile-args jde-key-bindings
jde-project-context-switching-enabled-p jde-global-classpath jde-compile-finish-hook
jde-entering-java-buffer-hook jde-setnu-mode-threshold jde-compiler jde-use-font-lock))
jde-set-variables-init-value()
(if prj-file (load-file prj-file) (jde-set-variables-init-value))
)
(let ((prj-file ...)) (if prj-file (load-file prj-file)
(jde-set-variables-init-value)))
)
jde-load-project-file()
(if (not (jde-debugger-running-p)) (jde-load-project-file))
)
jde-mode-internal()
jde-mode()
set-auto-mode()
byte-code("� ���" [set-auto-mode t] 1)
normal-mode(t)
after-find-file((file-error "Opening input file" "no such file or directory"
"/home/staff/aps/java/y.java") t)
find-file-noselect("/home/staff/aps/java/y.java")
find-file("/home/staff/aps/java/y.java")
command-line-1()
command-line()
normal-top-level()
