|
@ -1,4 +1,4 @@ |
|
|
#+TITLE: Emacs configuration file |
|
|
|
|
|
|
|
|
#+TITLE: Emacs configuration file |
|
|
#+AUTHOR: Marc |
|
|
#+AUTHOR: Marc |
|
|
#+BABEL: :cache yes |
|
|
#+BABEL: :cache yes |
|
|
#+PROPERTY: header-args :tangle yes |
|
|
#+PROPERTY: header-args :tangle yes |
|
@ -48,9 +48,12 @@ asynchronously." |
|
|
(or (not (process-live-p (get-process "tangle-process"))) |
|
|
(or (not (process-live-p (get-process "tangle-process"))) |
|
|
(y-or-n-p "\"me/tangle-config\" is running; kill it? ")))) |
|
|
(y-or-n-p "\"me/tangle-config\" is running; kill it? ")))) |
|
|
;; tangle config asynchronously |
|
|
;; tangle config asynchronously |
|
|
(me/async-process |
|
|
|
|
|
(format "emacs %s --batch --eval '(org-babel-tangle nil \"%s\")'" config-org config-el) |
|
|
|
|
|
"tangle-process") |
|
|
|
|
|
|
|
|
;; async only on linux because bash is called |
|
|
|
|
|
(if *sys/linux* |
|
|
|
|
|
(me/async-process |
|
|
|
|
|
(format "emacs %s --batch --eval '(org-babel-tangle nil \"%s\")'" config-org config-el) |
|
|
|
|
|
"tangle-process") |
|
|
|
|
|
(format "emacs %s --batch --eval '(org-babel-tangle nil \"%s\")'" config-org config-el)) |
|
|
(message "reloading user-init-file") |
|
|
(message "reloading user-init-file") |
|
|
(load-file config-el)) |
|
|
(load-file config-el)) |
|
|
|
|
|
|
|
@ -412,7 +415,8 @@ Some windows specific stuff |
|
|
; (progn |
|
|
; (progn |
|
|
; (setq gc-cons-threshold (* 511 1024 1024) |
|
|
; (setq gc-cons-threshold (* 511 1024 1024) |
|
|
; gc-cons-percentage 0.5 |
|
|
; gc-cons-percentage 0.5 |
|
|
; garbage-collection-messages t) |
|
|
|
|
|
|
|
|
; garbage-collection-messages t |
|
|
|
|
|
|
|
|
; (run-with-idle-timer 5 t #'garbage-collect)) |
|
|
; (run-with-idle-timer 5 t #'garbage-collect)) |
|
|
(when (boundp 'w32-pipe-read-delay) |
|
|
(when (boundp 'w32-pipe-read-delay) |
|
|
(setq w32-pipe-read-delay 0)) |
|
|
(setq w32-pipe-read-delay 0)) |
|
@ -540,6 +544,7 @@ Orderless orders the suggestions by recency. The package prescient orders by fre |
|
|
#+begin_src emacs-lisp |
|
|
#+begin_src emacs-lisp |
|
|
;; completion ui |
|
|
;; completion ui |
|
|
(use-package vertico |
|
|
(use-package vertico |
|
|
|
|
|
:ensure t |
|
|
:init |
|
|
:init |
|
|
(vertico-mode)) |
|
|
(vertico-mode)) |
|
|
|
|
|
|
|
@ -1038,6 +1043,9 @@ org-roam-db-sync |
|
|
:ensure t |
|
|
:ensure t |
|
|
:init |
|
|
:init |
|
|
(setq org-roam-v2-ack t) |
|
|
(setq org-roam-v2-ack t) |
|
|
|
|
|
(if *sys/windows* |
|
|
|
|
|
(setq org-roam-database-connector 'sqlite3 |
|
|
|
|
|
exec-path (append exec-path '("P:/Tools/sqlite"))))' |
|
|
:custom |
|
|
:custom |
|
|
(org-roam-directory MY--PATH_ORG_ROAM) |
|
|
(org-roam-directory MY--PATH_ORG_ROAM) |
|
|
(org-roam-completion-everywhere t) |
|
|
(org-roam-completion-everywhere t) |
|
|