tec
/
ox-pluto
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Include project and manifest contents 

Project/Manifest.toml detection is done rather crudely here, this could
be improved in future.
This commit is contained in:
TEC 2023-02-07 23:30:37 +08:00
parent 730d90e2f0
commit ebd82256fd
Signed by: tec
SSH Key Fingerprint: SHA256:eobz41Mnm0/iYWBvWThftS0ElEs1ftBr6jamutnXc/A
1 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
ox-pluto.el
View File

@ -89,6 +89,24 @@ using InteractiveUtils\n\n")
(point-max)))))
cells))
(re-search-forward "\\=\\(?:[ \t\r]*\n\\)+" nil t)))
(when (file-exists-p "Project.toml")
(push
(cons (cons :unfolded "00000000-0000-0000-0000-000000000001")
(with-temp-buffer
(insert "PLUTO_PROJECT_TOML_CONTENTS = \"\"\"\n")
(insert-file-contents "Project.toml")
(insert "\n\"\"\"")
(buffer-string)))
cells))
(when (file-exists-p "Manifest.toml")
(push
(cons (cons :unfolded "00000000-0000-0000-0000-000000000002")
(with-temp-buffer
(insert "PLUTO_MANIFEST_TOML_CONTENTS = \"\"\"\n")
(insert-file-contents "Manifest.toml")
(insert "\n\"\"\"")
(buffer-string)))
cells))
(setq cells (nreverse cells))
(concat
(format ox-pluto--preamble (format-time-string "%Y-%m-%d %a %H:%M"))