]> git.notmuchmail.org Git - notmuch/blobdiff - emacs/notmuch-jump.el
emacs: notmuch-jump.el should provide.
[notmuch] / emacs / notmuch-jump.el
index 0193f8cd7064436efb73f13da4ea798668cbfef0..20e24b252630fe2992092cbeac8e8f606f27f1c9 100644 (file)
 (require 'notmuch-lib)
 (require 'notmuch-hello)
 
-(unless (fboundp 'window-body-width)
-  ;; Compatibility for Emacs pre-24
-  (defalias 'window-body-width 'window-width))
+(eval-and-compile
+  (unless (fboundp 'window-body-width)
+    ;; Compatibility for Emacs pre-24
+    (defalias 'window-body-width 'window-width)))
 
 ;;;###autoload
 (defun notmuch-jump-search ()
@@ -169,3 +170,7 @@ buffer."
           (setq notmuch-jump--action ',(third action))
           (exit-minibuffer))))
     map))
+
+;;
+
+(provide 'notmuch-jump)