+(defun notmuch-search-refresh-view ()
+ "Refresh the current view.
+
+Kills the current buffer and runs a new search with the same
+query string as the current search."
+ (interactive)
+ (let ((query notmuch-search-query-string))
+ (kill-this-buffer)
+ (notmuch-search query)))
+