snmyj/orgmode-babel.nvim
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

init

Browse source
This commit is contained in:
marshmallow 2023-06-25 01:23:27 +10:00
commit a870d79674
No known key found for this signature in database
GPG key ID: 767B8880F5AAEB9C
8 changed files with 604 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

18
lua/orgmode-babel/tangle_by_name.el Normal file
View file

@ -0,0 +1,18 @@
(defun tangle-block-by-name (block-name)
"Tangle the org-babel code block with name BLOCK-NAME."
(save-excursion
(goto-char (point-min))
(while (re-search-forward (format "#\\+NAME: %s" block-name) nil t)
(if (org-babel-get-src-block-info)
(org-babel-tangle-collect-block)))))
(setq org-confirm-babel-evaluate nil)
(find-file (nth 0 command-line-args-left))
(dolist (block-name (nthcdr 1 command-line-args-left))
(tangle-block-by-name block-name))
(save-buffer)
(save-buffers-kill-emacs)