Browse Source

now tangling goes to init.el

master
Marc 7 months ago
parent
commit
a9c23ac4f1
1 changed files with 2 additions and 17 deletions
  1. 19
      config.org

19
config.org

@ -1,7 +1,7 @@
#+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 init.el
#+OPTIONS: ^:nil #+OPTIONS: ^:nil
* TODOS * TODOS
- early-init.el? What to outsource here? - early-init.el? What to outsource here?
@ -39,7 +39,7 @@ These functions updates config.el whenever changes in config.org are made. The u
(defun my/tangle-config () (defun my/tangle-config ()
"Export code blocks from the literate config file." "Export code blocks from the literate config file."
(interactive) (interactive)
;; prevent emacs from killing until tangle-process finished
;; prevent emacs from killing until tangle-process has finished
(add-to-list 'kill-emacs-query-functions (add-to-list 'kill-emacs-query-functions
(lambda () (lambda ()
(or (not (process-live-p (get-process "tangle-process"))) (or (not (process-live-p (get-process "tangle-process")))
@ -56,21 +56,6 @@ These functions updates config.el whenever changes in config.org are made. The u
(defun my--add-local-hook (hook function) (defun my--add-local-hook (hook function)
"Add buffer-local hook." "Add buffer-local hook."
(add-hook hook function :local t)) (add-hook hook function :local t))
;; (defun my/async-process (command &optional name filter)
;; "Start an async process by running the COMMAND string with bash. Return the
;; process object for it.
;; NAME is name for the process. Default is \"async-process\".
;; FILTER is function that runs after the process is finished, its args should be
;; \"(process output)\". Default is just messages the output."
;; (make-process
;; :command `("bash" "-c" ,command)
;; :name (if name name
;; "async-process")
;; :filter (if filter filter
;; (lambda (process output) (message output)))))
#+END_SRC #+END_SRC
A small function to measure start up time. A small function to measure start up time.

Loading…
Cancel
Save