/debian/emacsen-startup

http://github.com/tybor/Liberty · #! · 26 lines · 25 code · 1 blank · 0 comment · 0 complexity · b1c74aac04fa021583e6dc88a2098a7a MD5 · raw file

  1. ;; -*-emacs-lisp-*-
  2. ;;
  3. ;; Emacs startup file, e.g. /etc/emacs/site-start.d/50libertyeiffel.el
  4. ;; for the Debian libertyeiffel package
  5. ;;
  6. ;; Originally contributed by Nils Naumann <naumann@unileoben.ac.at>
  7. ;; Modified by Dirk Eddelbuettel <edd@debian.org>
  8. ;; Adapted for dh-make by Jim Van Zandt <jrv@debian.org>
  9. ;; The libertyeiffel package follows the Debian/GNU Linux 'emacsen' policy and
  10. ;; byte-compiles its elisp files for each 'emacs flavor' (emacs19,
  11. ;; xemacs19, emacs20, xemacs20...). The compiled code is then
  12. ;; installed in a subdirectory of the respective site-lisp directory.
  13. ;; We have to add this to the load-path:
  14. (let ((package-dir (concat "/usr/share/"
  15. (symbol-name flavor)
  16. "/site-lisp/libertyeiffel")))
  17. ;; If package-dir does not exist, the libertyeiffel package must have
  18. ;; removed but not purged, and we should skip the setup.
  19. (when (file-directory-p package-dir)
  20. (setq load-path (cons package-dir load-path))
  21. (autoload 'eiffel-mode "eiffel"
  22. "Major mode for editing Liberty Eiffel files." t)
  23. (add-to-list 'auto-mode-alist '("\\.e$" . eiffel-mode))
  24. (add-to-list 'auto-mode-alist '("\\.se$" . eiffel-mode))
  25. (add-to-list 'auto-mode-alist '("\\.ace$" . eiffel-mode))))