debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-24 20:08:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: make the refresh functions more consistent

Browse source 
The different refreshed functions were called differently: some were
called interactively and some were not. Make them all interactive.
This commit is contained in:
Mark Walters 2016-10-15 08:32:40 +01:00 committed by David Bremner
parent cd7e497d07
commit 5e83fe979d
3 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
emacs/notmuch-hello.el
View file

@ -607,6 +607,7 @@ with `notmuch-hello-query-counts'."
(defun notmuch-hello-update (&optional no-display) (defun notmuch-hello-update (&optional no-display)
"Update the current notmuch view." "Update the current notmuch view."
;; Lazy - rebuild everything. ;; Lazy - rebuild everything.
(interactive)
(notmuch-hello no-display)) (notmuch-hello no-display))
(defun notmuch-hello-window-configuration-change () (defun notmuch-hello-window-configuration-change ()

6
emacs/notmuch-lib.el
View file

@ -417,10 +417,8 @@ of its command symbol."
"Refresh the current buffer." "Refresh the current buffer."
(interactive) (interactive)
(when notmuch-buffer-refresh-function (when notmuch-buffer-refresh-function
(if (commandp notmuch-buffer-refresh-function) ;; Pass prefix argument, etc.
;; Pass prefix argument, etc. (call-interactively notmuch-buffer-refresh-function)))
(call-interactively notmuch-buffer-refresh-function)
(funcall notmuch-buffer-refresh-function))))
(defun notmuch-poll-and-refresh-this-buffer () (defun notmuch-poll-and-refresh-this-buffer ()
"Invoke `notmuch-poll' to import mail, then refresh the current buffer." "Invoke `notmuch-poll' to import mail, then refresh the current buffer."

1
emacs/notmuch.el
View file

@ -991,6 +991,7 @@ query string as the current search. If the current thread is in
the new search results, then point will be placed on the same the new search results, then point will be placed on the same
thread. Otherwise, point will be moved to attempt to be in the thread. Otherwise, point will be moved to attempt to be in the
same relative position within the new buffer." same relative position within the new buffer."
(interactive)
(let ((target-line (line-number-at-pos)) (let ((target-line (line-number-at-pos))
(oldest-first notmuch-search-oldest-first) (oldest-first notmuch-search-oldest-first)
(target-thread (notmuch-search-find-thread-id 'bare)) (target-thread (notmuch-search-find-thread-id 'bare))