]> git.notmuchmail.org Git - notmuch/blobdiff - emacs/notmuch-jump.el
emacs: Shorten long lines
[notmuch] / emacs / notmuch-jump.el
index 92a5a2cca687986772cb7b49cd4603ba4a3c942c..6d8cd97fa0c700d9bd1da1b62b9ea0cd1cc21a04 100644 (file)
@@ -70,7 +70,8 @@ fast way to jump to a saved search from anywhere in Notmuch."
 
     (if action-map
        (notmuch-jump action-map "Search: ")
-      (error "To use notmuch-jump, please customize shortcut keys in notmuch-saved-searches."))))
+      (error "To use notmuch-jump, \
+please customize shortcut keys in notmuch-saved-searches."))))
 
 (defvar notmuch-jump--action nil)
 
@@ -88,8 +89,7 @@ ACTION-MAP must be a list of triples of the form
 where KEY is a key binding, LABEL is a string label to display in
 the buffer, and ACTION is a nullary function to call.  LABEL may
 be null, in which case the action will still be bound, but will
-not appear in the pop-up buffer.
-"
+not appear in the pop-up buffer."
 
   (let* ((items (notmuch-jump--format-actions action-map))
         ;; Format the table of bindings and the full prompt
@@ -201,7 +201,9 @@ buffer."
              (define-key map keystr
                `(lambda () (interactive)
                   (setq notmuch-jump--action
-                        ',(apply-partially #'notmuch-jump action-submap new-prompt))
+                        ',(apply-partially #'notmuch-jump
+                                           action-submap
+                                           new-prompt))
                   (exit-minibuffer)))))))
     map))