Well, I downgraded back the version of emacs that comes with Cygwin-1.13 and
everything worked fine... so I'll go pester the cygwin team...
On Fri, Jan 10, 2003 at 06:13:27PM +0000, [EMAIL PROTECTED] wrote:
> Hi all,
>
> I've searched the list archives and don't see this exact error. There were
> others for (wrong-number-of-arguments...) but relating to different modules.
>
> Any help is greatly appreciated with this.
>
> I get the following error when loading jde...
> Debugger entered--Lisp error: (wrong-number-of-arguments #[(&optional integers
>reuse)
> [ad-return-value isearch-mode senator-isearch-semantic-mode integers isearch-string
>reuse nil ((byte-code "ÁÁ‡" [senator-isearch-semantic-mode t] 1))
>senator-re-search-forward ad-Orig-re-search-forward] 5 "$ad-doc: re-search-forward$"
>"sRE search: "] 3)
> re-search-forward("^BABYL OPTIONS:[ ]*-\\*-[ ]*rmail[
>]*-\\*-" 97121 t)
> auto-coding-from-file-contents(97120)
> set-auto-coding("/home/mngarimu/.emacs-data/jde-2.3.2/lisp/jde-bug.el" 97120)
> insert-file-contents("/home/mngarimu/.emacs-data/jde-2.3.2/lisp/jde-bug.el")
> load-with-code-conversion("/home/mngarimu/.emacs-data/jde-2.3.2/lisp/jde-bug.el"
>"jde-bug" nil t)
> require(jde-bug)
> eval-buffer(#<buffer *load*<2>> nil "jde" nil t)
> load-with-code-conversion("/home/mngarimu/.emacs-data/jde-2.3.2/lisp/jde.el" "jde"
>nil t)
> require(jde)
> eval-buffer(#<buffer *load*> nil "~/.emacs" nil t)
> load-with-code-conversion("/home/mngarimu/.emacs" "~/.emacs" t t)
> load("~/.emacs" t t)
>
> with a number of non-printable characters (omitted here for readability).
>
> Now the version stuff...
>
> Host platform: Cygwin 1.18-1 on WinXP Pro
> JDEE version : 2.3.2
> Emacs version: 21.2-11 (from Cygwin 1.18-1)
> .emacs file :
>
> ;; ~/.emacs-data/default was previously loaded to provide add-to-load-path
> ;; instead give a defun for add-to-load-path since we don't know what else
> ;; "default" actually provides.
> ;;(load "~/.emacs-data/default")
> (defun add-to-load-path (path)
> (setq load-path (append load-path (list path))))
>
> ;; Add a generic directory from which to try and load files.
> ;; The majority of individual files will just be placed in this
> ;; directory. For elisp 'packages' that have their own directory
> ;; you should add each directory for the package individually.
> (add-to-load-path "~/.emacs-data")
>
>
> ;; Remember you can use an X windows font selector to get this nasty
> ;; looking string.
> ;;(set-default-font "-adobe-courier-bold-r-normal-*-*-120-*-*-m-*-iso8859-1")
>
> (setq frame-title-format "emacs - %b")
> (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.
> '(lpr-command "lpr" t)
> '(lpr-switches (quote ("-h")) t)
> '(printer-name "PT-DEV1-2" t)
> '(ps-line-number t)
> '(ps-lpr-command "lpr")
> '(ps-lpr-switches (quote ("-h")))
> '(ps-printer-name "PT-DEV1-2")
> '(speedbar-frame-parameters (quote ((minibuffer) (width . 40) (border-width . 0)
>(menu-bar-lines . 0) (tool-bar-lines . 0) (unsplittable . t)))))
> (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.
> )
> (show-paren-mode)
> (line-number-mode t)
> (column-number-mode t)
>
> ;;----------------------------------------------------------------
> ;; HILIT19
> ;;----------------------------------------------------------------
> (require 'hilit19)
>
> (setq hilit-mode-enable-list '(not text-mode)
> hilit-background-mode 'dark
> hilit-inhibit-hooks nil
> hilit-inhibit-rebinding nil
> hilit-auto-highlight-maxout '60000000)
>
> ;;----------------------------------------------------------------
> ;; Python - mmmmmmmmmmmm
> ;;----------------------------------------------------------------
> (require 'python-mode)
> (setq auto-mode-alist
> (append '(
> ("\\.py$" . python-mode)
> )
> auto-mode-alist)
> )
> (defun generic-python-mode-hook ()
> )
> (add-hook 'python-mode-hook 'generic-python-mode-hook)
>
> ;;----------------------------------------------------------------
> ;; m4
> ;;----------------------------------------------------------------
> (setq auto-mode-alist
> (append '(
> ("\\.m4" . m4-mode)
> )
> auto-mode-alist)
> )
> (defun generic-m4-mode-hook ()
> )
> (add-hook 'm4-mode-hook 'generic-m4-mode-hook)
>
> ;;----------------------------------------------------------------
> ;; c/c++-mode (and their derivatives...)
> ;;----------------------------------------------------------------
> (setq auto-mode-alist
> (append '(
> ("\\.pc" . c++-mode)
> ("\\.c" . c++-mode) ; to edit C code
> ("\\.h" . c++-mode) ; to edit C code
> ("\\.l$" . c++-mode)
> ("\\.y$" . c++-mode)
> ("\\.m$" . objc-mode)
> )
> auto-mode-alist)
> )
> (defun generic-c-mode-hook ()
> (setq c-basic-offset 4)
> (setq truncate-lines nil)
> )
> (add-hook 'c-mode-hook 'generic-c-mode-hook)
> (add-hook 'c++-mode-hook 'generic-c-mode-hook)
>
> ;;----------------------------------------------------------------
> ;; P-SGML/SGML-MODE
> ;;----------------------------------------------------------------
> (add-to-load-path "~/.emacs-data/psgml")
> (require 'psgml)
> (require 'sgml-mode)
> (setq auto-mode-alist (append '(("\\.html" . html-mode)
> ("\\.htm" . html-mode)
> ("\\.sgml" . sgml-mode)
> ("\\.xml" . xml-mode)
> ("\\.dtd" . sgml-mode)
> )
> auto-mode-alist
> )
> )
>
> ;; I have next to no idea exactly what the sgml packages uses this function for
> ;; but things don't seem to work without it!
> (setq after-change-function '(lambda ()
> t))
>
> ;;----------------------------------------------------------------
> ;; ELIB
> (add-to-load-path "~/.emacs-data/elib")
>
> ;;----------------------------------------------------------------
> ;; EIEIO
> (add-to-load-path "~/.emacs-data/eieio")
>
> ;;----------------------------------------------------------------
> ;; SEMANTIC
> (add-to-load-path "~/.emacs-data/semantic-1.4.2")
> (setq semantic-load-turn-everythin-on nil)
> (require 'semantic-load)
>
> ;;----------------------------------------------------------------
> ;; JDE/java-mode
> ;;----------------------------------------------------------------
> (add-to-load-path "~/.emacs-data/jde-2.3.2/lisp")
> (require 'jde)
>
> ;;----------------------------------------------------------------
> ;; tex-mode
> ;;----------------------------------------------------------------
> (setq tex-dvi-view-command
> (if (eq window-system 'x) "xdvi" "dvi2tty * | cat -s"))
> (setq auto-mode-alist
> (append '(
> ("\\.tex$" . latex-mode)
> )
> auto-mode-alist)
> )
> (add-hook 'latex-mode-hook
> '(lambda ()
> (turn-on-auto-fill)
> (setq truncate-lines nil)
> )
> )
>
> ;;----------------------------------------------------------------
> ;; haskell
> ;;----------------------------------------------------------------
> (autoload 'haskell-mode "haskell-mode" "Major mode for editing Haskell." t)
> (setq auto-mode-alist
> (append '(
> ("\\.hs$" . haskell-mode)
> ("\\.lhs$" . haskell-mode)
> )
> auto-mode-alist)
> )
>
> ;;----------------------------------------------------------------
> ;; clean
> ;;----------------------------------------------------------------
> (autoload 'clean-mode "clean-mode" "Major mode for editing Clean." t)
> (setq auto-mode-alist
> (append '(
> ("\\.icl$" . clean-mode)
> ("\\.dcl$" . clean-mode)
> )
> auto-mode-alist)
> )
>
> ;;----------------------------------------------------------------
> ;; idl
> ;;----------------------------------------------------------------
> (autoload 'idl-mode "idl-mode" "Hmmm idl..." t)
> (setq auto-mode-alist
> (append '(
> ("\\.idl" . idl-mode)
> )
> auto-mode-alist)
> )
>
> ;;----------------------------------------------------------------
> ;; makefiles
> ;;----------------------------------------------------------------
> (setq compile-command "make")
> (add-hook 'makefile-mode-hook '(lambda () (setq truncate-lines nil)))
>
> ;;----------------------------------------------------------------
> ;; emacs-lisp-mode
> ;;----------------------------------------------------------------
> (add-hook 'emacs-lisp-mode-hook '(lambda () (setq truncate-lines nil)))
>
> ;;----------------------------------------------------------------
> ;; outline-mode
> ;;----------------------------------------------------------------
> (add-hook 'outline-mode-hook '(lambda () (font-lock-mode)))
>
> ;;----------------------------------------------------------------
> ;; Map our own specific keys
> ;;----------------------------------------------------------------
> (define-key global-map [home] 'beginning-of-line)
> (define-key global-map [(C-home)] 'beginning-of-line-text)
>
> (define-key global-map [end] 'end-of-line)
>
> (define-key global-map [delete] 'delete-char)
> (define-key global-map [(C-delete)] 'kill-word)
>
> (define-key global-map [backspace] 'delete-backward-char)
> (define-key global-map [(C-backspace)] 'backward-kill-word)
>
> (define-key global-map [f1] 'goto-line)
> (define-key global-map [(C-f1)] 'what-line)
>
> (define-key global-map [f2] 'new-frame)
> (define-key global-map [(C-f2)] 'delete-frame)
> (define-key esc-map [f2] 'make-frame-on-display)
>
> (define-key global-map [f3] 'indent-region)
> ;; (define-key global-map [(C-f3)] ')
> ;; (define-key esc-map [f3] ')
> ;; (define-key esc-map [(C-f3)] ')
>
> (define-key global-map [f4] 'switch-to-buffer)
> (define-key global-map [(C-f4)] 'kill-buffer)
> (define-key esc-map [f4] 'eval-buffer)
> ;; (define-key esc-map [(C-f4)] ')
>
> (define-key global-map [f5] 'fill-paragraph)
> (define-key global-map [(C-f5)] 'fill-region)
> (define-key esc-map [f5] 'fill-region-as-paragraph)
> (define-key esc-map [(C-f5)] 'c-fill-paragraph)
>
> (define-key global-map [f6] 'speedbar)
> ;; (define-key global-map [(C-f6)] ')
> ;; (define-key esc-map [f6] ')
> ;; (define-key esc-map [(C-f6)] ')
>
> (define-key global-map [f7] 'ispell-buffer)
> (define-key global-map [(C-f7)] 'ispell-region)
> ;; (define-key esc-map [f7] ')
> ;; (define-key esc-map [(C-f7)] ')
>
> (define-key global-map [f8] 'c-indent-new-comment-line)
> (define-key global-map [(C-f8)] 'indent-new-comment-line)
> (define-key esc-map [f8] 'comment-region)
> (define-key esc-map [(C-f8)] 'uncomment-region)
>
> (define-key global-map [f9] 'compile)
> (define-key global-map [(C-f9)] 'kill-compilation)
> (define-key esc-map [f9] 'gdb)
> ;; (define-key esc-map [(C-f9)] ')
>
> (define-key global-map [f10] 'next-error)
> (define-key global-map [(C-f10)] 'previous-error)
> ;; (define-key esc-map [f10] ')
> ;; (define-key esc-map [(C-f10)] ')
>
> (define-key global-map [f11] 'revert-buffer)
> ;; (define-key global-map [(C-f11)] ')
> ;; (define-key esc-map [f11] ')
> ;; (define-key esc-map [(C-f11)] ')
>
> ;; (define-key global-map [f12] ')
> ;; (define-key global-map [(C-f12)] ')
> ;; (define-key esc-map [f12] ')
> ;; (define-key esc-map [(C-f12)] ')
>
> ;; (speedbar)
>
> backtrace buffer: included at top
>
> Contents of *messages*:
> Loading regexp-opt...done
> Source file `/usr/share/emacs/21.2/lisp/hippie-exp.el' newer than byte-compiled file
> Loading mule-util...done
> auto-coding-from-file-contents:
> Loading debug...done
> Entering debugger...
> [2 times]
>
> There is no prj.el because this happens when I load jde at emacs startup.
>
>
>
> --
> mike\n.
>
--
mike\n.
