X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=debian%2Fnotmuch.emacsen-startup;h=25a527f5fc8d99244329a1530feafee881861569;hp=017938d5af095570c467fda20fab867775c43be9;hb=4989ef3d871f2510dcf9cf65e7fddd81deeff82e;hpb=3cb3d2c021b5c06bae9757400cc8c6b72db16531 diff --git a/debian/notmuch.emacsen-startup b/debian/notmuch.emacsen-startup index 017938d5..25a527f5 100644 --- a/debian/notmuch.emacsen-startup +++ b/debian/notmuch.emacsen-startup @@ -1,21 +1,23 @@ ;; -*-emacs-lisp-*- ;; ;; Emacs startup file, e.g. /etc/emacs/site-start.d/50notmuch.el -;; for the Debian #PACKAGE# package -;; -;; Originally contributed by Nils Naumann -;; Modified by Dirk Eddelbuettel -;; Adapted for dh-make by Jim Van Zandt +;; for the Debian notmuch package -;; The #PACKAGE# package follows the Debian/GNU Linux 'emacsen' policy and +;; The notmuch package follows the Debian/GNU Linux 'emacsen' policy and ;; byte-compiles its elisp files for each 'emacs flavor' (emacs19, ;; xemacs19, emacs20, xemacs20...). The compiled code is then ;; installed in a subdirectory of the respective site-lisp directory. -;; We have to add this to the load-path: -(let ((package-dir (concat "/usr/share/" - (symbol-name flavor) - "/site-lisp/notmuch"))) -;; If package-dir does not exist, the notmuch package must have -;; removed but not purged, and we should skip the setup. - (when (file-directory-p package-dir) - (setq load-path (cons package-dir load-path)) + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/notmuch")) + (message "Package notmuch removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/notmuch"))) + (message "Package notmuch not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/notmuch")) + ))