summaryrefslogtreecommitdiff
path: root/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'emacs')
-rw-r--r--emacs/inits/02-modeline.el7
-rw-r--r--emacs/inits/03-miscload.el5
-rw-r--r--emacs/inits/15-project-mgmt.el27
3 files changed, 25 insertions, 14 deletions
diff --git a/emacs/inits/02-modeline.el b/emacs/inits/02-modeline.el
index 6ea2b07..142acbb 100644
--- a/emacs/inits/02-modeline.el
+++ b/emacs/inits/02-modeline.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2021-09-27 08h47 EDT (hobbies)>
+;; Time-stamp: <2024-01-18 13h15 CET (3913c8e4)>
;; -----------------------------------------------------------------------------
;; Mode-line
@@ -9,7 +9,7 @@
(defun abbreviate-left-trim-path (p len)
(let ((pa (abbreviate-file-name p)))
(if (> (length pa) (+ 3 len))
- (format "...%s" (substring pa (- (length pa) len)))
+ (format "...%s" (substring pa (- (length pa) len)))
pa)))
(setq display-time-format "%d/%H.%M"
@@ -31,6 +31,5 @@
(use-package minions
:ensure t
:config
- (setq minions-mode-line-lighter ":"
- minions-direct '(god-local-mode))
+ (setq minions-mode-line-lighter ":")
(minions-mode 1))
diff --git a/emacs/inits/03-miscload.el b/emacs/inits/03-miscload.el
index 6f4ffbf..64e3ab3 100644
--- a/emacs/inits/03-miscload.el
+++ b/emacs/inits/03-miscload.el
@@ -1,8 +1,11 @@
-;; Time-stamp: <2020-08-12 22:25:58 (user@hobbies)>
+;; Time-stamp: <2023-12-31 17h36 CET (436eb713)>
(use-package siege-mode
:load-path "~/.emacs.d/scripts/siege-mode/")
+(use-package copilot
+ :load-path "~/.emacs.d/scripts/")
+
;; (use-package maxima
;; :defer t
;; :config (setq imaxima-use-maxima-mode-flag t))
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