revert all(!!) buffers after git pull

gistfile1.el

(require 'cl)
(defadvice magit-pull (after refresh-buffers-after-pull activate)
  (loop for buffer in (buffer-list)
        when (buffer-file-name buffer)
        do (with-current-buffer buffer
             (if (buffer-modified-p buffer)
                 ;; ask for confirmation on modified buffers
                 (revert-buffer)
               (revert-buffer 'ignore-auto 'noconfirm)))))