Function: majutsu-process-environment

majutsu-process-environment is a natively compiled function defined in majutsu-process.el.

Signature

(majutsu-process-environment &optional ARGS)

Documentation

Return process environment used to run jj command ARGS.

A local binding of process-environment affects the environment used by TRAMP subprocesses, so this function composes all process overrides in one place similarly to Magit's magit-process-environment.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-process.el
(defun majutsu-process-environment (&optional args)
  "Return process environment used to run jj command ARGS.

A local binding of `process-environment' affects the environment used by
TRAMP subprocesses, so this function composes all process overrides in one
place similarly to Magit's `magit-process-environment'."
  (let ((env (append majutsu-jj-environment process-environment)))
    (if (and majutsu-jj-diffstat-columns
             (integerp majutsu-jj-diffstat-columns)
             (> majutsu-jj-diffstat-columns 0)
             (majutsu--process-diffstat-command-p args))
        (cons (format "COLUMNS=%d" majutsu-jj-diffstat-columns)
              (seq-remove (lambda (entry)
                            (string-prefix-p "COLUMNS=" entry))
                          env))
      env)))