I cannot get jtags to run. Environment is
NT4SP6 with cygnus version of bash. JDE version
is 2.1.5. Emacs is 20.6. Contents of .emacs file
at end of this message. I have
tried it inside of emacs and from command
prompt. Here is output:


E:\Data\Source\com\bruceeckel\c09>bash jtags
Removed old TAGS file.
Tagging classes and constructors
FIND:: Invalid argument
Parameterformat: No such file or directory
nicht: No such file or directory
korrekt: No such file or directory
Tagging methods
FIND:: Invalid argument
Parameterformat: No such file or directory
nicht: No such file or directory
korrekt: No such file or directory
Tagging variables
FIND:: Invalid argument
Parameterformat: No such file or directory
nicht: No such file or directory
korrekt: No such file or directory

E:\Data\Source\com\bruceeckel\c09>


Adding a source directory produces identical results.


.emacs file:

(setq load-path
   (nconc


      "~/emacs/site/jde-2.1.5/"
      "~/emacs/site/MyEls/"
      ;; Add paths to other add-on packages here.
      )
     load-path))

(require 'jde)


;; =====================================================================
;; JDE STUFF
;; =====================================================================

;; 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)



;; =====================================================================
;; CUSTOM VARIABLES
;; =====================================================================
(custom-set-variables
 '(explicit-shell-file-name
"C:/Programme/cygnus/cygwin-b20/H-i586-cygwin32/bin/bash.exe")
 '(jde-enable-abbrev-mode t)
 '(jde-run-java-vm-w "java"))
(custom-set-faces)

(load "~/emacs/site/MyEls/cua-mode")

;; =====================================================================
;; RECENT FILE LIST
;; =====================================================================
(require 'recentf)
(recentf-mode 1)


;; Replace "yes or no" with y or n
(defun yes-or-no-p (arg)
  "An alias for y-or-n-p, because I hate having to type 'yes' or 'no'."
  (y-or-n-p arg))

;; Frame title bar formatting to show full path of file
(setq-default
 frame-title-format
 (list '((buffer-file-name " %f" (dired-directory
                                  dired-directory
                                  (revert-buffer-function " %b"
                                  ("%b - Dir:  " default-directory)))))))
(setq-default
 icon-title-format
 (list '((buffer-file-name " %f" (dired-directory
                                  dired-directory
                                  (revert-buffer-function " %b"
                                  ("%b - Dir:  " default-directory)))))))




;; Add Emacs close confirmation
(setq kill-emacs-query-functions
      (cons (lambda () (yes-or-no-p "Really kill Emacs?"))
     kill-emacs-query-functions))

;; =====================================================================
;; SET DEFAULT FRAME
;; =====================================================================
;;  (setq default-frame-alist
;;        '(
;;        (top . 200) (left . 400)
;;          (width . 110) (height . 40)
;;        (cursor-color . "red")
;;        (cursor-type . box)
;;        (foreground-color . "black")
;;        (background-color . "white")
;;        (font . "-*-Courier-normal-r-*-*-19-*-*-*-c-*-iso8859-1"))
;;)



;; =====================================================================
;; MODE LINE
;; =====================================================================

;; I like to know what time it is. These lines show the clock in the
;; status bar. Comment out first line if you prefer to show time in 12
;; hour format
(setq display-time-24hr-format t)
(setq display-time-day-and-date t)
(display-time)

;; show column number in status bar
(setq column-number-mode t)

;; =====================================================================
;; SEARCHING
;; =====================================================================

;; make searches case-INsensitive
(set-default 'case-fold-search t)

;; =====================================================================
;; MY PREFERRED KEY BINDINGS
;; =====================================================================

;; Remap Home and End keys to move within current line, and C-Home and
;; C-End keys to beginning and end of buffer
(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)

;; =====================================================================
;; =====================================================================

;; kill-buffer-other-window
(global-set-key [f12] 'kill-buffer-other-window)

(defun kill-buffer-other-window (arg)
  "Kill the buffer in the other window, and make the current buffer full
size. If no
other window, kills current buffer."
  (interactive "p")
  (let ((buf (save-window-excursion
        (other-window arg)
        (current-buffer))))
    (delete-windows-on buf)
    (kill-buffer buf))  )

;; =====================================================================
;; =====================================================================

;; kill-buffer-jump-other-window
(global-set-key [f11] 'kill-buffer-jump-other-window)

(defun kill-buffer-jump-other-window (arg)
  "Kill this buffer and jump to other window."
  (interactive "p")
    (other-window arg)
    (kill-buffer-other-window arg)  )

(put 'upcase-region 'disabled nil)



Reply via email to