[emacs] add revert-all-file-buffers, misc changes

1 files changed, 18 insertions, 9 deletions

diff --git a/emacs/inits/15-project-mgmt.el b/emacs/inits/15-project-mgmt.el
index 421e1a3..6ea54e6 100644
--- a/emacs/inits/15-project-mgmt.el
+++ b/emacs/inits/15-project-mgmt.el
@@ -1,4 +1,17 @@
-;; Time-stamp: <2022-09-02 08h55 CEST (anchor)>
+;; Time-stamp: <2024-01-16 15h12 CET (9a3d20a4)>
+
+(defun revert-all-file-buffers ()
+  "Refresh all open file buffers without confirmation"
+  (interactive)
+  (dolist (buf (buffer-list))
+    (let ((filename (buffer-file-name buf)))
+      (when (and filename (not (buffer-modified-p buf)))
+        (if (file-readable-p filename)
+            (with-current-buffer buf (revert-buffer :ignore-auto :noconfirm :preserve-modes))
+          (let (kill-buffer-query-functions)
+            (kill-buffer buf)
+            (message "Killed non-existing/unreadable file bufffer: %s" filename))))))
+  (message "Finished reverting buffers containing unmodified files."))
 
 (use-package projectile
   :ensure t
@@ -8,14 +21,10 @@
   (projectile-mode 1)
 
   (setq projectile-indexing-method 'alien
-    projectile-sort-order 'recently-active
-    projectile-enable-caching t
-    projectile-require-root t
-    projectile-completion-system 'default
-    projectile-mode-line-prefix ""
-    projectile-mode-line-function '(lambda ()
-                                     (format " ¶[%s]" (projectile-project-name)))
-    ))
+        projectile-sort-order 'recently-active
+        projectile-enable-caching t
+        projectile-mode-line-prefix ""
+        projectile-mode-line-function '(lambda () (format " ¶[%s]" (projectile-project-name)))))
 
 (use-package magit
   :ensure t