;; pour Lucid Synchrone
(setq load-path (cons "~/.emacs-mode/lucy-mode/" load-path))
(setq auto-mode-alist
      (cons '("\\.ls" . lucy-mode) auto-mode-alist))
(autoload 'lucy-mode "lucy" "Major mode for editing Lucid
Synchrone code." t)
(autoload 'run-lucy "inf-lucy" "Run an inferior Lucid Synchrone process." t)
(autoload 'lucydebug "lucydebug" "Run the Lucid Synchrone debugger" t)
(if window-system (require 'lucy-font))