![emacs find word in file emacs find word in file](https://blog.calebjay.com/posts/my-emacs-environment/starsearch.png)
Then in ~/.emacs.d/, list eLISP code blocks using
![emacs find word in file emacs find word in file](https://i2.wp.com/www.Wikigain.com/wp-content/uploads/2015/12/New-Tab.jpg)
(message "→★ loading init.el in %.2fs" (float-time (time-subtract (current-time) my-init-el-start-time))) (add-hook 'after-save-hook 'my-tangle-config-org-hook-func) (elfile (concat my-user-emacs-directory "config.el"))) (save-buffers-kill-emacs) TEST: kill Emacs when config has been re-generated due to many issues when loading newly generated config.el (gc-cons-threshold most-positive-fixnum)) (elfile (concat my-user-emacs-directory "config.el")) (let ((orgfile (concat my-user-emacs-directory "")) was not invoked when saving which is the normal case: following lines are executed only when my-tangle-config-org-hook-func() (insert (apply 'concat (reverse body-list)))) (insert " Auto-generated at " (format-time-string current-date-time-format (current-time)) " on host " system-name "\n") (insert " Don't edit this file, edit ' instead. (add-to-list 'body-list (concat "\n\n #\n" (string= "DISABLED" match_for_TODO_keyword)
![emacs find word in file emacs find word in file](https://jointvillages.files.wordpress.com/2020/11/cropped-jvdi-01.jpg)
(setq match_for_TODO_keyword (match-string 1))))) (add-to-list 'body-list (concat "message(\"" block_name "\")")) adding a debug statement for named blocks (message "Going to write block name: " block_name) (tfile (cdr (assq :tangle (nth 2 org_block_info)))) (org_block_info (org-babel-get-src-block-info 'light)) (org-babel-map-src-blocks (concat my-user-emacs-directory "") (org-babel-default-header-args (org-babel-merge-params org-babel-default-header-args (output-file (concat my-user-emacs-directory "config.el")) "This function will write all source blocks from = into =config.el= that are. Note the weekly scope of the command's precision.") "Format of date to insert with `insert-current-time' func. (defvar current-time-format "%a %H:%M:%S" See help of `format-time-string' for possible replacements") "Format of date to insert with `insert-current-date-time' func (defvar current-date-time-format "%a %b %d %Y-%m-%dT%H:%M:%S " (defvar my-init-el-start-time (current-time) "Time when init.el was started") (setq my-user-emacs-directory "~/.emacs.d/") What is an email (or why I stopped caring about folders)?