darrik/revert-all-buffers

revert-all-buffers.el

;; Based on (org-revert-all-org-buffers)
(defun darrik/revert-all-buffers ()
  (interactive)
  (unless (yes-or-no-p "Revert all buffers?")
    (error "Abort"))
  (save-excursion
    (save-window-excursion
      (mapc
       (lambda (buffer)
         (when (with-current-buffer buffer buffer-file-name)
           (switch-to-buffer buffer)
           (revert-buffer t 'no-confirm)))
       (buffer-list)))))