emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

lang/python: refactor conda integration

Browse source 
Removes the +python-conda-home variable and guesses conda-anaconda-home
at startup.
This commit is contained in:
Henrik Lissner 2018-07-17 22:06:16 +02:00
parent bb1171b64b
commit e8d4b74c29
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 42 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

38
modules/lang/python/+conda.el
View file

@ -1,21 +1,33 @@
;;; lang/python/+conda.el -*- lexical-binding: t; -*-
;;;###if (featurep! +conda)
;; This file add conda support to doom-emacs. To get started, try `M-x'
;; `+python/set-conda-home' and then `M-x' `conda-env-activate'.
;; Adds conda support to Doom Emacs. `conda-anaconda-home' should be the path to
;; your anaconda installation, and will be guessed from the following:
;;
;; + ~/.anaconda3
;; + ~/.anaconda
;; + ~/usr/bin/anaconda3
;;
;; If none of these work, you'll need to set `conda-anaconda-home' yourself.
;;
;; Once set, run M-x `conda-env-activate' to switch between environments OR turn
;; on `conda-env-autoactivate-mode' if you want it done automatically.
(def-package! conda
:when (featurep! +conda)
:after (python)
:init
(defvar +python-conda-home '("~/.anaconda3" "/usr/bin/anaconda3" "~/.anaconda")
"A list of host pattern and corresponding anaconda home.")
:after python
:config
(advice-add 'anaconda-mode-bootstrap :override #'+python*anaconda-mode-bootstrap)
(conda-env-autoactivate-mode -1)
;; (add-hook 'python-mode-hook #'conda-env-activate-for-buffer)
(unless (cl-loop for dir in (list conda-anaconda-home "/usr/bin/anaconda3" "~/.anaconda")
if (file-directory-p dir)
return (setq conda-anaconda-home dir
conda-env-home-directory dir))
(message "Cannot find Anaconda installation"))
;; integration with term/eshell
(conda-env-initialize-interactive-shells)
(conda-env-initialize-eshell)
;; Version management with conda
(add-hook 'conda-postactivate-hook #'+python|add-conda-env-to-modeline)
(add-hook 'conda-postdeactivate-hook #'+python|add-conda-env-to-modeline))
(after! eshell (conda-env-initialize-eshell))
(add-hook! '(conda-postactivate-hook conda-postdeactivate-hook)
#'+python|add-conda-env-to-modeline)
(advice-add 'anaconda-mode-bootstrap :override #'+python*anaconda-mode-bootstrap-in-remote-environments))

31
modules/lang/python/autoload/conda.el
View file

@ -3,25 +3,28 @@
;;;###autoload
(defun +python/set-conda-home ()
"Set the CONDA HOME.
Usually it's `~/.anaconda3' on local machine, but you can also set it to a
remote directory using TRAMP syntax such as `/ssh:host:/usr/bin/anaconda3'. In
that way you can use the remote conda environment as well as the corresponding
remote python executable and packages."
"Set `conda-anaconda-home' (ANACONDA_HOME).
Usually it's `~/.anaconda3' on local machine, but it can be set to a remote
directory using TRAMP syntax, e.g. `/ssh:host:/usr/bin/anaconda3'. This way, you
can use a remote conda environment, including the corresponding remote python
executable and packages."
(interactive)
(ivy-read "Set conda home:" +python-conda-home
:history +python/set-conda-home--history
:action (lambda (cand) (setq conda-anaconda-home cand))))
(require 'conda)
(when-let* ((home (read-directory-name "Set conda home: " "~" nil nil conda-anaconda-home)))
(setq conda-anaconda-home home)
(message "Successfully changed conda home to: %s" (abbreviate-file-name home))))
;;;###autoload
(defun +python|add-conda-env-to-modeline ()
"Add conda environment string to the major mode in the modeline."
(setq mode-name
(if conda-env-current-name
(format "Py:conda:%s" conda-env-current-name)
"Python")))
"Add conda environment string to the major mode modeline segment."
(setq mode-name
(if conda-env-current-name
(format "Py:conda:%s" conda-env-current-name)
"Python")))
;;;###autoload
(defun +python*anaconda-mode-bootstrap (&optional callback)
(defun +python*anaconda-mode-bootstrap-in-remote-environments (&optional callback)
"Advice to set up the anaconda-mode even in remote environment.
Original doc:
Run `anaconda-mode' server.