X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=debian%2Fnotmuch.emacsen-startup;h=25a527f5fc8d99244329a1530feafee881861569;hp=73f387ec474ea23c27064bed38301a27aff46277;hb=4989ef3d871f2510dcf9cf65e7fddd81deeff82e;hpb=e72a6176e3fc3fcf4b1696e3f0ee9cf66509fb4d

diff --git a/debian/notmuch.emacsen-startup b/debian/notmuch.emacsen-startup
index 73f387ec..25a527f5 100644
--- a/debian/notmuch.emacsen-startup
+++ b/debian/notmuch.emacsen-startup
@@ -2,18 +2,22 @@
 ;;
 ;; Emacs startup file, e.g.  /etc/emacs/site-start.d/50notmuch.el
 ;; for the Debian notmuch package
-;;
-;; Originally contributed by Nils Naumann <naumann@unileoben.ac.at>
-;; Modified by Dirk Eddelbuettel <edd@debian.org>
-;; Adapted for dh-make by Jim Van Zandt <jrv@debian.org>
 
 ;; 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.
 
-(if (not (file-exists-p "/usr/share/emacs/site-lisp/notmuch"))
-    (message "Package notmuch removed but not purged.  Skipping setup.")
+(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"))
+   (concat "/usr/share/"
+	   (symbol-name debian-emacs-flavor)
+	   "/site-lisp/notmuch"))
+  ))