Hello,
I've been trying for a while now to get the JDE to do code completion
(C-c C-v . ), but I still can't get anything working here.
I'm sure I don't have the correct things setup, but I don't know what
else to try. I've set the jdk-registry, jde-jdk but these haven't done
much for me.
I'm running gnu emacs 21.1.1 on redhat linux. My jde related package
version are:
jde-2.2.9beta7
eieio-0.17-beta3
semantic-1.4beta11-1
speedbar-0.14beta2-1
elib-1.0-1
Thanks a lot in advance
Marc
---------------------------------------------------------------------------------
contents of my message buffer:
Finished loading /usr/share/emacs/site-lisp/egg/leim-list.el
and load others...
(emacs)
Loading disp-table...done
Loading tool-bar...done
Loading image...done
Loading tooltip...done
Loading cl-macs...done
Bootstrapping objects...done
Loading regexp-opt...done
Loading easy-mmode...done
Loading /usr/lib/emacs/21.1/i686-pld-linux/fns-21.1.1.el (source)...done
Loading mule-util...done
jde-java-font-lock: building names cache...empty
Loading sams-lib... Done
Loading /home/mjeanson/emacslibs/xf.el (source)...done
Loading yic-buffer...done
Loading desktop...done
Loading cl-seq...done
UserAuctionViewerHandler.java has auto save data; consider M-x recover-file
Setting JDE variables to startup values... [2 times]
Loading sgml-mode...done
Setting JDE variables to startup values... [2 times]
Loading sql...done
Setting JDE variables to startup values... [2 times]
BidHandler.java has auto save data; consider M-x recover-file
Setting JDE variables to startup values...
Desktop loaded.
Loading delsel...done
Loading edmacro...done
Loading semantic-el...done
let:
Loading debug...done
Entering debugger...
[2 times]
Starting the BeanShell. Please wait...
Beanshell expression evaluation error.
Expression: jde.util.JdeUtilities.setProjectValues("", "");
Error: // Error: Error in method invocation: Static method
setProjectValues( java.lang.String, java.lang.String ) not found in
class'jde.util.JdeUtilities' : at Line: 1 : jde .util .JdeUtilities
.setProjectValues ( "" , "" )
progn: Beanshell eval error. See messages buffer for details.
---------------------------------------------------------------------------------
my .emacs file:
;; setup emacs directory to load additional packages
(setq load-path (cons "~/emacslibs" load-path))
;; Update the Emacs load-path to include the path to the JDE and its
require packages.
(add-to-list 'load-path (expand-file-name
"/usr/share/emacs/site-lisp/jde/"))
(add-to-list 'load-path (expand-file-name
"/usr/share/emacs/site-lisp/semantic"))
(add-to-list 'load-path (expand-file-name
"/usr/share/emacs/site-lisp/speedbar"))
(add-to-list 'load-path (expand-file-name
"/usr/share/emacs/site-lisp/elib"))
(add-to-list 'load-path (expand-file-name
"/usr/share/emacs/site-lisp/eieio"))
;; set default frame settings
(setq default-frame-alist
'((top . 27) (left . 230)
(width . 166) (height . 80)
(cursor-color . "Red")
(foreground-color . "black")
(background-color . "ivory")
(font .
"-B&H-LucidaTypewriter-Medium-R-Normal-Sans-10-100-75-75-M-60-ISO8859-1")))
(set-face-background 'modeline "SlateGrey")
(set-face-foreground 'modeline "ivory")
(add-hook 'speedbar-load-hook
(lambda () (add-to-list 'speedbar-frame-parameters
'(background-color . "ivory"))))
;; Set up the keyboard so the delete key on both the regular keyboard
;; and the keypad delete the character under the cursor and to the right
;; under X, instead of the default, backspace behavior.
(global-set-key [delete] 'delete-char)
(global-set-key [kp-delete] 'delete-char)
;; load sams library
(require 'sams-lib)
;; load backup package to allow all backups to single directory
(require 'backup-dir)
(setq bkup-backup-directory-info '((t "/home/mjeanson/emacsbackups"
ok-create full-path)))
;; get the fonts from the X server
(load-file "/home/mjeanson/emacslibs/xf.el")
(xf-load-fonts)
;; meta and arrows match braces
(global-set-key [(meta left)] 'backward-sexp)
(global-set-key [(meta right)] 'forward-sexp)
;; make HOME and END work like God intended
(global-set-key [home] 'beginning-of-line)
(global-set-key [end] 'end-of-line)
(global-set-key [C-home] 'beginning-of-buffer)
(global-set-key [C-end] 'end-of-buffer)
(global-set-key "\C-a" 'beginning-of-line)
(global-set-key "\C-e" 'end-of-line)
;; M-g goto line number
(global-set-key [(meta g)] 'goto-line)
;; region to be highlighted when a mark is active
(transient-mark-mode t)
(custom-set-variables
;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
'(case-fold-search t)
'(compile-command "make -k -f /home/mjeanson/fs/prj/Makefile")
'(current-language-environment "Latin-1")
'(debug-on-error t)
'(default-input-method "latin-1-prefix")
'(frame-background-mode nil)
'(global-font-lock-mode t nil (font-lock))
'(global-hl-line-mode t nil (hl-line))
'(jde-global-classpath nil)
'(jde-java-environment-variables (quote ("JAVA_VERSION" "JDE_JDK")))
'(jde-javadoc-author-tag-template "\"* @author user-full-name\"")
'(jde-jdk (quote ("1.3.1")))
'(jde-jdk-registry (quote (("1.3.1" . "/opt/j2sdk1.3.1"))))
'(jde-run-java-vm "/opt/java")
'(menu-bar-mode t)
'(mouse-wheel-mode t nil (mwheel))
'(scroll-bar-mode (quote right))
'(speedbar-frame-parameters (quote ((background-color . "ivory") (top .
27) (top . 147) (left . 0) (top . 0) (minibuffer) (width . 30)
(border-width . 0) (menu-bar-lines . 0) (tool-bar-lines . 0)
(unsplittable . t))))
'(speedbar-supported-extension-expressions (quote
(".[ch]\\(\\+\\+\\|pp\\|c\\|h\\|xx\\)?" ".tex\\(i\\(nfo\\)?\\)?" ".el"
".emacs" ".l" ".lsp" ".p" ".java" ".f\\(90\\|77\\|or\\)?" ".ada" ".pl"
".tcl" ".m" ".scm" ".pm" ".py" ".s?html" "Makefile\\(\\.in\\)?" ".lib"
".sql")))
'(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
'(tool-bar-mode nil nil (tool-bar)))
(custom-set-faces
;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
;; Your init file should contain only one such instance.
'(fringe ((((class color) (background light)) (:background "ivory")))))
;; If you want Emacs to defer loading the JDE until you open a
;; Java file, edit the following line
(setq defer-loading-jde nil)
;; to read:
;;
;; (setq defer-loading-jde t)
;;
(if defer-loading-jde
(progn
(autoload 'jde-mode "jde" "JDE mode." t)
(setq auto-mode-alist
(append
'(("\\.java\\'" . jde-mode))
auto-mode-alist)))
(require 'jde))
;; Sets the basic indentation for Java source files
;; to two spaces.
(defun my-jde-mode-hook ()
(setq c-basic-offset 2))
(add-hook 'jde-mode-hook 'my-jde-mode-hook)
;; Ensure that the JDE is loaded at Emacs startup.
(require 'jde)
;; something needed by JDE to work
(setq recursive-load-depth-limit nil)
;; use spaces instead of tabs
(setq-default indent-tabs-mode nil)
;; set tab size to 2 instead of 8
(setq-default tab-width 2)
;; parenthesis lib
(require 'paren)
;; lib to travel through buffers without naming files
(load-library "yic-buffer")
;; removes extra buffer that is created when tab completing buffers
(require 'iswitchb)
(iswitchb-default-keybindings)
;; save my desktop when closing
(load "desktop")
(desktop-load-default)
(desktop-read)
;; Make F1 invoke help
(global-set-key [f1] 'help-command)
;; Make F2 move to other window like in split mode
(global-set-key [f2] 'other-window)
;; Make F3 move backwards to other window
(global-set-key [f3] 'sams-other-window-backwards)
;; Make F4 be `find-file'
;; Note: it does not currently work to say
;; (global-set-key 'f4 "\C-x\C-f")
(global-set-key [f4] 'find-file)
;;set F5 to save buffer
(global-set-key [f5] 'save-buffer)
;;set F6 to compile command
(global-set-key [f6] 'compile)
;; load the redo package and bind undo and redo to F5 and shift F5
(require 'redo)
(global-set-key [(f12)] 'undo)
(global-set-key [(shift f12)] 'redo)
;; Setup Emacs to run bash as its primary shell.
(setq shell-file-name "bash")
(setq shell-command-switch "-c")
(setq explicit-shell-file-name shell-file-name)
(setenv "SHELL" shell-file-name)
(setq explicit-sh-args '("-login" "-i"))
;; start emacs with speedbar open
(require 'speedbar)
(speedbar 1)
(set-frame-height (selected-frame) 80)
;; allow highlighting of matching pairs of parentheses
(show-paren-mode 1)
;;enable my mouse wheel
(mouse-wheel-mode 1)
;; make the compilation windows scroll when it gets filled up
(setq compilation-scroll-output t)
;; use % to match parenthesis
(global-set-key "%" 'match-paren)
(defun match-paren (arg)
"Go to the matching paren if on a paren; otherwise insert %."
(interactive "p")
(cond ((looking-at "\\s\(") (forward-list 1) (backward-char 1))
((looking-at "\\s\)") (forward-char 1) (backward-list 1))
(t (self-insert-command (or arg 1)))))
;; scroll only 1 line when moving past the bottom of the screen
(setq scroll-step 1)
;; replace highlighted text with what I type
(delete-selection-mode t)
;; make a function to mark the current line
(defun my-mark-line ()
(interactive)
(beginning-of-line)
(set-mark-command nil)
(end-of-line))
(global-set-key (kbd "C-c l") 'my-mark-line)
--------------------------------------------------------------------------------------
