From 850c0bbb61ed75247d98c6863c9b5727389849dd Mon Sep 17 00:00:00 2001
From: Julian DeMille <julian.demille@demilletech.net>
Date: Fri, 26 Jul 2019 22:32:17 -0400
Subject: [PATCH] Adding lsp-python-ms with patch so it doesn't force itself to
 be installed.

---
 modules/lang/python/config.el   | 10 ++++++++++
 modules/lang/python/packages.el |  4 ++++
 2 files changed, 14 insertions(+)

diff --git a/modules/lang/python/config.el b/modules/lang/python/config.el
index e5057245e..44a7d9b77 100644
--- a/modules/lang/python/config.el
+++ b/modules/lang/python/config.el
@@ -247,3 +247,13 @@ called.")
   (add-to-list 'global-mode-string
                '(conda-env-current-name (" conda:" conda-env-current-name " "))
                'append))
+
+;; lsp-python-ms setup
+(defun +python--dont-auto-install-server-a (orig-fn)
+  lsp-python-ms-executable)
+(use-package! lsp-python-ms
+  :when (featurep! +lsp)
+  :init
+  (advice-add #'lsp-python-ms--command-string
+            :override #'+python--dont-auto-install-server-a))
+
diff --git a/modules/lang/python/packages.el b/modules/lang/python/packages.el
index e43655be6..5ed7f3af0 100644
--- a/modules/lang/python/packages.el
+++ b/modules/lang/python/packages.el
@@ -4,6 +4,10 @@
 ;; Major modes
 (package! pip-requirements)
 
+;; LSP
+(when (featurep! +lsp)
+  (package! lsp-python-ms))
+
 ;; Programming environment
 (package! anaconda-mode)
 (when (featurep! :completion company)