|
@ -47,13 +47,14 @@ asynchronously." |
|
|
(lambda () |
|
|
(lambda () |
|
|
(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 |
|
|
|
|
|
;; 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)) |
|
|
|
|
|
|
|
|
; ;; tangle config asynchronously ;; for now not async anymore |
|
|
|
|
|
; ;; 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)) |
|
|
|
|
|
(org-babel-tangle-file config-org config-el) |
|
|
(message "reloading user-init-file") |
|
|
(message "reloading user-init-file") |
|
|
(load-file config-el)) |
|
|
(load-file config-el)) |
|
|
|
|
|
|
|
|