Skip to content

Commit

Permalink
fix(rustic-babel-build-sentinel): align behaviour with other lang
Browse files Browse the repository at this point in the history
In an org file, the src block's code should be interpreted, OR the binary compiled from it SHOULD execute with PWD as `default-directory` of the org file.

Summary of changes: 
1. save the original default-directory then later restores it.
2. supply `--manifest-path` option to `cargo run` to execute the target `Cargo.toml` binary compiled from the src block.

For reference:
Try to execute a C++, C, js (node), python block.
In particular, see implementation of `org-babel-C-execute` or `org-babel-python-evaluate-external-process`.  May be we can re-write like them in the future.

fixes: brotzeit#509
  • Loading branch information
ed9w2in6 authored Oct 13, 2023
1 parent 39423d1 commit 4cd74c1
Showing 1 changed file with 17 additions and 4 deletions.
21 changes: 17 additions & 4 deletions rustic-babel.el
Original file line number Diff line number Diff line change
Expand Up @@ -116,7 +116,8 @@ execution with rustfmt."
(let ((proc-buffer (process-buffer proc))
(inhibit-read-only t))
(if (zerop (process-exit-status proc))
(let* ((default-directory rustic-babel-dir))
(let* ((original-default-directory default-directory)
(default-directory rustic-babel-dir))

;; format babel block
(when (and rustic-babel-format-src-block (not rustic-babel-auto-wrap-main) (not main-p))
Expand All @@ -125,9 +126,21 @@ execution with rustfmt."
(sit-for 0.1))))

;; run project
(let* ((err-buff (get-buffer-create rustic-babel-compilation-buffer-name))
(params (list "cargo" toolchain "run" "--quiet"))
(inhibit-read-only t))
(let* ((err-buff
(get-buffer-create rustic-babel-compilation-buffer-name))
(params
(list
"cargo"
toolchain
"run"
"--manifest-path"
(format "%s/Cargo.toml" rustic-babel-dir)
"--quiet"))
(inhibit-read-only t)
;; command should run in the original default-directory
;; which is typically the original org file
;; This agrees with behaviour of C, C++, D, js, python, etc.
(default-directory original-default-directory))
(rustic-make-process
:name rustic-babel-process-name
:buffer err-buff
Expand Down

0 comments on commit 4cd74c1

Please sign in to comment.