emacs/nxhtml/tests/angus77-setup-jde.el

   1 ;;; angus77-setup-jde.el ---
   2 ;;
   3 ;; Author: Lennart Borgman (lennart O borgman A gmail O com)
   4 ;; Created: 2008-08-20T16:57:35+0200 Wed
   5 ;; Version:
   6 ;; Last-Updated:
   7 ;; URL:
   8 ;; Keywords:
   9 ;; Compatibility:
  10 ;;
  11 ;; Features that might be required by this library:
  12 ;;
  13 ;;   None
  14 ;;
  15 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  16 ;;
  17 ;;; Commentary:
  18 ;;
  19 ;;
  20 ;;
  21 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  22 ;;
  23 ;;; Change log:
  24 ;;
  25 ;;
  26 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  27 ;;
  28 ;; This program is free software; you can redistribute it and/or
  29 ;; modify it under the terms of the GNU General Public License as
  30 ;; published by the Free Software Foundation; either version 2, or
  31 ;; (at your option) any later version.
  32 ;;
  33 ;; This program is distributed in the hope that it will be useful,
  34 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  35 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  36 ;; General Public License for more details.
  37 ;;
  38 ;; You should have received a copy of the GNU General Public License
  39 ;; along with this program; see the file COPYING.  If not, write to
  40 ;; the Free Software Foundation, Inc., 51 Franklin Street, Fifth
  41 ;; Floor, Boston, MA 02110-1301, USA.
  42 ;;
  43 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  44 ;;
  45 ;;; Code:
  46
  47 ;; Question #42407 on nXhtml changed:
  48 ;; https://answers.launchpad.net/nxhtml/+question/42407
  49
  50 ;; Angus77 posted a new comment:
  51
  52 (eval-when-compile (require 'cl))
  53 (let (
  54       ;;(jde-lisp-dir "C:/jdee/jdee/trunk/jde/lisp/")
  55       (jde-lisp-dir "C:/jdee/jdee/branches/phil_lord/dimitre_liotev_new_build/jde/lisp")
  56       (cedet-root "c:/cedet/cedet/")
  57       (elib-dir "C:/DL/emacs/elib-1.0")
  58       )
  59   (assert (file-directory-p jde-lisp-dir) t)
  60   ;;(add-to-list 'load-path (expand-file-name "~/elisp/jde-2.3.5.1/lisp"))
  61   (add-to-list 'load-path jde-lisp-dir)
  62   ;;(add-to-list 'load-path (expand-file-name "~/elisp/cedet-1.0pre4/semantic"))
  63   (add-to-list 'load-path (expand-file-name "semantic" cedet-root))
  64   ;;(add-to-list 'load-path (expand-file-name "~/elisp/cedet-1.0pre4/speedbar"))
  65   (add-to-list 'load-path (expand-file-name "speedbar" cedet-root))
  66   ;;(add-to-list 'load-path (expand-file-name "~/elisp/elib"))
  67   (add-to-list 'load-path elib-dir)
  68   ;;(add-to-list 'load-path (expand-file-name "~/elisp/cedet-1.0pre4/eieio"))
  69   (add-to-list 'load-path (expand-file-name "eieio" cedet-root))
  70   ;;(add-to-list 'load-path (expand-file-name "~/elisp/cedet-1.0pre4/common"))
  71   (add-to-list 'load-path (expand-file-name "common" cedet-root)))
  72
  73 ;; Initialize CEDET.
  74 ;;(load-file (expand-file-name "~/elisp/cedet-1.0pre4/common/cedet.el"))
  75 (load-library "cedet.el")
  76
  77 (setq defer-loading-jde t)
  78
  79 (if defer-loading-jde
  80     (progn
  81       (autoload 'jde-mode "jde" "JDE mode." t)
  82       (setq auto-mode-alist
  83             (append
  84              '(("\\.java\\'" . jde-mode))
  85              auto-mode-alist)))
  86   (require 'jde))
  87
  88
  89 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  90 ;;; angus77-setup-jde.el ends here