sqrtminusone/micromamba.el
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/micromamba.el.git synced 2025-12-10 13:23:02 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

Cache micromamba--buffer-env, check file-remote-p

Browse source
This commit is contained in:
claytharrison 2025-01-06 19:30:18 +01:00
parent 335804a494
commit f7933808a6
1 changed files with 15 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
micromamba.el
View file

@ -202,18 +202,25 @@ Returns an alist with the following keys:
(micromamba--get-name-from-env-yml-contents (micromamba--get-name-from-env-yml-contents
(micromamba--read-file-into-string filename))))))) (micromamba--read-file-into-string filename)))))))
(defvar-local micromamba--buffer-env nil
"The environment to autoactivate for the buffer.")
(defun micromamba--infer-env-from-buffer () ;; adapted from conda.el (defun micromamba--infer-env-from-buffer () ;; adapted from conda.el
"Search up the project tree for an `environment.yml` defining a conda env. "Search up the project tree for an `environment.yml` defining a conda env.
Return `micromamba-fallback-environment' if not found." Return `micromamba-fallback-environment' if not found."
(let* ((filename (buffer-file-name)) (if (file-remote-p buffer-file-name)
(working-dir (if filename micromamba-fallback-environment
(file-name-directory filename) (or micromamba--buffer-env
default-directory))) (setq micromamba--buffer-env
(when working-dir (let* ((filename (buffer-file-name))
(or (working-dir (if filename
(micromamba--get-name-from-env-yml (micromamba--find-env-yml working-dir)) (file-name-directory filename)
micromamba-fallback-environment)))) default-directory)))
(when working-dir
(or
(micromamba--get-name-from-env-yml (micromamba--find-env-yml working-dir))
micromamba-fallback-environment)))))))
(defun micromamba--get-activation-parameters (prefix) (defun micromamba--get-activation-parameters (prefix)
"Get activation parameters for the environment PREFIX. "Get activation parameters for the environment PREFIX.