3
;; Emacs startup file, e.g. /etc/emacs/site-start.d/50xtrabackup.el
4
;; for the Debian xtrabackup package
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>
10
;; The xtrabackup 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/"
17
"/site-lisp/xtrabackup")))
18
;; If package-dir does not exist, the xtrabackup 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 'xtrabackup-mode "xtrabackup-mode"
23
"Major mode for editing xtrabackup files." t)
24
(add-to-list 'auto-mode-alist '("\\.xtrabackup$" . xtrabackup-mode))))