(require 'wl-load-path)

(add-to-list 'load-path "/usr/share/emacs/site-lisp/")
(add-to-list 'load-path "~/elisp/3rd-party-lib/emacs-w3m/")
(add-to-list 'load-path "~/elisp/3rd-party-lib/nxml-mode/")
(add-to-list 'load-path "~/elisp/3rd-party-lib/muse/lisp/")
(setenv "INFOPATH" "/usr/info:/usr/autotool/devel/info:/usr/autotool/stable/info:/opt/gnome/info:/opt/info:/usr/share/info")
(setq cyg-path "/bin:/usr/bin:/usr/local/bin:/usr/X11R6/bin:/opt/gnome/bin")
(setenv "PATH" (concat cyg-path ":" (getenv "PATH")))
(setq exec-path (list "/bin" "/usr/bin" "/usr/local/bin"
		      "/usr/X11R6/bin" "/opt/gnome/bin" exec-path))

(require 'wl-generic)
(require 'epa-setup)
(require 'wl-emacswiki)
(require 'wl-programming)
(add-to-list 'vc-handled-backends 'Git)
(require 'wl-version-control)
(require 'wl-muse)

(require 'wl-org)
(dolist (o '("~/edata/2008.org"
	     "~/edata/learning.org"
	     "~/project/ctshell/org/ctshell.org"))
  (when (file-exists-p o)
    (add-to-list 'org-agenda-files o)))

(require 'wl-perl)
(add-to-list 'load-path "~/tasks/parrot/editor/")
(autoload 'pir-mode "pir-mode" nil t)
(add-to-list 'auto-mode-alist '("\\.\\(imc\\|pir\\)\\'" . pir-mode))

(defun wl-visit-emacs-tags-table ()
  (interactive)
  (visit-tags-table "/cygdrive/c/download/emacs/src/TAGS"))

(defvar wl-slime-contrib-list
  '(inferior-slime
    ;;    slime-asdf
    slime-autodoc
    slime-banner
    slime-c-p-c
    slime-editing-commands
    slime-fancy-inspector
    slime-fancy
    slime-fuzzy
    slime-highlight-edits
    slime-parse
    ;;    slime-presentation-streams
    slime-presentations
    slime-references
    slime-scratch
    slime-tramp
    ;;    slime-typeout-frame
    slime-xref-browser))

(require 'wl-common-lisp)
(setq slime-default-lisp 'clisp)

(add-to-list 'load-path "~/elisp/3rd-party-lib/bbdb/lisp/")
(setq markdown-command "/cygdrive/c/download/Markdown_1.0.1/Markdown.pl")
(require 'wl-mail)

(provide 'wl-cygwin-init)