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)

Reply via email to