]>
Commit | Line | Data |
---|---|---|
c2bc7243 GB |
1 | ;; -*-emacs-lisp-*- |
2 | ;; | |
3 | ;; Emacs startup file, e.g. /etc/emacs/site-start.d/50viking.el | |
4 | ;; for the Debian viking 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 | ||
10 | ;; The viking package follows the Debian/GNU Linux 'emacsen' policy and | |
11 | ;; byte-compiles its elisp files for each 'emacs flavor' (emacs19, | |
12 | ;; xemacs19, emacs20, xemacs20...). The compiled code is then | |
13 | ;; installed in a subdirectory of the respective site-lisp directory. | |
14 | ;; We have to add this to the load-path: | |
15 | (let ((package-dir (concat "/usr/share/" | |
16 | (symbol-name flavor) | |
17 | "/site-lisp/viking"))) | |
18 | ;; If package-dir does not exist, the viking package must have | |
19 | ;; removed but not purged, and we should skip the setup. | |
20 | (when (file-directory-p package-dir) | |
21 | (setq load-path (cons package-dir load-path)) | |
22 | (autoload 'viking-mode "viking-mode" | |
23 | "Major mode for editing viking files." t) | |
24 | (add-to-list 'auto-mode-alist '("\\.viking$" . viking-mode)))) | |
25 |