Does it work on JDE 2.2.8beta6.
- Paul
At 12:29 PM 8/15/2001 -0400, you wrote:
>Hi. I just installed JDE v. 2.7.7.1 on a Linux Redhat 6.2 system. In
>any Emacs editing session, the first invocation of
>jde-show-class-source works fine (assuming that my
>jde-db-source-directories variable is set properly), but all
>subsequent invocations fail ("Cannot find XXX"), even those
>invocations that are identical to the first (successful) one.
>
>Below is the *Messages* output upon invoking jde-show-class-source
>with argument "Bar" while visiting the file Foo.java. (My comments in
>< >.)
>
> *Messages*
> ;;; jde-show-class-source called, with argument "Bar"
> ;;;
> Loading thingatpt...
> Loading thingatpt...done
> Starting the BeanShell. Please wait...
> ;;;
> ;;; Bar.java found successfully
> ;;;
> Fontifying Bar.java...
> Fontifying Bar.java... (regexps.........................................)
> Starting the BeanShell. Please wait...
> Setting JDE variables to startup values... [2 times]
> Rescanning classes...
> Rescanning classes...Complete
> Building Foo.java Semantic directory index imenu
> ;;;
> ;;; killed Bar.java buffer, and repeated jde-show-class-source
> ;;; invocation
> ;;;
> Cannot find Bar
>
>I ran the debugger on jde-show-class-source and found that at one
>point it receives a "No reply from BeanShell" message. Apparently the
>BeanShell starts up fine once, but dies (or at least becomes
>unresponsive) between the first and second invocation of
>jde-show-class-source. But debugging further is getting beyond my
>depth.
>
>I'm using JDE version 2.7.7.1, on Linux Redhat 6.2.1. My .emacs file
>is included below.
>
>Thanks!
>
>Kynn
>
>
>;;;
>;;; .emacs file
>;;;
>(set-variable 'scroll-step' 1)
>(put 'suspend-emacs 'disabled t)
>(global-set-key [(f3)] 'goto-line)
>(global-set-key [(f5)] 'compile)
>(global-set-key [(f6)] '(lambda () (interactive) (set-mark-command 1)))
>(global-set-key [(f7)] 'pop-global-mark)
>(global-set-key [(f8)] 'pop-tag-mark)
>;(global-set-key [(f9)] '(lambda () (interactive) (find-tag)))
>
>(display-time)
>(font-lock-mode)
>
>;; Function to insert timestamp
>(defun insert-time-stamp () (interactive)
> (insert (format-time-string "[%Y.%m.%d %T] "))
>)
>(global-set-key "\C-xd" 'insert-time-stamp)
>
>;; eieio
>(add-to-list 'load-path "/usr/share/emacs/eieio")
>
>;; speedbar
>(add-to-list 'load-path "/usr/share/emacs/speedbar")
>(autoload 'speedbar-frame-mode "speedbar" "Popup a speedbar frame" t)
>(autoload 'speedbar-get-focus "speedbar" "Jump to speedbar frame" t)
>(define-key-after (lookup-key global-map [menu-bar tools])
> [speedbar] '("Speedbar" . speedbar-frame-mode) [calendar])
>(global-set-key [(f4)] 'speedbar-get-focus)
>(add-hook 'texinfo-mode-hook (lambda () (require 'sb-texinfo)))
>(add-hook 'html-mode-hook (lambda () (require 'sb-html)))
>(autoload 'rpm "sb-rpm" "Rpm package listing in speedbar.")
>(autoload 'w3-speedbar-buttons "sb-w3" "s3 specific speedbar button
>generator.")
>
>;; semantic
>(add-to-list 'load-path "/usr/share/emacs/semantic")
>(setq semantic-load-turn-everything-on t)
>(require 'semantic-load)
>(semantic-show-dirty-mode -1)
>
>; someone else's semantic settings:
>; (setq semantic-load-turn-everything-on nil)
>; (require 'semantic-load)
>; (add-hook 'semantic-init-hooks (lambda ()
>; (senator-minor-mode 1)))
>; (add-hook 'semantic-init-hooks #'turn-on-eldoc-mode)
>; (if (fboundp #'which-func-mode)
>; (add-hook 'semantic-init-hooks (lambda ()
>; (which-func-mode 1))))
>; (when (and (memq window-system '(x w32))
>; (locate-library "imenu"))
>; (add-hook 'semantic-init-hooks (lambda ()
>; (imenu-add-to-menubar "TOKENS"))))
>; (global-semanticdb-minor-mode 1)
>; (add-hook 'speedbar-load-hook (lambda () (require 'semantic-sb))))
>
>
>;; Support for the elisp library elib.
>(add-to-list 'load-path "/usr/share/emacs/site-lisp/elib")
>
>;; jde
>(setq debug-on-error t)
>(add-to-list 'load-path "/usr/share/emacs/jde/lisp")
>(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))
>
>(cond (window-system
> (set-face-background 'modeline "blue")
> (set-face-foreground 'modeline "yellow")
> (set-face-background 'highlight "moccasin")
> (set-face-foreground 'highlight "red")
> (setq default-frame-alist
> (append '((background-color . "Midnight Blue")
> (foreground-color . "white")
> (cursor-color . "lightblue")
> (mouse-color . "lightblue"))
> default-frame-alist))
> ))
>
>(setq c-mode-hook '(lambda ()
> (set-variable 'c-basic-offset 2)
> (set-variable 'c-tab-always-indent t)
> (set-variable 'c-auto-newline nil)
> (set-variable 'c-indent-level 2)
> (set-variable 'c-continued-statement-offset 2)
> (set-variable 'c-continued-brace-offset 2)
> (set-variable 'c-brace-offset 0)
> (set-variable 'c-brace-imaginary-offset 0)
> (set-variable 'c-argdecl-indent 4)
> (set-variable 'c-label-offset -2)
> (local-set-key ":" 'self-insert-command)
> (auto-fill-mode 1)
> ))
>
>(setq java-mode-hook '(lambda ()
> (run-hooks 'c-mode-hook)
> (font-lock-mode t)
>; (set-face-foreground 'font-lock-type-face "LimeGreen")
>; (set-face-foreground 'font-lock-function-name-face
>"Cyan")
> ))
>
>(setq cperl-mode-hook '(lambda ()
> (run-hooks 'c-mode-hook)
> (font-lock-mode t)
> (set-face-foreground 'cperl-array-face "coral")
> (set-face-background 'cperl-array-face nil)
> (set-face-foreground 'cperl-hash-face "gold")
> (set-face-background 'cperl-hash-face nil)
> (set-face-italic-p 'cperl-hash-face nil)
> (set-face-underline-p 'cperl-hash-face nil)
> ))
>
>(custom-set-variables
> '(jde-db-source-directories (quote ("~/dev"))))
>(custom-set-faces
> '(font-lock-comment-face ((((class color) (background light))
> (:foreground "SteelBlue"))))
> '(semantic-dirty-token-face ((((class color) (background light))
> (:background "DarkSlateBlue"))))
> '(jde-java-font-lock-modifier-face ((((class color) (background light))
> (:foreground "Salmon"))))
> '(jde-java-font-lock-link-face ((t (:italic nil :underline t :foreground
> "MediumSlateBlue"))))
> '(font-lock-type-face ((t (:foreground "MediumAquamarine"))))
> '(jde-java-font-lock-package-face ((((class color) (background light))
> (:foreground "CornflowerBlue"))))
> '(cperl-hash-face ((t (:bold t :foreground "gold"))))
> '(font-lock-function-name-face ((t (:foreground "MediumSlateBlue")))))
>
>(put 'narrow-to-region 'disabled nil)
