Hello,
When debugging with JDE in Emacs 21.2 under Cygwin
under Windows XP, I get the following message:
Cannot find ncsa.rsb.ITR..TutoringSession source.
Enter path: ~/dev/java
The default path is the correct one. What is going
wrong here? The only thing that seems suspicious is
the ".." right after ITR in the class name. Does it
have to do with the problem? Any ideas on how to fix
it?
My .emacs is below (the JDE related part is the last
portion). Thanks in advance.
(setq user-mail-address "[EMAIL PROTECTED]")
(setq user-full-name "Rodrigo de Salvo Braz")
;; setting background color ; doesn't work
;;(add-to-list 'default-frame-alist '(foreground-color
. "Black"))
;;(add-to-list 'default-frame-alist '(cursor-color .
"red"))
;;(add-to-list 'default-frame-alist '(background-color
. "LightGoldenRodYellow"))
;;(add-to-list 'default-frame-alist '(background-mode
. dark))
;; saving all backup files to ~/bak
(defun make-backup-file-name (file)
(concat "~/bak" (file-name-nondirectory file)))
;; function keys
(global-set-key [f1] '(lambda() (interactive) (dired
".")) )
(global-set-key [(shift f1)] 'call-last-kbd-macro)
(global-set-key [f3] 'shell)
(global-set-key [f4] 'find-file)
(global-set-key [f5] '(lambda () (interactive)
(outline-mode) (hide-sublevels 1)
(delete-other-windows)))
(global-set-key [f6] 'visit-tags-table)
(global-set-key [f8]
'add-change-log-entry-other-window)
(global-set-key [f9] 'compile)
(global-set-key [f10] 'shell-command)
(global-set-key [f12] 'make-frame)
(global-set-key "\C-g" 'goto-line)
;; frame and buffer navigation
(global-set-key "\C-x\C-b" 'switch-to-buffer)
(global-set-key "\C-o" 'other-window)
(global-set-key "\M-o" 'other-window)
(global-set-key "\M-1" 'delete-other-windows)
(global-set-key "\M-2" 'split-window-vertically)
(global-set-key "\M-3" 'split-window-horizontally)
(pc-bindings-mode)
(pc-selection-mode)
(global-set-key "\C-t" 'copy-region-as-kill)
(global-set-key "\M-f" 'find-file)
(global-set-key [M-up] 'view-scroll-line-backward)
(global-set-key [M-down] 'view-scroll-line-forward)
(global-set-key [C-backspace] 'backward-kill-word)
(global-set-key [M-backspace] 'backward-kill-word)
;; Setting indent style for java - "bsd" with a basic
offset of 4
(add-hook 'java-mode-hook
(function (lambda ()
;;(setq 'c-basic-offset 4))))
(c-set-style "bsd")
(set-variable 'c-basic-offset 4))))
;;(c-add-style "mycstyle" '((c-basic-offset .
4)) t))))
;;(c-add-style "mycstyle" '((c-style-alist .
mystylelist)) t))))
;; Keys for easy opening and closing of subtrees in
outline mode.
(add-hook 'outline-mode-hook
'(lambda ()
(define-key outline-mode-map [M-left]
'hide-subtree)
(define-key outline-mode-map [M-right]
'show-children)
))
;; Adding support for JavaCC (using java mode).
(add-to-list 'auto-mode-alist '("\\.jjt$" .
java-mode))
(add-to-list 'auto-mode-alist '("\\.jj$" . java-mode))
;; OO-Browser
;;(setq load-path (append
;; '("/home/rodrigo/oo-browser/"
;; "/home/rodrigo/oo-browser/hypb/")
;; load-path))
;;(load "br-start")
;;(global-set-key "\C-c\C-o" 'oo-browser)
;; Make C-f# mean "save point #"
(global-set-key [C-f1] '(lambda () (interactive)
(point-to-register ?1)))
(global-set-key [C-f2] '(lambda () (interactive)
(point-to-register ?2)))
(global-set-key [C-f3] '(lambda () (interactive)
(point-to-register ?3)))
(global-set-key [C-f4] '(lambda () (interactive)
(point-to-register ?4)))
(global-set-key [C-f5] '(lambda () (interactive)
(point-to-register ?5)))
(global-set-key [C-f6] '(lambda () (interactive)
(point-to-register ?6)))
(global-set-key [C-f7] '(lambda () (interactive)
(point-to-register ?7)))
(global-set-key [C-f8] '(lambda () (interactive)
(point-to-register ?8)))
(global-set-key [C-f9] '(lambda () (interactive)
(point-to-register ?9)))
(defun jump-to-register-other (reg)
(other-window 1)
(jump-to-register reg)
(hilit-recenter (/ (window-height) 2)))
(defun jump-to-register-here (reg)
(jump-to-register reg)
(hilit-recenter (/ (window-height) 2)))
;; Make M-f# mean "goto saved point # in other window"
(global-set-key [M-f1] '(lambda () (interactive)
(jump-to-register-other ?1)))
(global-set-key [M-f2] '(lambda () (interactive)
(jump-to-register-other ?2)))
(global-set-key [M-f3] '(lambda () (interactive)
(jump-to-register-other ?3)))
(global-set-key [M-f4] '(lambda () (interactive)
(jump-to-register-other ?4)))
(global-set-key [M-f5] '(lambda () (interactive)
(jump-to-register-other ?5)))
(global-set-key [M-f6] '(lambda () (interactive)
(jump-to-register-other ?6)))
(global-set-key [M-f7] '(lambda () (interactive)
(jump-to-register-other ?7)))
(global-set-key [M-f8] '(lambda () (interactive)
(jump-to-register-other ?8)))
(global-set-key [M-f9] '(lambda () (interactive)
(jump-to-register-other ?9)))
;; Make M-# mean "goto saved point # in this window"
;(global-set-key [f1] '(lambda () (interactive)
(jump-to-register-here ?1)))
;(global-set-key [f2] '(lambda () (interactive)
(jump-to-register-here ?2)))
;(global-set-key [f3] '(lambda () (interactive)
(jump-to-register-here ?3)))
;(global-set-key [f4] '(lambda () (interactive)
(jump-to-register-here ?4)))
;(global-set-key [f5] '(lambda () (interactive)
(jump-to-register-here ?5)))
;(global-set-key [f6] '(lambda () (interactive)
(jump-to-register-here ?6)))
;(global-set-key [f7] '(lambda () (interactive)
(jump-to-register-here ?7)))
;(global-set-key [f8] '(lambda () (interactive)
(jump-to-register-here ?8)))
;(global-set-key [f9] '(lambda () (interactive)
(jump-to-register-here ?9)))
;; Misc. shortcuts
(global-set-key "\M-[" 'backward-sexp)
(global-set-key "\M-]" 'forward-sexp)
(global-set-key "\C-z" 'shell)
(global-set-key "\M-z" 'shell)
(global-set-key [?\C-,] 'previous-error)
(global-set-key [?\C-.] 'next-error)
(global-set-key "\C-b" 'switch-to-buffer)
(defun find-tag-other-window-next ()
(interactive)
(find-tag 0 1))
(defun acc-auto-exec ()
(interactive)
(pop-to-buffer "*shell*")
(comint-previous-input 1)
(comint-send-input))
(defun acc-auto-exec-stay ()
(interactive)
(let ((c (current-buffer)))
(pop-to-buffer "*shell*")
(comint-previous-input 1)
(comint-send-input)
(pop-to-buffer c)))
;; Set M-RET and C-RET to run last shell command
(global-set-key "\215" 'acc-auto-exec)
(global-set-key [C-return] 'acc-auto-exec-stay)
;; Change the buffer of the window on the right
(global-set-key "\M->" '(lambda ()
(interactive)
(if (= 0 (car (window-edges (selected-window))))
(let ()
(other-window 1)
(switch-to-buffer ())
(other-window -1))
(switch-to-buffer ()))))
;; Change the buffer of the window on the left
(global-set-key "\M-<" '(lambda ()
(interactive)
(if (> (car (window-edges (selected-window))) 0)
(let ()
(other-window 1)
(switch-to-buffer ())
(other-window -1))
(switch-to-buffer ()))))
;; go back to previous buffer
(global-set-key "\M-b" '(lambda ()
(interactive)
(switch-to-buffer ())))
;; switch to the next window
(global-set-key "\M-o" '(lambda () (interactive)
(other-window 1)))
;; switch to the *compilation* buffer (in a separate
window if needed)
(global-set-key "\M-c"
'(lambda ()
(interactive)
(pop-to-buffer "*compilation*")))
;; kill current buffer
(global-set-key "\M-k"
'(lambda ()
(interactive)
(kill-buffer (current-buffer))))
;; find .emacs
(global-set-key "\M-." '(lambda() (interactive)
(find-file "~/.emacs")) )
;; reload .emacs
(global-set-key "\M-r" '(lambda ()
(interactive)
(load-file "~/.emacs")))
;; make *shell* start up in a separate window by
default
(setq same-window-buffer-names '(*info* *mail*))
;; Make Control-x c mean "run the compiler."
(global-set-key "\C-xc" 'compile)
;; Make default compile command simply 'make'
(setq compile-command "make")
(global-set-key "\M-m" 'bookmark-set)
(global-set-key "\M-j" 'bookmark-jump)
(global-set-key "\M-v" 'visit-tags-table)
(global-set-key "\M-i" 'send-invisible)
(global-set-key "\M-n" 'comment-region)
(global-set-key "\C-n" 'uncomment-region)
(global-set-key "\M-s" 'switch-to-buffer-other-window)
(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)
'(current-language-environment "Latin-9")
'(default-input-method "latin-9-prefix")
'(global-font-lock-mode t nil (font-lock))
'(jde-enable-abbrev-mode t)
'(jde-javadoc-author-tag-template "\"* @author <a
href=\\\"mailto:\"; user-mail-address
\"\\\">\" user-full-name \"</a>\"")
'(jde-javadoc-describe-class-template "\"* Class
representing \"")
'(jde-javadoc-describe-field-template "\"* \"")
'(jde-javadoc-describe-interface-template "\"*
Interface representing \"")
'(jde-javadoc-describe-method-template "\"* \"")
'(jde-javadoc-version-tag-template ""))
(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.
'(default ((t (:stipple nil :background "black"
:foreground "goldenrod" :inverse-video nil :box nil
:strike-through nil :overline nil :underline nil
:slant normal :weight normal :height 116 :width normal
:family "adobe-courier")))))
;; speedbar configuration
(add-to-list 'load-path
"~/software/speedbar-0.14beta3")
(autoload 'speedbar-frame-mode "speedbar" "Popup a
speedbar frame" t)
(autoload 'speedbar-get-focus "speedbar" "Jump to
speedbar frame" t)
(global-set-key [(f4)] 'speedbar-get-focus)
;; eieio configuration
(add-to-list 'load-path "~/eieio-X.XX")
;; jde configuration
;; This .emacs file illustrates the minimul setup
;; required to run the JDE.
;; Set the debug option to enable a backtrace when a
;; problem occurs.
(setq debug-on-error t)
;; Update the Emacs load-path to include the path to
;; the JDE and its require packages. This code assumes
;; that you have installed the packages in the
emacs/site
;; subdirectory of your home directory.
(add-to-list 'load-path (expand-file-name
"~/software/jde-2.3.2/lisp"))
(add-to-list 'load-path (expand-file-name
"~/software/semantic-1.4.3"))
(add-to-list 'load-path (expand-file-name
"~/software/speedbar-0.14beta3"))
(add-to-list 'load-path (expand-file-name
"~/software/eieio-0.17"))
(add-to-list 'load-path (expand-file-name
"~/software/elib-1.0"))
;; 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)
;; Include the following only if you want to run
;; bash as your shell.
;; 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"))
;; end of jde configuration
__________________________________________________
Do you Yahoo!?
Yahoo! Web Hosting - establish your business online
http://webhosting.yahoo.com
